
Антип
5 год назад
Поскаль Выручите пожалуйста 3. Написать программу определения времени года по номеру месяца
ОТВЕТЫ

Маргарита
Oct 24, 2020
Программа на паскале:
var n:integer;
begin
write('n = ');
readln(n);
case n of
1,2,12: writeln('Зима');
3..5 : writeln('Вечна');
6..8 : writeln('Лето');
9..11 : writeln('Осень');
else writeln('Ошибка ввода');
end;
end.
Пример:
n = 2
Зима
var n:integer;
begin
write('n = ');
readln(n);
case n of
1,2,12: writeln('Зима');
3..5 : writeln('Вечна');
6..8 : writeln('Лето');
9..11 : writeln('Осень');
else writeln('Ошибка ввода');
end;
end.
Пример:
n = 2
Зима
371