Составить программу,которая запрашивает время суток и выводит на экран соответствующие приветствие: "доброе утро" "доброго дня"
5-9 класс
|
"доброго вечера"
"спокойной ночи"
"доброе утро" в 7:00
"доброго дня" в 14:00
"доброго вечера" в 17:00
"спокойной ночи" в 21:00
var hour: integer;
minute: string;
begin
writeln('Введите время суток');
read(hour,minute);
if (hour>=6) and (hour<12) then writeln('Доброе утро');
if (hour>=12) and (hour<18) then writeln('Доброго дня');
if (hour>=18) and (hour<00) then writeln ('Доброго вечера');
if (hour>=00) and (hour<6) then writeln ('Спокойной ночи');
end.
Тут единственный недостаток: после ввода часов нужно нажать enter и минуты вводить на новой строке
Другие вопросы из категории
в хороших книгах. Ответ представьте в битах
Читайте также
На улице хорошая погода
В Pascal
Задать с помощью генератора случайных чисел час суток целое число от 0 до 23. Напечатайте соответствующее этому времени сообщение: "Доброе утро", "Добрый день",
"Добрый вечер", "Доброй ночи".
Составить программу,которая выводит на экран сумму нечетных чисел от 1 до 30 в Pascal ABC.
например армия(строка а)
арбуз (строка б)
2)составьте программу ,которая предлагает ввести с клавиатуры две строки а и б ,соеденяет их и выводит результат в одну строку
например: тепло(строка а)
ход(строка б)