var i : integer;
Begin
i := 11;
while i>=4 do begin
writeln(i*i*i);
i := i-1;
end;
end.
Объяснение: Можно и без dawnto.
var i : integer;
Begin
i := 11;
while i>=4 do begin
writeln(i*i*i);
i := i-1;
end;
end.
Объяснение: Можно и без dawnto.