складіть програму яка перевіряє, чи є рік високосним. для користувача передбачте...

Question

складіть програму яка перевіряє, чи є рік високосним. для користувача передбачте відповідне сповіщення

Answer 1

Var
    y: integer;

begin
    read(y);
    writeln((y mod 400 = 0) or ((y mod 4 = 0) and (y mod 100 <> 0)));
end.