Componentes.Terceros.jvcl/internal/3.36/1/examples/JvInterpreterDemos/JvInterpreterTest/samples/sample - array read.pas

var
  A: array[1..10] of integer;
begin
  Result := A[10];
end;