Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
александра7896
31.05.2022 15:00 •
Информатика
Составить программу ввода оценки p (1< =p< =5), полученной учащимся, и выдачи текста: "молодец! ", если p=5; "хорошо! ", если p=4; "лентяй! ", если p< =3.
Показать ответ
Ответ:
alskdjfhg123a
10.08.2020 01:51
Var
p: integer;
begin
readln(p);
if p=5 then print('Молодец!')
else if p = 4 then print('Хорошо!')
else if p<=3 then print('Лентяй!')
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
лиззка16
30.04.2023 01:55
A1. фанатам стратегий 2 (8 ) от авторов фанатам стратегий . в текущей миссии, очевидно, необходимо укрепить базу, прежде чем идти в открытый бой. для обеспечения устойчивой...
catmartovski
20.03.2021 21:52
Составить программу,для нахождения суммы квадратов между числами,которые вводятся с клавиатуры...
vadim2810
15.12.2022 14:24
При передаче радиограммы было потеряно разбиение на буквы, но известно, что в радиограмме использовались только следующие буквы: Е Н О З Щ • −• −−− −−•• −−•− Определите...
нин1231
17.03.2023 17:36
Постройте таблицу истинности к задаче: Обсуждая конструкцию нового трёхмоторного самолёта, трое конструкторов поочередно высказали следующие предположения: 1) при отказе...
Animeshon
11.10.2021 18:03
№1 даны два целых числа. программа должна вывести число 1, еслипервое число больше второго, число 2, если второе больше первого или число 0,если они равны.входные данныевводятся...
lovegamid
28.05.2020 10:29
1. Начертите параллелограмм ABCD. Постройте образ параллелограмма при: а) симметрии относительно точки D;б) симметрии относительно прямой CD; В) параллельном переносе...
mrkrbnv
28.05.2020 10:29
Вводится последовательность натуральных чисел, ввод заканчивается числом 0. Выведите значение наибольшего элемента последовательности на первой строке и наименьшего...
babiron
30.03.2022 08:31
мы на контрольной ответов нет...
play1239
18.01.2023 19:30
По графику определи значение функции при { x = -2}x=−2...
dimasik337
21.12.2020 21:58
Французкий язык 6 класс синяя птица стр 61 номер 9...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
p: integer;
begin
readln(p);
if p=5 then print('Молодец!')
else if p = 4 then print('Хорошо!')
else if p<=3 then print('Лентяй!')
end.