Дан массив a(m), m ≤ 20.найти сумму s его положительных - вопрос №193821920 от Danich20 28.04.2021 10:35

Question

Информатика: Дан массив a(m), m ≤ 20.найти сумму s его положительных элементов. все отрицательные элементы удвоить. вывести на печать исходный массив, переформированный массив и число s.

Danich20 · Answer

For i:=1 to m dobeginif (-a[m] a[m]) then s:=s+1;else a[m]:=a[m]*2;writeln(a[m], );end;writeln(s);...