Дано трехзначное число. вывести «yes», если его цифры образуют возрастающую или убывающую последовательность. в противном случае вывести «no».
221
428
Ответы на вопрос:
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.удачи =)
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Маша098224.05.2021 08:13
-
даладно30раз23.09.2022 07:41
-
Мрорпа29.03.2020 19:14
-
КатяЗюзина16.01.2021 10:06
-
NamaruC309.10.2020 13:14
-
kerisolomia29.04.2022 19:01
-
Mpazd04.06.2023 07:15
-
Rarete18.10.2020 12:55
-
kodintsevmark09.11.2021 17:01
-
qwerty0615101.12.2021 14:42
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.