Var a: integer;begin read(a); if (a >= 1) and (a <= 31) then write(a,' ',1); if (a >= 32) and (a <= 59) then write((a - 31),' ',2); if (a >= 60) and (a <= 90) then write((a - 59),' ',3); if (a >= 91) and (a <= 120) then write((a - 90),' ',4); if (a >= 121) and (a <= 151) then write((a - 120),' ',5); if (a >= 152) and (a <= 181) then write((a - 151),' ',6); if (a >= 182) and (a <= 212) then write((a - 181),' ',7); if (a >= 213) and (a <= 243) then write((a - 212),' ',8); if (a >= 244) and (a <= 273) then write((a - 243),' ',9); if (a >= 274) and (a <= 304) then write((a - 273),' ',10); if (a >= 305) and (a <= 334) then write((a - 304),' ',11); if (a >= 335) and (a <= 365) then write((a - 334),' ',12); readln; readlnend.
1) Кит - это млекопитающее (истина)
2) Все клетки имеют ядро (ложь)
География:
1) Франция располагается на материке Евразия (истина)
2) Крым принадлежит Украине (ложь)
Информатика:
1) В двоичной системе счисления используются тольку нули и единицы (истина)
2) В одном гигабайте 200 мегабайт (ложь)
История:
1) Великая Октябрьская революция произошла 25 октября (7 ноября) 1917 года (истина)
2) Вторая мировая война началась в 1941 году (ложь)
Математика:
1) Число, возведенное в четную степень, всегда будет положительно (истина)
2) Два умножить на три равно десять
Литература:
1) Произведение "Отцы и дети" принадлежит перу Тургенева (истина)
2) Одна из значимых героинь поэмы "Мертвые души" - Анна Каренина (ложь)