В одномерном массиве, состоящем из n вещественных элементах. Вычислить произведение положительных элементов массива. Написать программу на языке Паскаль.

Ответ

Автор - KnowsUser1

Ответ:

PascalABC.NET

begin

var n := ReadInteger('укажите длину массива: ');

var A := ReadArrReal('Вводи: ',n);

A.Where(x-> x>0).Product.Println;

end.

Предыдущий вопрос Следующий вопрос

Сервис носит ознакомительный характер, вся информация, а в частности вопросы и ответы, которые задают и отвечают пользователи.