Есть ответ 👍

Произведение отрицательных элементов массива.

157
470
Посмотреть ответы 2

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


Program gt; var a: array[1..100]of integer; n,i,p: integer; begin read(n); {n-кол-во чисел в массиве} p: =1; for i: =1 to n do begin read(a[i]); {a[i]-элементы массивва} if(a[i]< 0)then p: =p*a[i]; {p-произведение отрицательных элементов массива} end; writeln(p); end.
shubina021
4,6(90 оценок)

ответ самый последний

Популярно: Информатика