Digit fifth powers: Difference between revisions
m
→{{header|Ring}}: added realistic limits
m (→{{header|Ring}}: added realistic limits) |
|||
Line 54:
=={{header|Ring}}==
<lang ring>? "working..."
sumEnd = 0
sumList =
limitStart = 1000▼
pow5 = []
limitEnd = 199999▼
for i = 1 to 9
add(pow5, pow(i, 5))
next▼
for n = limitStart to limitEnd
sum = 0
if d > 0 sum += pow5[d] ok
m = unsigned(m, 10, "/")
if sum = n
sumEnd += n
ok
next
▲next
▲see "done..." + nl
{{out}}
<pre>
|