Дан одномерный массив a[n]. известно что в нём имеется - вопрос №86803310 от gabadunka 11.04.2021 04:24

Question

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

gabadunka · 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....