дан массив из n элементов(Xi). Найти и напечатать 1. элементов массива

PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018

Внимание! Если программка не работает, обновите версию!

begin

 var a := ArrRandom(ReadInteger('n='), -50, 50);

 a.Println;

 Println('Частей, наименьших 30:', a.Where(t -gt; t lt; 30).Count);

 Println('Сумма частей, великих 12:', a.Where(t -gt; t gt; 12).Sum);

end.

n= 15

3 -14 -47 6 -28 -41 -24 -11 36 41 35 13 3 48 16

Частей, наименьших 30: 11

Сумма частей, больших 12: 189