Есть ответ 👍

18.874.368(бит) сколько будет кбайт ОЧЕНЬ НАДО.

187
240
Посмотреть ответы 2

Ответы на вопрос:


18.87.36(кбит) Надеюсь что правильно, но предупреждаю я не уверен на 100 процентов


ответ:

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.

объяснение:

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

Популярно: Информатика