Составьте программу, которая выводит на экран различные приветствия…

Составьте программу, которая выводит на экран различные приветствия в зависимости от введенного времени. Договоримся, что утро длится с 8 до 12 часов, день – с 12 до 17 часов, вечер – с 17 до 23 часов и ночь – все остальное время.

в избранное

parliament

15 марта 2023

PROGRAMPrivet; VARx: real; BEGINwriteln ('Который час? '); read (x); ifx>24 then writeln ('Введенное число не является временем ') elsebeginif (x>=8) and (x<12) then writeln ('Доброе утро! '); if (x>=12) and (x<17) then writeln ('Добрый день! '); if (x>=17) and (x<23) then writeln ('Добрый вечер! '); if (x>=23) or (x<8) then writeln ('Доброй ночи! '); end; end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?