program vreme;vari,m,r:integer;beginfor i:=3 to 7 do beginfor m:=3 to 7 dor:=i*m;writeln(r);end;end.
Standard input is empty
21 28 35 42 49
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!