Составить алгоритм и написать программу, которая выводит таблицу кубов первых десяти целых положительных чисел. Процедуру цикла организовать с помощью оператора do while.

Rogram kvadrat;
var i, n: integer;
begin
writeln (Таблица квадратов);
writeln (-----------------);
writeln ( Число Квадрат);
writeln (-----------------);
i:= 1;
n:= 10;
for i:=1 to n do
begin
writeln ( ,i, , sqr(i));
end;
writeln (-----------------);
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.