سلام.
تابع Variance در خود دلفی موجود می باشد.
نمونه کد زیر رو امتحان کنید.
کد:
var
arrvar: Array of Double;
begin
  SetLength(arrvar,2);
arrvar[0] := 10;
arrvar[1] := 10.5;
 ShowMessage(FloatToStr(Variance(arrvar)));