Помогите написать программу которая по данному натуральному числу от 1 до 2 (номеру месяца) выдает все приходящихся на этот месяц праздничные дни(например, если введено число 1, то; 1 января - новый год , 7 января - Рождество).

Var
  n: integer;

begin
  write(Введите номер месяца (1-12): );
  readln(n);
  case n of
    1: writeln(1 января - Новый год; 7 января - Рождество Христово);
    2: writeln(23 февраля - День защитника Отечества);
    3: writeln(8 марта - Международный женский день);
    5:
      begin
        writeln(1 мая - Праздник Весны и Труда;);
        writeln(9 мая - День победы советского народа в Великой Отечественной войне 1941-19545 годов)
      end;
    6: writeln(12 июня - День России);
    11: writeln(4 ноября - День народного единства)
  end
end.

Тестовое решение:

Введите номер месяца (1-12): 6
12 июня - День России

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.