Question

Задание 4.Составте программу ,выводящую на экран числа от 1 до 10 , по одному числу в строке.Задание 5.Дополните программу из задания 4 так , чтобы на экран выводились числа от 1 до 10,а также квадраты и кубы этих чисел в следующем виде: 1 1 1 2 4 8 3 9 27... ... ... 10 100 1000ПОМОГИТЕ ПОЖАЛУЙСТА,ЗАДАНИЕ 4 ПИСАТЬ НЕ НУЖНО !ПОСТАВЛЮ ЛУЧЩИЙ ОТВЕТ И "СПАСИБО"

Answer 1

Var i :integer;
begin
For i:=1 to 10 do
writeln(i,' ',sqr(i),' ',i*sqr(i));
end. 

Answer 2

Конечно, вот решение для задания 5:

for i in range(1, 11):
    print(i, i**2, i**3)

Эта программа использует цикл `for` для перебора чисел от 1 до 10. Внутри цикла выводятся число, его квадрат и его куб, разделенные пробелами. Результат программы будет выглядеть так:

1 1 1
2 4 8
3 9 27
4 16 64
5 25 125
6 36 216
7 49 343
8 64 512
9 81 729
10 100 1000

Надеюсь, это поможет! Если у вас возникнут еще вопросы, пожалуйста, дайте мне знать.