for var i:integer; begin for i:=10 to 20 do writeln(i,'^3 = ', i*i*i); end. while var i:integer; begin i:=10; while i<=20 do begin writeln(i,'^3 = ', i*i*i); inc(i); end; end. repeat var i:integer; begin i:=10; repeat writeln(i,'^3 = ', i*i*i); inc(i); until i>20; end.
var i:integer;
begin
for i:=10 to 20 do
writeln(i,'^3 = ', i*i*i);
end.
while
var i:integer;
begin
i:=10;
while i<=20 do
begin
writeln(i,'^3 = ', i*i*i);
inc(i);
end;
end.
repeat
var i:integer;
begin
i:=10;
repeat
writeln(i,'^3 = ', i*i*i);
inc(i);
until i>20;
end.