В одномерном массиве, состоящем из n реальных элементов, вычислить:1) творение

В одномерном массиве, состоящем из n реальных частей, вычислить:
1) творение положительных элементов массива

Задать свой вопрос
1 ответ
// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программка не работает, обновите версию!

begin
  var a:=SeqRandom(ReadInteger('n='),-99,99).Select(t-gt;t/10).ToArray;
  a.Println;
  Writeln('П = ',a.Where(t-gt;tgt;0).Aggregate(1.0,(x,y)-gt;x*y))
end.

Пример
n= 15
-7.4 -0.9 -2.6 6.9 2.7 -7 7.8 3.6 7.6 -5.6 -1.4 8.4 -6.1 6.8 -3.1
П = 227097.1842048
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт