Дан массив из 7 чисел, которые вводятся с клавиатуры, Вывести на экран значения элементов массива. Сосчитать произведение всех ненулевых элементов массива.
Pascal Abc.net

Полная глупость: вводить с клавиатуры данные и тут же их выводить.// PascalABC.NET 3.2, сборка 1417 от 28.03.2017// Внимание! Если программа не работает, обновите версию!begin  Writeln('П=',ReadArrReal('Введите 7 чисел:',7).Println.Where(x->x<>0).      Aggregate(1.0,(x,y)->x*y))end.ПримерВведите 7 чисел: 3.5 -18.3 0 14 174.32 -15 0.173.5 -18.3 0 14 174.32 -15 0.17П=398597.4972