Question

Написать код программы на языке Pascal для массива:
Одномерный массив М, содержит 5 вещественных чисел. Найти произведение элементов массива.

Answer 1

//PascalABC.NET версия 3.2, сборка 1467
//Если программа не запускается, то обновите версию
begin
    var m := ArrRandomReal(5, 1, 10); // автоматический ввод данных
    Println(m);
    Println(m.Aggregate(1.0, (x, y)-> x * y));
end.