Напишите программу, которая заполняет массив из 10 элементов случайными числами на отрезке [–2; 2] и находит произведение ненулевых элементов.
PASCAL
Заранее спасибо.
Ответы
Ответ дал:
0
##
var a := ArrRandom(10, -2, 2);
a.Println;
a.Where(t -> t <> 0).Product.Print
Приложения:

Вас заинтересует
2 года назад
2 года назад
2 года назад
2 года назад
7 лет назад
7 лет назад
9 лет назад
https://znanija.com/task/41185517