Используя средства языка Паскаль, в одномерном массиве с 10 элементами...

Question

Используя средства языка Паскаль, в одномерном массиве с 10 элементами Ai=ln((i^3+6i)/(3i+10)) подсчитать количество отрицательных элементов. Вывести массив и результат на экран

Answer 1

PascalABC.NET ₃.₆.₃.₂₅₇₇

Ответ:

• ##  
• var a := ArrGen(10, i -> Ln(((i+1)**3 + 6*(i+1))/(3*(i+1) + 10)));
• a.Println;
• a.Count(x -> x<0).Print</li>

Пример работы: