Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
natakalip09wj0
20.03.2020 10:19 •
Информатика
Пользователь вводит число n.вывести строку о том ,что число больше или меньше 10,или равно 10.
Ответ:
ОлиПоп
27.07.2020 22:11
Var
n:integer;
begin
readln(n);
if n > 10 then writeln(n, ' > ', 10);
if n < 10 then writeln(n, ' < ', 10);
if n = 10 then writeln(n, ' = ', 10);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
lyubimuchkaozd15q
24.11.2020 13:58
Как открутить из дуашлока 4 вот это ( )...
Bogdan2017
18.06.2020 05:27
Дано: fori: =1to28do при последнем выполнении тела цикла i=...
NikitaZdanovich
04.04.2022 17:21
Міні-твір на тему діти в інтернеті дуже потрібно...
katyar980
04.04.2022 17:21
Есть знатоки html? расскажите, как блоки в ряд расположить? css связанная. как на java красивое меню сделать?...
66ХОХ66
06.03.2021 13:52
Какую работу могут выполнять компьютеры?...
cat2522
31.12.2021 02:03
11011111 00100000 111101011 11111110 11100001 11101011 11111110 00100000 11110010 11100101 11100001 11111111 расшифруйте...
aleXxxx03
07.07.2020 09:07
Объясните что такое паралелипепед...
Татьяна72828
17.06.2022 02:46
раскройте скобки,упростите выражение и вычислите его значение -2×(2,5c-2)+7×(3,6c+7) при...
Alpetrova7
24.06.2020 04:04
«Зар заман және Шортанбай» тақырыбына шолу жасап,мәліметтерге сүйене отырып, 40-50 сөз көлемінде өз көзқарасыңызды білдіріп эссе жазыңыз...
illia2006
10.09.2022 21:57
1. Fill inthe verb: “I have … to Nur-Sultan”. a) is b) am c) are d) been e) was 2. Fill inthe verb: “These... Pete and Robert.That ... Lisa”. a) is, is b) are, is c) are, are d)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
n:integer;
begin
readln(n);
if n > 10 then writeln(n, ' > ', 10);
if n < 10 then writeln(n, ' < ', 10);
if n = 10 then writeln(n, ' = ', 10);
end.