Часть 2. Задача: Вывести на экран квадраты и кубы целых чисел от 1 до 9.

Эта задача требует написания программы, которая будет перебирать числа от 1 до 9 и для каждого числа вычислять его квадрат и куб, а затем выводить результат.

Логика решения:

1. Нам нужно пройти по всем числам от 1 до 9. Для этого идеально подходит цикл For.
2. Внутри цикла для каждого числа i нужно вычислить его квадрат (i * i или i^2) и куб (i * i * i или i^3).
3. Полученные значения квадрата и куба нужно вывести на экран. Обычно это делается с помощью процедуры Writeln.

Примерный код на Паскале:

program PrintSquaresAndCubes;

var
  i: integer;
  square, cube: integer;

begin
  writeln('Число | Квадрат | Куб');
  writeln('--------------------');
  for i := 1 to 9 do
  begin
    square := i * i;
    cube := i * i * i;
    writeln(i:5, square:10, cube:10);
  end;
end.

Пояснение к коду:

• program PrintSquaresAndCubes; — объявление имени программы.
• var i: integer; square, cube: integer; — объявление переменных. i будет использоваться как счетчик цикла, а square и cube для хранения результатов.
• begin ... end. — основная часть программы.
• writeln('Число | Квадрат | Куб'); writeln('--------------------'); — вывод заголовка таблицы.
• for i := 1 to 9 do begin ... end; — цикл, который выполнится 9 раз. Переменная i последовательно примет значения от 1 до 9.
• square := i * i; — вычисление квадрата числа i.
• cube := i * i * i; — вычисление куба числа i.
• writeln(i:5, square:10, cube:10); — вывод текущего числа i, его квадрата и куба. Цифры после двоеточия (например, :5) задают ширину поля вывода для выравнивания чисел в столбцах.

Пример вывода программы:

Число | Квадрат | Куб
--------------------
    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