Вопрос задан 27.02.2019 в 16:48. Предмет Информатика. Спрашивает Айткалиев Ерсултан.

Найти произведение элементов массива A, которые меньше некоторого числа B. Вывести на печать

исходный массив и значение произведения.
0 0
Перейти к ответам

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

Внимание! Ответы на вопросы дают живые люди. Они могут содержать ошибочную информацию, заблуждения, а также ответы могут быть сгенерированы нейросетями. Будьте внимательны. Если вы уверены, что ответ неверный, нажмите кнопку "Пожаловаться" под ответом.
Отвечает Кошкина Катерина.
Program massiv;
var a: array[1..10] of integer;
b,i,p: integer;
begin
p:=1;
for i:=1 to 10 do
begin
write ('Введите a[',i,']=');
readln (a[i]);
end;
writeln ('Введите число');
readln (b);
for i:=1 to 10 do
begin
if a[i]<b then
p:=p*a[i];
end;
for i:=1 to 10 do
write (a[i],' ');
writeln;
writeln ('Произведение элементов, меньших ',b,', равно ',p);
end.
0 0
Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.

Для нахождения произведения элементов массива A, которые меньше заданного числа B, можно использовать следующий код на языке Python:

```python A = [1, 2, 3, 4, 5, 6] # Исходный массив B = 4 # Заданное число

product = 1 # Инициализируем переменную для хранения произведения

for num in A: if num < B: product *= num

print("Исходный массив A:", A) print("Произведение элементов меньше", B, "равно:", product) ```

В данном коде мы проходим по каждому элементу массива A и проверяем, является ли он меньше заданного числа B. Если элемент удовлетворяет этому условию, то мы умножаем его на переменную `product`. В конце выводим исходный массив A и значение произведения.

Пример вывода: ``` Исходный массив A: [1, 2, 3, 4, 5, 6] Произведение элементов меньше 4 равно: 6 ```

Пожалуйста, обратите внимание, что в данном примере мы использовали фиксированный массив A и число B для наглядности. В реальной ситуации вам нужно будет задать свой массив A и число B в соответствии с вашими требованиями.

0 0

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

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

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