Cómo lograr que un mismo procedimiento funcione para varios arreglos?

[hal1967]

¿Por qué pasan un parámetro de nombre dim?

¿No debería bastar con usar low y high?

algo como

for i:= low(v) to high(v) do
               ...