Дан одномерный массив a[n]. известно что в нём имеется - вопрос №08679829 от moskalenkovlad1 18.09.2021 03:27

Question

Информатика: Дан одномерный массив a[n]. известно что в нём имеется 0. найти сумму всех элементов включительно до 0. в паскале

moskalenkovlad1 · Answer

Program naconecto;const n=5;varA:array[1..n] of integer;i,sum:integer;BEGINsum:=0;randomize;for i:=1 to n do  begin    a[i]:=random(-5,5);    if a[i] 0 then      begin        sum:=sum+1;      end    else      begin        break;      end;  end;writeln( cyMMa= ,sum);END....