Помогите пожалуйста с информатикой, буду благодарна за помощь. Написать программу для решения задач на языке Quick Basic.
Найти произведение всех отрицательных элементов массива В(15).

Будем считать, что массив В уже в памяти компьютера. Тогдаclsresult = 1for i=0 to 15       if b(i)<0 then result = result * b(i)nextprint "Произведение отрицательных членов массива В равно"print result