Информатика ( очень нужно) (Паскаль
1)Составьте программу которая вводит с клавиатуры 6 элементов массива D и вычисляет их произведение
2)Составьте программу которая формирует (сгенерирует) массив B из 9 случайных целых чисел из промежутка (5,10) и вычисляет сумму элементов промежутка 3

Предыдущий
вопрос Следующий
вопрос

Пример программы на языке Pascal:

Программа для вычисления произведения 6 элементов массива D:

program arrayProduct
va
D: array[1..6] of Integer
i, product: Integer
begi
writeln('Введите 6 элементов массива D:')
for i := 1 to 6 d
readln(D[i])
product := 1
for i := 1 to 6 d
product := product * D[i]
writeln('Произведение элементов массива D: ', product)
end.

Программа для формирования массива B и вычисления суммы элементов промежутка 3:

program arraySum
va
B: array[1..9] of Integer
i, sum: Integer
begi
Randomize
for i := 1 to 9 d
B[i] := Random(6) + 5
sum := 0
for i := 1 to 9 d
begi
if (B[i] >= 3) and (B[i] <= 9) the
sum := sum + B[i]
end
writeln('Массив B:')
for i := 1 to 9 d
write(B[i], ' ')
writeln
writeln('Сумма элементов массива B в промежутке от 3 до 9: ', sum)
end.

Это две простые программы на языке Pascal для работы с массивами. Вы можете скомпилировать и запустить их в вашей среде разработки Pascal.