pascalabcnet/InstallerSamples/WhatsNew/3_7_2/bi.pas
2022-04-18 21:34:18 +03:00

10 lines
163 B
ObjectPascal

// Литералы BigInteger
begin
Println(25bi ** 25 + 17bi ** 17);
var p := 1bi;
for var i:=2 to 50 do
p *= i;
Println($'50! = {p}');
end.