Помогите составить программу с помощью которой можно было бы ввести номер месяца,а программа бы ответила к какому времени года соответствует этот месяц(Паскаль)

Var
month:integer;
begin
write(Введите номер месяца: );
readln(month);
if month = 12 or month = 1 or month = 2 then
writeln(Зима);
if month gt;= 3 and month =lt;5 then
writeln(Весна);
if month gt;= 6 and month =lt;8 then
writeln(Лето);
if month gt;= 9 and month =lt;11 then
writeln(Осень);
end.