Напишите программку, которая получает номер месяца и выводит его заглавие и

Var mesyac:integer;
begin
writeln(введите номер месяца);
readln(mesyac);
if mesyac = 12 or 1 or 2 then
writeln (зима);
if mesyac = 3 or 4 or 5 then
writeln (весна);
if mesyac = 6 or 7 or 8 then
writeln (лето);
if mesyac = 9 or 10 or 11 then
writeln (осень)
else writeln(ошибка, не верно введен месяц);
end.