Задание 1 Вариант 2 Самостоятельная работа 4 ГДЗ Рабочая тетрадь Босова 11 класс (Информатика)

Ниже вариант решения задания из учебника Босова, Босова, Аквилянов 11 класс, Бином:

ВАРИАНТ 2

1. Напишите программу. Заполните массив В из 12 элементов так, чтобы первый элемент был равен 1, а каждый следующий — произведению его номера и значения предыдущего элемента.

По результатам работы программы заполните таблицу:

В[1] = В[4] = В[7] = В[10]=

В[2] = В[5] = В[8] = В[11] =

В[3] = В[6] = В[9] = В[12] =

program s4_v2_1;

var

b: array[1..12] of integer;

i: integer;

begin

writeln(taskввод массиваtask);

b[1] := 1;

for i := 2 to 12 do

begin

b[i] := i * b[i - 1];

writeln(i, task task, b[i])

end;

end.