Question

составить программу: даны 10 чисел. Найти их произведение.

ПОМОГИТЕ ПОЖАЛУЙСТА!!!!!!!

Answer 1

import functools

import operator

print(functools.reduce(operator.mul,[int(input()) for i in range(10)]))

Answer 2

program Solution;

var a:Integer;
var i:Integer;
var r:Longint;

begin
r:=1;
for i:=1 to 10 do
begin
read(a);
r:=r*a;
end;
writeln(r);
end.