Código Delphi [-] type Arreglo=array[0..1] of Integer; procedure Func(A:Arreglo); begin // Tu código aqui end;
type Arreglo=array[0..1] of Integer; procedure Func(A:Arreglo); begin // Tu código aqui end;