begin var a := Arr(1bi,2bi,4bi); Assert(a.Sum = 7bi); Assert(a.Product = 8bi); var lst := new List(); lst.Sum; end.