RosettaCodeData/Task/Apply-a-callback-to-an-array/PascalABC.NET/apply-a-callback-to-an-array.pas

begin
  var a := Arr(1..10);
  a := a.Select(x -> x * x).ToArray;
  a.ForEach(x -> Print(x));
end.