Ответ:
var x,n:Integer;
begin
Writeln('Введите число месяцев: ');
Readln(n):
x:=n mod 12;
case n of
0: write('Январь');
1: write('Февраль');
и т. д.
11: write('Декабрь');
end;
Readln;
End.
так как 2 дня не влияют на месяц. . а обозначают только 3 число месяца. . то на них вообще забиваем и не используем.... Начало 1990 года я так понимаю - 1 января.. . год кстати тоже побоку.. . ни на что не влияет
Объяснение:
я кнч не знаю в таком ли тебе нужно было формате)