Malanim
6 год назад
оставить программу ввода величины времени суток t (0<=t<=24)и выдачи текста: "Вы уже проснулись?"-если t<10 "Не пора ли обедать?"-если t=12 "Еще не вечер!"-если t>=18 "Как работается?"-в остальных случаях.
ОТВЕТЫ
Богдана
Oct 24, 2020
var
t:integer;
begin
Write('t='); Read(t);
case t of
0..9:Writeln('Вы уже проснулись?');
12:Writeln('Не пора ли обедать?');
18..24:Writeln('Еще не вечер!');
else Writeln('Как работается?')
end
end.
t:integer;
begin
Write('t='); Read(t);
case t of
0..9:Writeln('Вы уже проснулись?');
12:Writeln('Не пора ли обедать?');
18..24:Writeln('Еще не вечер!');
else Writeln('Как работается?')
end
end.
944
Смежные вопросы:
