Из Паскаля в Кумир var x,n: integer;
begin
write('n = ');
readln(n);
x := 1;
while sqr(x) < n do begin
write(sqr(x),' ');
x := x + 1
end;

readln
end.

Условия задачи:Выведите все точные кубы натуральных чисел и сумму кубов, не превосходящие данного числа

1. = c) прикладная программа, предназначенная для хранения, обработки и организации расчетов

2. = b) множество нумерованных строк и поименованных буквами латинского алфавита столбцов

3. = b) лист

4. = a) ячейка

5. = c) выделенная ячейка электронной таблицы

6. = a) совокупность выделенных ячеек, которые образуют в таблице прямоугольную область

7. = c) =B3*C4

8. = b) выбрана ширина ячейки, которая не позволяет разместить в ней результаты определенных вычислений

9. = b) =$A$1*A2+B3

10. = a) A

11. = b) 18

12. = d) Al:B2

13. = d) все перечисленные

14. = 1e 2д 3в 4г 5а 6б

1. = c) прикладная программа, предназначенная для хранения, обработки и организации расчетов

2. = b) множество нумерованных строк и поименованных буквами латинского алфавита столбцов

3. = b) лист

4. = a) ячейка

5. = c) выделенная ячейка электронной таблицы

6. = a) совокупность выделенных ячеек, которые образуют в таблице прямоугольную область

7. = c) =B3*C4

8. = b) выбрана ширина ячейки, которая не позволяет разместить в ней результаты определенных вычислений

9. = b) =$A$1*A2+B3

10. = a) A

11. = b) 18

12. = d) Al:B2

13. = d) все перечисленные

14. = 1e 2д 3в 4г 5а 6б