Вводится пора года. Вывести название месяцев для этой поры года

Информатика, 9 класс, операторы ветвления

Varn:byte;

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

readln (n);

case n of

1:writeln ('зима');

2: writeln ('весна');

3: writeln ('лето');

4: writeln ('осень');

else

writeln ('неправильно ввели номер поры года');

end;

End.