Name month

var x : Integer;
begin

readln(x);
case x of
  1: writeln('Январь');
  2: writeln('Ферваль');
  3: writeln('Март');
  4: writeln('Апрель');
  5: writeln('Май');
  6: writeln('Июнь');
  7: writeln('Июль');
  8: writeln('Август');
  9: writeln('Сентябрь');
  10: writeln('Октябрь');
  11: writeln('Ноябрь');
  12: writeln('Декабрь')
else
  writeln('Вы не ввели число или число не верно!');
end;

end.