1) Напечатайте таблицу кубов чисел: -10, -8, -6, ... 10.2)Определите итог исполнения

1) Напечатайте таблицу кубов чисел: -10, -8, -6, ... 10.
2)Обусловьте результат исполненья программки (без компьютера)
begin
s:=0;x:=10;
repeat
s:=s+x;
x:=x+10;
untill xgt;12;
writein('s=',s);
writein('x=',s);
end.

Леночка Гловко 2019-08-27 04:16:11

var i, k: integer;begink:=-10;i:=21;for i:=1 to i dobeginwriteln (k,' ',k*k*k);k:=k+1;end;end.