Регистрация
dahasha0515ozg6qu
15.04.2020 05:56
Информатика
Есть ответ 👍

с решением этой задачи по информатике

247
398
Посмотреть ответы 1

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

Евгения22042002
Евгения22042002
4,7(71 оценок)
//minlim -- нижняя граница вводимых чисел, n -- количество вводимых //чисел const  n = 10;       minlim = -1000; var pred, x, i : integer; begin       pred : = minlim;       for i : = 1 to n do       begin           read(x);           if x < pred then           begin               writeln('последовательность является убывающей.');               exit();           end;           pred : = x;         end;           writeln('последовательность является неубывающей.'); end.

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