Проверить является ли заданный одномерный числовой массив по возрастанию
287
322
Ответы на вопрос:
Const n=10; var a: array [1..n] of integer; i,z: integer; begin z: =1; for i: =1 to n do begin readln(a[i]); end; for i: =1 to n-1 do if a[i]> a[i+1] then z: =0; if z=1 then writeln('yes') else writeln('no') end.
Популярно: Информатика
-
daryankaa130.06.2022 10:25
-
llvoronall14.02.2023 22:59
-
aleksandrdream426.07.2020 09:54
-
Golovina07712.04.2021 22:07
-
Виктория8987343694015.02.2022 14:02
-
skillsass16.09.2020 00:00
-
Faleck27.07.2021 19:46
-
Наоя19.12.2020 01:50
-
Серыйпрайм09.08.2021 13:26
-
takhtarkina14.01.2022 23:28