[Resolvido] argumentos variáveis

Aí gente, beleza?

Seguinte, to procurando na internet mas não acho nda parecido em Delphi/pascal.

Preciso criar uma função que receba número de argumentos variáveis, desde que sejam do mesmo tipo.

Assim:

Function Variante( dif: Double, x: Integer): Double

var

i: integer;

begin

num_Arg := NumeroArg(dif); // Pega o número de argumentos passados à função

for i:= 0 to (x div num_Arg) do

 dif := dif + 0.1;

 

 result := dif;

end;

Depois eu preciso passar mais argumentos do que o declarado:

valor := Variante(1, 3, 5, 4.0, 100);

Tem como fazer isso em pascal?

Existe função que possamos passar argumentos variáveis em Delphi?