// Pascal ABC.NET
begin
var a := ReadArrInteger(4);
a.Product.Print
end.
На самом деле задание не шибко грамотное, потому что массив тут совершенно ни к чему и решение такое:
ReadSeqInteger(4).Product.Print
// Pascal ABC.NET
begin
var a := ReadArrInteger(4);
a.Product.Print
end.
На самом деле задание не шибко грамотное, потому что массив тут совершенно ни к чему и решение такое:
begin
ReadSeqInteger(4).Product.Print
end.