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

tatianadettcel tatianadettcel    3   25.05.2019 23:30    1

Ответы
petukhova05 petukhova05  22.06.2020 07:32
For i:=1 to m do
begin
if (-a[m]<>a[m]) then s:=s+1;
else a[m]:=a[m]*2;
writeln(a[m],' ');
end;
writeln(s);
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика