Помогите пожалуйста!!! Практическая работа №11 в программе паскаль. Задача №7 Выводится номер месяца.Вывести пору года для этого месяца (1 - зима, 3 - весна, 8 - лето) Заранее спасибо за помощь)

Program n1;
var a: integer;
begin
write(введите номер месяца: );
readln(a);
if( agt;=1) and (alt;3) then writeln(зима);
if(agt;=3) and (alt;6) then writeln(весна);
if (agt;=6) and (alt;9) then writeln(лето);
if(agt;=9) and (alt;13) then writeln(осень);
end.