Дан одномерный массив из 5 элементов. Найти сумму всех положительных элементов массива.

Начало такое

var a: array[1 ... 5] of integer;

Question

Ионич

3 декабря, 05:35

+4

Ответы (1)

Знаете ответ на вопрос?

Сережа · Answer 1

Summa:=0;

for i:=1 to n do

if a[i]mod 2 0 then summa:=summa+a[i];

end.

Дан одномерный массив из 5 элементов. Найти сумму всех положительных элементов массива.Начало такоеvar a: array[1 ... 5] of integer;