3. запишите без пробелов пропущенную команду в данной программе,
вычисления суммы элементов массива. что делает данная программа?
program s;
var
a: array [1..50] of integer;
i, p: integer;
begin
for i: =1 to 7 do
begin
a[i]=random (30);
end;
for i: =1 to 7 do
р: =p*a[i];
writeln (p);
end.
❤️

ответ:

program s;

var

a: array [1..50] of integer;

i,p,c: integer;

begin

for i: =1 to 7 do

begin

a[i]=random (30);

end;

for i: =1 to 7 do   begin

c: =c+a[i];

р: =p*a[i];

end;

writeln (c);

writeln (p);

end.

объяснение:

вообще программа вычисляла произведение всех элементов массива. теперь вычисляет и сумму всех элементов массива.

4: 2

2|0

1|0

0|1

4₁₀=100₂

10: 2

5|0

2|1

1|0

0|1

10₁₀=1010₂

1996: 2

998|0

499|0

249|1

124|1

62|0

31|0

15|1

7|1

3|1

1|1

0|1

1996₁₀=11111001100 

100.1010.11111001100