Среди 30 элементов числовой последовательности 3-3 * cos (3 * n * n) выведите ** экран:...

Question

Среди 30 элементов числовой последовательности 3-3 * cos (3 * n * n) выведите на экран: произведение положительных элементов ПАСКАЛЬ!

Comments

Странное условиею Любой человек, знакомый с основами математики, сразу скажет, что все элементы тут положительные.

Answer 1

begin

 SeqGen(30, n -> 3 - 3 * Cos(3 * n * n), 1)

     .Where(p -> p > 0).Product.Print

end.

---