Подсчитайте произведение отрицательных элементов массива, заполненного заранее известными значениями -24, 53, 76, -2, -43

Подсчитайте произведение отрицательных элементов массива, заполненного заранее известными значениями -24, 53, 76, -2, -43
Гость
Ответ(ы) на вопрос:
Гость
var a:array[1..5] of integer=(-24,53,76,-2,-43); i,p:integer; begin p:=1; for i:=1 to 5 do if a[i]<0 then p:=p*a[i]; writeln('p = ',p); end. Результат: p = -2064
Не нашли ответ?
Ответить на вопрос
Похожие вопросы