В одномерном массиве найти количество положительных элементов.

Question

В одномерном массиве найти количество положительных элементов.

Answer 1

//PascalABC.NET 3.4.2

begin

 readarrinteger('Введите элементы массива:', readinteger('Введите размер массива:')).Where(x -> x > 0).Count.Print();

end.

Comments

и да про то что пользователи должны вводить не сказано это лишния функция программы

---

Я же сказал, что в условии не сказано как заполнять массив, поэтому его можно вводить как угодно

---

с чего такая уверенность?