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

Question

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

svetlana485 · 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);...