Question

1. Составить программу ввода величины времени суток t (0<=t<=24)и выдачи текста:
"Вы уже проснулись?" - если t<10
"Не пора ли обедать?" - если t=12
"Еще не вечер!" - если t>=18
"Как работается?" - в остальных случаях.

Answer 1

Язык: Паскаль

var t: byte;
begin
readln (t);
if (t<10) then
  writeln ('Вы уже проснулись?');
if (t=12) then
  writeln ('Не пора обедать?');
if (t>=18) then
  writeln ('Ещё не вечер!')
else
  writeln ('Как работается?')
end.