RosettaCodeData/Task/Long-multiplication/PureBasic/long-multiplication-2.purebasic
Ingy döt Net 6f050a029e update
2013-06-05 21:47:54 +00:00

7 lines
185 B
Text

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))