RosettaCodeData/Task/Long-multiplication/PureBasic/long-multiplication-2.basic

8 lines
185 B
Plaintext

XIncludeFile "decimal.pbi"
Define.Decimal *a, *b
*a=PowerDecimal(IntegerToDecimal(2),IntegerToDecimal(64))
*b=TimesDecimal(*a,*a,#NoDecimal)
Print("2^64*2^64 = "+DecimalToString(*b))