Информатика, вопрос задал arinaaaa9057 , 7 лет назад

ПОМОГИТЕ ПОЖАЛУЙСТА!!!!!

Приложения:

Ответы на вопрос

Ответил MrFasty5
0

var t:integer;

begin

writeln('Введите время в часах:');

read(t);

case t of

0..5: writeln('Ночь');

6..11: writeln('Утро');

12..17: writeln('День');

18..24: writeln('Ночь');

else

writeln('Ошибка при вводе времени');

end;

end.

Ответил arinaaaa9057
0
Спасибо Вам огромное!
Ответил MrFasty5
0
Да не за что, можете пожалуйста отметить как лучшее
Новые вопросы