fork download
  1. var i, n:integer;
  2. begin
  3. readln(n);
  4. for i:= n downto 1 do
  5. writeln('8');
  6. end.
Success #stdin #stdout 0.01s 252KB
stdin
-1
stdout
Standard output is empty