Помогите пожалуйста, в паскале, в помощью IF. Требуется определить, является ли данный...

Question

Помогите пожалуйста, в паскале, в помощью IF.
Требуется определить, является ли данный год високосным. (Напомним, что год является високосным, если его номер кратен 4, но не кратен 100, а также если он кратен 400.). Выведите сообщение на экран «год високосный» или «год не високосный».

Answer 1

Var  a: integer;begin  read(a);  if (a mod 4 = 0) and (a mod 100 <> 0) or (a mod 400 = 0) then     writeln('Да') else    writeln('Нет');end.

Comments

var
a: integer;

begin
read(a);
if (a mod 4 = 0) and (a mod 100 <> 0) or (a mod 400 = 0) then
writeln('YES') else
writeln('NO');
end.

---

Дeбил, ты скобки пропустил.

---

Хотя и так работает, можешь оставить.