Дан одномерный массив a[n]. известно что в нём - вопрос №86803310 от arinaohtova 11.06.2022 05:36

Question

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

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