Question

В массиве В(10) элементы лежат в диапазоне от -15 до 15. Определите сумму положительных элементов массива. Помогите пожалуйста!!

Answer 1

Цикл:

for i:=1 to 10 do if B(i)>0 then sum:=sum+B(i);