Главная Вопросы-ответы Новости О профессиях Тесты IQ, ЕГЭ, ГИА
все темы
все уроки
создана: 15.05.2011 в 21:11 ................................................
Angel7 :
определить число воскресений в 2050 году.первое воскресенье 2 января.написать программу
В 2050 году 365 дней
Можно проверить, что год не высокосный.
....
if (2050 mod 4 = 0) then n:=366 else n:=365;
k:=(n - 2) /7 +1; {кол-во воскресений}
это фрагмент программы