Есть ответ 👍

Проверить является ли заданный одномерный числовой массив по возрастанию

287
322
Посмотреть ответы 2

Ответы на вопрос:


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.
ruslan428
4,4(95 оценок)

После первого "end" поставь ; если не скажи

Популярно: Информатика