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

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

Программы на скринах, на одной нужно самому дробные числа вводить на другой они сами генерируются