ПОМОГИТЕ ПОЖАЛУЙСТА!!!!!
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.
Спасибо Вам огромное!
Да не за что, можете пожалуйста отметить как лучшее