Предмет: Информатика, автор: denis789987

Написать программу, которая проверяет – образуют ли элементы заданного массива возрастающую последовательность.

Ответы

Автор ответа: And42
0
var arr : array of integer; len, i : integer; begin write('Введите размер массива: '); readln(len); SetLength(arr, len); for i := 0 to len -1 do begin write('arr[', i, '] = '); readln(arr[i]); end; for i := 1 to len - 1 do if arr[i] <= arr[i - 1] then begin writeln('Последовательность не возрастающая'); Exit; end; writeln('Последовательность возрастающая'); end.
Автор ответа: denis789987
0
надо на паскаль
Автор ответа: And42
0
надо конкретнее. Это Pascal ABC.NET. Есть ещё ABC, турбо паскаль, free Pascal, на каком именно нужно?
Автор ответа: denis789987
0
ABC
Похожие вопросы
Предмет: Математика, автор: elzadakudaybergenova
Предмет: Қазақ тiлi, автор: bakhtiyarovmadi
Предмет: Математика, автор: misharindaniil