Что демонстрирует данная операция?Что выйдет в конечном итоге? const
N=25;
var
a:array[1..N] of integer;
i:byte;
sum:integer;
begin
randomize;
for i:=1 to N begin
arr [i]:=random (10)-5;
write (arr[i]:4);
end;
writeLn;
sum:=0;
for i:=1 to N do
if arr [i]>0 then
sum:=sum+arr[i];
writeLn (sum 5);
end. ​

vitaska1971oz3tq3    3   07.04.2021 23:44    1