pascalabcnet/TestSuite/bigint.pas
Бондарев Иван e6e67c193c initial commit
2015-05-14 21:35:07 +02:00

8 lines
176 B
ObjectPascal

begin
var a : BigInteger := 5;
var b : BigInteger := 3;
assert(a+b=BigInteger(8));
assert(a-b=BigInteger(2));
assert(a*b=BigInteger(15));
var x := integer(12);
end.