Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
lisasmirnova1
07.09.2021 11:43 •
Информатика
Написать программу,которая печатает "доброе утро","добрый день","добрый вечер","спокойной ночи",в зависимости от времени,которое вводится с клавиатуры на запрос программы.
Показать ответ
Ответ:
06637381
26.06.2020 20:52
Program esep;
var hour : byte;
begin
Repeat
Write('Часы: ');
Readln(hour);
until hour in [1..24];
case
hour of 8..11 : Writeln('Доброе утро!');
12..16 : Writeln('Добрый день');
17..23 : Writeln('Добрый вечер');
else Writeln('Доброй ночи!');
end;
Readln;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
asya1607
26.10.2022 15:04
Решить по информатике файл 1мбайт передаётся по сети со скоростью 1024 бит/сек.определить время передачи файла в секундах....
lyazzat260703
03.10.2020 11:08
Дано четыре вещественных числа найти сумму тех чисел которые больше пяти на паскаль...
knopiknopa
12.08.2020 16:13
Определите сколько раз исполняет тело цикла в каждом из указанных случаев а)делать от k: = -1 до 9 с шагом 2...
vyglotov
12.08.2020 16:13
Вводится текст. в тексте удалить слова с нечетным количеством букв. конец ввода f1. написать нужно по типу строка....
kapov2017p0aak6
11.10.2021 09:40
Поменять местами две диагонали Дан квадратный массив. Поменяйте местами в каждом столбце элементы, стоящие на главной и побочной диагонали. Входные данные: В первой строке дано...
yuliyayulyafe
28.01.2023 22:31
Дан условный оператор: if(a 13)theny:=aelsey:=a+6...
AlyaMrr
24.09.2022 21:11
Мистер Фокс записал следующее математическое высказывание: Периметр треугольника равен сумме всех его сторон И площадь любого треугольника равна половине произведения двух его...
shakenovdarhan
05.09.2020 19:47
Нужна с Python Там 2 задания Напишите программу: 1. Для вычисления суммы ряда для n слагаемых. Количество задается во время работы 1/2+2/3+3/4+4/5+5/6+6/7 и т.д. 2. Которая выводит...
aboderu
06.10.2021 16:10
Можно ли в записи 1*2*3*4*5*6*7*8*9 =20 вместо звездочки поставить в любом порядке знаки +и- так чтобы получилось верное равенство...
ktvsl
06.10.2021 16:10
Для получения сульфида натрия взяли 23 г натрия и 20 г серы какая масса сульфида натрия образовалась при этом? ответ 39 г...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var hour : byte;
begin
Repeat
Write('Часы: ');
Readln(hour);
until hour in [1..24];
case
hour of 8..11 : Writeln('Доброе утро!');
12..16 : Writeln('Добрый день');
17..23 : Writeln('Добрый вечер');
else Writeln('Доброй ночи!');
end;
Readln;
end.