Home
О нас
Products
Services
Регистрация
Войти
Поиск
Malyana021296
@Malyana021296
July 2022
1
32
Report
Дана последовательность действительных чисел а1,а2,...,аn. Выяснить, быдет ли она возрастающей.
Please enter comments
Please enter your name.
Please enter the correct email address.
Agree to
terms of service
You must agree before submitting.
Send
Answers & Comments
Gleb1Kosyrev
Verified answer
//Pascal ABC.NET v3.1 сборка 1219
Const
n=5;
Var
ar:array[1..n] of integer;
i:integer;
begin
for i:=1 to n do
readln(ar[i]);
for i:=1 to n-1 do
if ar[i]>ar[i+1] then
begin
writeln('Убывает на одном из участков');
exit;
end;
writeln('Возрастает');
end.
5 votes
Thanks 8
More Questions From This User
See All
Malyana021296
August 2022 | 0 Ответы
v poryadke vozrastaniya edinicy izmereniya informacii ukazany v po sledovatelnost
Answer
Malyana021296
July 2022 | 0 Ответы
10 ukazhite uporyadochennuyu po ubyvaniyu posledovatelnost znachenij 1 2100 kbajt
Answer
Malyana021296
July 2022 | 0 Ответы
15 ukazhite uporyadochennuyu po ubyvaniyu posledovatelnost znachenij 1 2000 kbajt
Answer
Malyana021296
July 2022 | 0 Ответы
reshit uravnenie v celyh chislah 253h 449u3
Answer
Malyana021296
July 2022 | 0 Ответы
napisat programmu na paskale udalit iz massiva vse otricatelnye elementy
Answer
Malyana021296
July 2022 | 0 Ответы
dana posledovatelnost dejstvitelnyh chisel a1a2an vyyasnit bydet li on
Answer
Malyana021296
July 2022 | 0 Ответы
funkcii74a75fe6399c9f7b21feb598a0efec12 51512
Answer
Malyana021296
October 2021 | 0 Ответы
zadanie sostavit programmu resheniya zadachi ukazaniya k vypolneniyu samostoyatel
Answer
Malyana021296
October 2021 | 0 Ответы
napisat fragment programmy vyvoda massiva na ekran
Answer
Malyana021296
October 2021 | 0 Ответы
1 kakie iz privedennyh opisanij yavlyayutsya nepravilnymi i pochemu var a arr
Answer
рекомендуемые вопросы
rarrrrrrrr
August 2022 | 0 Ответы
o chem dolzhny pozabotitsya v pervuyu ochered vzroslye pri organizacionnom vyvoze n
danilarsentev
August 2022 | 0 Ответы
est dva stanka na kotoryh vypuskayut odinakovye zapchasti odin proizvodit a zapcha
myachina8
August 2022 | 0 Ответы
najti po grafiku otnoshenie v3v1 v otvetah napisano 9 no nuzhno reshenie
ydpmn7cn6w
August 2022 | 0 Ответы
Choose the correct preposition: 1.I am fond (out,of,from) literature. 2.where ar...
millermilena658
August 2022 | 0 Ответы
opredelite kak sozdavalas i kto sozdaval arabskoe gosudarstvo v kracii
MrZooM222
August 2022 | 0 Ответы
ch ajtmanov v rasskaze krasnoe yabloko ispolzuet metod rasskaz v rasskaze opi
timobila47
August 2022 | 0 Ответы
kakovo bylo naznachenie kazhdoj iz chastej vizantijskogo hrama pomogite pozhalujsta
ivanyyaremkiv
August 2022 | 0 Ответы
moment. 6....
pozhalujsta8b98a56c0152a07b8f4cbcd89aa2f01e 97513
sarvinozwakirjanova
August 2022 | 0 Ответы
pomogite pozhalusto pzha519d7eb8246a08ab0df06cc59e9dedb 6631
×
Report "Дана последовательность действительных чисел а1,а2,...,аn. Выяснить, быдет ли он..."
Your name
Email
Reason
-Select Reason-
Pornographic
Defamatory
Illegal/Unlawful
Spam
Other Terms Of Service Violation
File a copyright complaint
Description
Helpful Links
О нас
Политика конфиденциальности
Правила и условия
Copyright
Контакты
Helpful Social
Get monthly updates
Submit
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Verified answer
//Pascal ABC.NET v3.1 сборка 1219Const
n=5;
Var
ar:array[1..n] of integer;
i:integer;
begin
for i:=1 to n do
readln(ar[i]);
for i:=1 to n-1 do
if ar[i]>ar[i+1] then
begin
writeln('Убывает на одном из участков');
exit;
end;
writeln('Возрастает');
end.