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

Varn:byte;
Begin writeln('Введите номер поры года');
readln(n);
case n of
1:writeln('зима');
2: writeln('весна');
3: writeln('лето');
4: writeln('осень');
else
writeln('неправильно ввели номер поры года');
end;
End.