Сделать на Паскале №1. Вычислить сумму и произведение - вопрос №114924311 от ElizabetSnow 23.03.2023 10:49

Question

Информатика: Сделать на Паскале №1. Вычислить сумму и произведение элементов массива, количество элементов которого равно 50, элементы массива задаются случайным образом. Результат вывести на экран.

ElizabetSnow · Answer

// PascalABC.NETbegin    var a := ArrRandom(50, -99, 99);    a.Println;    Println( Сумма , a.Sum);    Print( Произведение , a.Select(p - real(p)).Product)end....