Дан массив из N элементов отыскать сумму частей массива являющихся трехзначными

Какой диапазон значений у N? (паскаль - таковой язык, что без подключения директорий создается массив только с определенной, данной в программке длиной (не вводимой с клавиатуры))

begin

 var n := ReadInteger();

 var a := ReadArrInteger(n);

 var Sum := 0;

 foreach var x in a do

 begin

   var s := x.ToString;

   if (s.Length = 3) and

      (s[1] lt; s[2]) and

      (s[1].ToDigit + s[2].ToDigit + s[3].ToDigit gt; 10)

     then Sum += x

 end;

 Print(Sum)

end.