Por cierto, para compensar el gasto de los variants, podemos ahorrarnos una variable:
Código Delphi
[-]
var
s, t: Variant;
begin
s:= VarFMTBcdCreate('1', 21, 0);
t:= VarFMTBcdCreate('1', 21, 0);
while Length(s + t) <= 20 do
begin
t := s + t;
s := t - s;
end;
Edit1.Text := t;
end;
Si no te gustan los variants entonces no te gustará programar con php. Sin embargo a mi cada vez me gustan más los lenguajes no tipificados, es taaan cómodo programar sin tener que declarar todo.
// Saludos