Дано n чисел. Создать новый массив из чисел меньших заданного числа x. На языке Паскаля и, объяснить(не обязательно)

begin

 var n := 10;

 var x := 5;

 var a := Arr(0, 1, 2, 3, 4, 5, 6, 7, 8, 9);

 var b := a.Where(y -> y < x).ToArray;

 b.Println;//0 1 2 3 4

end.