Program n_4;var i: integer;const a: array [1..7] of integer= (3,4,-1,5,0,10,-12);beginfor i:= 1 to 7 do write (a[i],'');end.
Standard input is empty
34-15010-12
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!