Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
сонька2005бедовая
11.03.2020 00:33 •
Информатика
Даны три числа. проверить, записаны ли они в порядке возрастания или убывания. паскаль.
Показать ответ
Ответ:
katyushakot201
08.10.2020 03:33
Var a,b,c:Integer;
begin
Read(a,b,c);
if (a<b) and (b<c) then
WriteLn('В порядке возрастания')
else if (a>b) and (b>c) then
WriteLn('В порядке убывания')
else
WriteLn('Нет');
end.
Нажимаем "лучший ответ"
0,0
(0 оценок)
Популярные вопросы: Информатика
An0NimKa00
05.09.2021 09:50
с 5 по 7 задание,умоляююю(...
кристина2162
03.08.2021 15:28
Что лишнее? Файл, фанс, фунт, факт. Принтер, плоттер, винчестер, наушники. Копирование, произношение, перемещение, удаление, модификация. Имя, расширение, библиотека,...
GoldCoin
07.01.2021 15:32
решить буду благодарна(7 вариант)...
diaries1
17.05.2023 04:49
С азбуки Морзе декодируй сообщение: _ _ | _ . _ _ | _ _ _ _ | _ . . _...
zvezdoska
13.07.2022 19:26
В государстве все монеты имеют нечетный номинал. Известно, что максимальный номинал монеты 81, всего в обиходе 41 различный номинал. Нумизмат Прохор собрал полную...
автормемов
20.02.2023 09:42
Задача 2 В языке запросов поискового сервера для обозначения логической операции «ИЛИ» используется символ «|», а для обозначения логической операции «И» – символ...
stalkeregor344
24.12.2020 20:01
быстро мне до 10 сдавать надо я понять не могу...
misspotter
30.03.2020 02:27
Скиньте соч по алгебре класс 1 четверть...
alesyshapiro
30.05.2021 09:26
Задача программирование информатика (с объяснением)...
kris406
24.02.2023 23:55
Что такое WMAN (Wireless Metropolitan Area Network)? Персональная беспроводная сеть.Беспроводная сеть организацииБеспроводная городская сеть.Беспроводная сеть школы.Связь...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
Read(a,b,c);
if (a<b) and (b<c) then
WriteLn('В порядке возрастания')
else if (a>b) and (b>c) then
WriteLn('В порядке убывания')
else
WriteLn('Нет');
end.
Нажимаем "лучший ответ"