program e; var e:integer; begin e := 1; while true do begin writeln('e'); end; end.