Вопрос задан 13.07.2023 в 21:38. Предмет Информатика. Спрашивает Сощин Максим.

В одномерном массиве рассчитайте произведение элементов, которые не равняются 0. В отчёт включить

тексты программ, реакции ЭВМ. Заранее большое спасибо!!!
0 0
Перейти к ответам

Ответы на вопрос

Внимание! Ответы на вопросы дают живые люди. Они могут содержать ошибочную информацию, заблуждения, а также ответы могут быть сгенерированы нейросетями. Будьте внимательны. Если вы уверены, что ответ неверный, нажмите кнопку "Пожаловаться" под ответом.
Отвечает Цхе Катя.

Ответ:

program test;

var

 x: Array [1..15] of integer = (-1,0,2,8,0,3,14,56,8,1,-18,-9,-7,-2,-7);

 mult: real;

 i: byte;

begin

 mult:=1;

 for i := 1 to 15 do

 begin

   if (x[i]<>0) then

     mult:=x[i]*mult

 end;

 write('Произведение элементов в массиве: ',mult);

end.

0 0
Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.

Конечно! Вот пример программы на языке Python, которая рассчитывает произведение элементов одномерного массива, исключая элементы, равные нулю:

python
def calculate_product(array): product = 1 for num in array: if num != 0: product *= num return product # Пример вызова функции с массивом my_array = [2, 0, 3, 4, 0, 5] result = calculate_product(my_array) print("Произведение элементов, не равных нулю:", result)

Результат выполнения программы:

Произведение элементов, не равных нулю: 120

В этой программе мы определяем функцию calculate_product, которая принимает одномерный массив в качестве аргумента. Затем мы инициализируем переменную product со значением 1. Затем мы проходим по каждому элементу массива и, если элемент не равен 0, умножаем его на текущее значение product. Наконец, мы возвращаем значение product.

Мы также предоставили пример вызова функции с массивом [2, 0, 3, 4, 0, 5], и результатом является число 120, так как произведение всех элементов, не равных нулю, равно 2 * 3 * 4 * 5 = 120.

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

0 0

Похожие вопросы

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

Задать вопрос