По введенному номеру месяца определяется время года (5-весна,10-осень) НАПИШИТЕ ПРОГРАММУ НА ЯЗЫКЕ ПАСКАЛЬ

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.