Дано целое число га (1

Question

Информатика

Ина

2 января, 12:14

Дано целое число га (1

+5

Ответы (1)

Знаете ответ на вопрос?

Кир · Answer 1

Var n:integer;

begin

writeln ('Введите порядковый номер времени года') ;

readln (n) ;

case n of

1:writeln ('Декабрь, Январь, Февраль') ;

2:writeln ('Март, Апрель, Май') ;

3:writeln ('Июнь, Июль, Август') ;

4:writeln ('Сентябрь, Октябрь, Ноябрь') ;

end;

end.