Question

Помогите пожалуйста вопрос на фото читайте внимательно​

Answer 1

program sls;

var

year : integer;

begin

 readln(year);

 if ((year mod 4 = 0) and (year mod 100 <> 0)) or (year mod 400 = 0) then

 writeln('YES')

 else

 writeln('NO')

end.

Answer 2

Ответ:

ответ на фото надеюсь помог

ну я не уверен если честно