Составить программу подсчёта количества элементов одномерного массива, значение которого...

Question

Составить программу подсчёта количества элементов одномерного массива, значение которого (не элементов, а массива) превышает 10
(pascal)

Answer 1

//PascalABC.NET
//Версия 3.3, сборка 1611 (06.01.2018)

begin
  var a:=ArrRandom(Random(10,50),-100,100); a.Println;
  Println('Количество:',a.Length);
end.

Пример:
-39 93 -52 -76 72 -12 58 10 35 28 53 -56 -59 -84 6 39 26 -6 -92 -52 -42 -3 35
Количество: 23