Ввести номер месяца и номер дня, вывести число дней, оставшихся до нового года. пример: введите номер месяца 12 введите день 25 до нового года осталось 6 дней.

Const  days: array[1..12]of integer=(31,28,31,30,31,30,31,31,30,31,30,31); var m,d,k,i: integer; begin writeln('введите номер месяца'); readln(m); writeln('введите день'); readln(d); k: =0; for i: =1 to m-1 do k: =k+days[i]; k: =365-k-d; writeln('до нового года осталось ' ,k,' дней (день/дня)'); end. пример: введите номер месяца 2 введите день 12 до нового года осталось 322 дней (день/дня)