program ideone; var I: Integer;begin For I := 0 To 10 Do writeln(I);end.
Standard input is empty
0 1 2 3 4 5 6 7 8 9 10
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!