procedure gnat.io.a is begin
put((1..8000=>'9')&ascii.lf&(1..8000=>'9'));end;