Марина
дан массив f (n). найти произведение отрицательных элементов массива
обычный, не паскаль
обычный, не паскаль
а = 1
фор и=1 ту длиннамасива ду
а=а множить ф [и]
а язык какой?
r = 1; f.each do |v| if (v < 0) then r *= v; end;
answer = 1
massiv = (0, -1, 2, -3, 4, -5)
for item in massiv:
if item < 0:
answer *= item
print(answer)
PS
все языки программирования необычные