RosettaCodeData/Task/Arbitrary-precision-integers-included-/PascalABC.NET/arbitrary-precision-integers-included-.pas
2024-10-16 18:07:41 -07:00

6 lines
176 B
ObjectPascal

begin
var result: string := power(5bi, integer(power(4, power(3, 2)))).tostring;
result[1:21].Println;
result[result.Length - 19:].Println;
result.Length.Println;
end.