pascalabcnet/InstallerSamples/WhatsNew/3_7_2/BigIntSumProd.pas

6 lines
191 B
ObjectPascal
Raw Permalink Normal View History

// Методы .Sum, .Average и .Product для последовательности BigInteger
begin
var s := SeqGen(10,i->BigInteger(i)**i);
Print(s.Sum,s.Product,s.Average);
end.