program sum;
{$APPTYPE CONSOLE}
uses SysUtils;
var y: integer;
begin
    write('year ?: ');
    readln(y);
    if ((y mod 400) = 0) or (((y mod 100) <> 0) and ((y mod 4) = 0)) then begin
          writeln(y, ' is leap year');
    end
    else begin
          writeln(y, ' is NOT leap year');
    end;
    readln
end.