Регистрация
veronika1217
17.10.2022 19:39
Информатика
Есть ответ 👍

Написать программу для поиска произведения элементов массива, заданных случайным образом. Массив должен состоять из 15 элементов. мне очень нужно​

259
357
Посмотреть ответы 2

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

mila525784
mila525784
4,5(4 оценок)

var a:array[1..15] of integer;

i,p:integer;

begin

p:=1;

for i:=1 to 15 do begin

 a[i]:=random(-10,10);

 p*=a[i];

 write(a[i], ' ');

 end;

writeln();

writeln(p);

end.

var a:array[1..15] of integer;

i,s:integer;

begin

for i:=1 to 15 do begin

 a[i]:=random(-10,10);

 s+=a[i];

 write(a[i], ' ');

 end;

writeln();

writeln(s);

end.

Объяснение:

Попробуй эту, на паскале по идее должно работать

nastyabodrova1
nastyabodrova1
4,7(59 оценок)
Var a, n, i, s  :   integer; begin read (n); for i: =1  to n do    begin   read (a);   s: =s+a;   end; write (s); end. в последовательном соединении  p.s. надеюсь на и лучший ответ.

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