const n = 100000;var i, j : LongInt; begin for i := 1 to n-1 do for j := i+1 to n do begin endend.
Standard input is empty
Standard output is empty
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!