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

0 голосов
36 просмотров

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


image

Информатика (82 баллов) | 36 просмотров
Дан 1 ответ
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.

(446 баллов)
0

Спасибо Вам огромное!

0

Да не за что, можете пожалуйста отметить как лучшее