Вводится текущее время. написать программу, определяющую это время до полудня или после.На языке паскаль.

Предыдущий
вопрос Следующий
вопрос

program TimeOfDay;

var
hours: integer;

begin
write('Enter the current time (in hours): ');
readln(hours);

if (hours >= 0) and (hours < 12) then
writeln('It is before noon')
else
writeln('It is after noon');
end.