ВОПРОС ПО ПАСКАЛЬ

Помогите на счет задачи на паскале.

Выводит времЯ года по введеному с клавиатуры числу, выходи при нажатии 0.

 

Это как?

 

считываешь дату в формате каомнить типа день/месяц/год
отделяеш месяц от всего что введено вереподишь его в integer и делаешь
case i of
3..5: writeln("весна");
6..8:writeln("лето");
9..11:writeln("осень");
12,1,2:writeln("зима");
end;

 

Проверки валидности нет.
Ехе'шник и исходник тут: _ttp://slil.ru/27661212