fork download
  1. program test;
  2.  
  3. var
  4. I, Len: Integer;
  5. begin
  6. Len := 10;
  7.  
  8. for I := 0 To Len - 1 Do //len - 1.
  9. writeln(I);
  10. end.
Success #stdin #stdout 0s 232KB
stdin
Standard input is empty
stdout
0
1
2
3
4
5
6
7
8
9