Ideone.com

fork download

copy

program vreme;
var
i,m,r:integer;
begin
i:=3; 
for m:=3 to 7 do begin
r:=i*m;
writeln(r);
end;
end.

Success #stdin #stdout 0.01s 4112KB

stdin

copy

Standard input is empty

stdout

copy

https://ideone.com/8deqr

language:

Pascal (gpc 20070904)

created:

visibility:

public

Share or Embed source code

The brand new service which powers Ideone!

Widget for compiling and running the source code in a web browser!