pascalabcnet/TestSuite/BigIntSeqSumProduct.pas

7 lines
137 B
ObjectPascal
Raw Normal View History

2020-11-25 17:51:59 +03:00
begin
var a := Arr(1bi,2bi,4bi);
Assert(a.Sum = 7bi);
Assert(a.Product = 8bi);
var lst := new List<integer>();
lst.Sum;
end.