program ideone; var i: integer;begin for i := 0 to 0 dobegin writeln(i);end; end.
Standard input is empty
0
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!