Дано трехзначное число. Вывести «Yes», если его цифры образуют возрастающую или…

Question

55

Дано трехзначное число. Вывести «Yes», если его цифры образуют возрастающую или убывающую последовательность. В противном случае вывести «No» .

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

intro · Accepted Answer

33

intro

01 сентября 2022

Const N=10; var i, b, s: integer; a: string; begin readln (b); a: =inttostr (b); for i: =1 to length (a) do if (strtoint (a[i]) > s) then s: =strtoint (a[i]) else s: =10; if (s=10) then writeln ('No') else writeln ('Yes'); end. Удачи=)

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: