Var n:integer;
begin
writeln(Введите порядковый номер времени года);
readln(n);
case n of
1:writeln(Декабрь,Январь,Февраль);
2:writeln(Март,Апрель,Май);
3:writeln(Июнь,Июль,Август);
4:writeln(Сентябрь,Октябрь,Ноябрь);
end;
end.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.