Написать программу которая запрашивает у пользователя номер месяца и выводит на экран соответствующее название времени года. В случае если пользователь укажет недопустимое число, программа должна вывести сообщение “Ошибка вывода данных. Повторите ввод” — Pascal(Паскаль)

program vremya_goda;
uses crt;
var
n:integer;
begin
  clrscr;
  writeln('введите номер месяца');
  writeln('для выхода нажмите "0"');
  repeat
  readln(n);
  case n of
        0  : writeln('выход из программы');
    1,2,12 : writeln('зима');
    3,4,5  : writeln('весна');
    6,7,8  : writeln('лето');
    9,10,11: writeln('осень');
    else writeln('"Ошибка ввода данных"');
  end;
  until n=0;
  textcolor(10);
  writeln('программа работу закончила!');
  readln;
end.