Напиши программу заполнения массива из 10 элементов с помощью формулы (I + 1)*3 и вывода его на экран. в паскале

Рассмотрим, как написать программу на языке Pascal, которая заполняет массив из 10 элементов с помощью формулы (I + 1) * 3 и выводит его на экран. Давайте разберем это пошагово. 1. **Объявление массива и переменных:** Мы создаем массив, который будет хранить 10 элементов, и также объявим переменную для цикла. 2. **Заполнение массива:** В цикле мы будем заполнять массив по заданной формуле: (I + 1) * 3, где I – это индекс элемента в массиве. 3. **Вывод массива:** После заполнения массива мы выведем его элементы на экран. Вот пример программы на Pascal, которая выполняет эти действия: ```pascal program FillArray; var arr: array[1..10] of integer; // Объявление массива i: integer; // Переменная цикла begin // Заполнение массива по формуле for i := 1 to 10 do begin arr[i] := (i + 1) * 3; // Применяем формулу end; // Вывод элементов массива на экран writeln('Элементы массива:'); for i := 1 to 10 do begin write(arr[i], ' '); // Выводим элементы массива end; writeln; // Для перехода на новую строку end. ``` ### Пояснение к коду: 1. **Объявление массива:** `arr: array[1..10] of integer;` создает массив целых чисел, состоящий из 10 элементов. Индексы начинаются с 1 и заканчиваются 10. 2. **Цикл заполнения:** - `for i := 1 to 10 do` запускает цикл от 1 до 10. - `arr[i] := (i + 1) * 3;` применяет формулу, чтобы заполнить массив значениями. 3. **Вывод массива:** - После заполнения массива используется второй цикл `for`, который проходит по всем элементам массива и выводит их на экран с помощью команды `write`. Теперь, выполнив программу, вы получите массив, заполненный значениями по формуле, и они будут выведены на экран. Например, элементы массива будут равны: 6, 9, 12, 15, 18, 21, 24, 27, 30, 33. Надеюсь, это помогло понять, как создавать и обрабатывать массивы в Pascal! Если есть дополнительные вопросы, не стесняйтесь задавать!