RosettaCodeData/Task/Count-the-coins/Maple/count-the-coins-3.maple
2023-07-01 13:44:08 -04:00

10 lines
242 B
Text

P:=n->4/(3*10^9)*n^5+65/10^8*n^4+112/10^6*n^3+805/10^5*n^2+635/3000*n+1:
for k from 2 to 8 do lprint(P(10^k)) od:
293
2103596
139946140451
13398445413854501
1333983445341383545001
133339833445334138335450001
13333398333445333413833354500001