var i, n, max: integer; begin max:=0; while (n<>0) and (i<=1000) do begin i:=i+1; if (n mod 2 = 0) and (n>max) then max:=n end; writeln(max); end.