массив состоит из 12 элементов(случайные числа от 3 до 10). найти произведение его элементов.
Answers & Comments
Vatnique
Program p1; const n=12; var a:array[1..12] of integer;i:integer;p:biginteger; begin p:=1; randomize; for i:=1 to n do begina[i]:=random(3,10); end; for i:=1 to n do begin p:=p*a[i]; end; writeln(p); end.
Answers & Comments
const n=12;
var a:array[1..12] of integer;i:integer;p:biginteger;
begin
p:=1;
randomize;
for i:=1 to n do
begina[i]:=random(3,10);
end;
for i:=1 to n do
begin
p:=p*a[i];
end;
writeln(p);
end.