Question

Вычислить произведение 12 чисел введённых с клавиатуры и найти кол-во отрицательных среди них, Предмет ОАП помогите​

Answer 1

Ответ:

program z1;

var i,a,k,p:integer;

begin

k:=0;

p:=1;

for i:=1 to 12 do

begin

write('Введите число: ');

readln(a);

if a < 0 then k:=k+1;

p:=p*a

end;

writeln('Произведение чисел: ',p);

writeln('Отрицательных чисел: ',k)

end.

Объяснение:

картинка

если надо вводить большие числа, то изменить описание переменных на

var i,a,k:integer;

p:real;

Answer 2

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

pythonCopy code
# Инициализация переменных
product = 1  # Начальное значение произведения
count_negative = 0  # Начальное количество отрицательных чисел

# Ввод 12 чисел с клавиатуры и выполнение вычислений
for i in range(12):
    try:
        num = float(input(f"Введите число {i + 1}: "))
        product *= num  # Умножаем на введенное число
        if num < 0:
            count_negative += 1  # Увеличиваем счетчик отрицательных чисел
    except ValueError:
        print("Ошибка: Введите корректное число.")

# Вывод результатов
print(f"Произведение введенных чисел: {product}")
print(f"Количество отрицательных чисел: {count_negative}")

Этот код запрашивает у пользователя ввод 12 чисел, умножает их между собой и подсчитывает количество отрицательных чисел. Результаты выводятся на экран.