fork download
  1. var
  2. ch : Char;
  3.  
  4. begin
  5. ch := '0';
  6. WriteLn (ch);
  7. Inc (ch);
  8. WriteLn (ch)
  9. end.
Success #stdin #stdout 0s 276KB
stdin
Standard input is empty
stdout
0
1