pasar tabla entre funciones

[roman]

Para pasar un arreglo estático debes primero declarar un tipo de datos adecuado:

Código Delphi [-]
type
  TMiArreglo = array[1..20] of Integer;

procedure Algo(A: TMiArreglo);
begin
   ...
end;

// Saludos