Одномерный массив состоит из 15 элементов. Массив заполняется случайными числами из диапазона от 7 до 62. Выведите массив на экран в строчку и найдите произведение элементов массива.

Я в первый рас задал вопрос , и теперь по просту трачу свое время на дискуссию с вами. Спасибо вам за ваше решение!

хорошо

*более

Да, спасибо

// PascalABC.NET 3.2, сборка 1383 от 09.02.2017// Внимание! Если программа не работает, обновите версию!begin  var a:=ArrRandom(15,7,62); a.Println;  Writeln('Произведение элементов ',      a.Aggregate(BigInteger(1),(x,y)->x*y))end.Пример24 43 36 54 9 37 42 9 34 14 24 42 21 44 16Произведение элементов 1791312802990350925824

Вот тривиальное решение.var  a:array [1..15] of integer;  i:integer;  p:BigInteger;beginp:=1;for i:=1 to 15 do  begin  a[i]:=random(7,62);  p:=p*a[i];  write(a[i],'; ');  end;writeln;writeln('Произведение=',p)end.