Требуется определить, является ли данный год високосным. (напомним, что год является високосным, если его номер кратен 4, но не кратен 100, а также если он кратен 400.) примеры входные данные 2007 выходные данные no входные данные 2000 выходные данные yes
var n:integer; begin assign (input,'input.txt'); assign(output,'output.txt'); reset(input); rewrite(output); readln(n); if ((n mod 4)=0) and ((n mod 100)<>0) or ((n mod 400)=0) then writeln('YES') else writeln('NO');
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
