---

function Even(x: integer): boolean;
begin
  Result := x mod 2 = 0
end;
begin
  writeln(Even(3));
  writeln(Even(4));
  writeln(Even(7));
end.