Digit fifth powers: Difference between revisions
Content added Content deleted
(added =={{header|Pascal}}== minimal modified Own_digits_power_sum) |
m (→{{header|Pascal}}: changed output format to be more compact) |
||
Line 613: | Line 613: | ||
For pot := 2 to MaxDgtCount do |
For pot := 2 to MaxDgtCount do |
||
begin |
begin |
||
Write('Exponent : ',Pot,' used '); |
|||
digits := Init(MaxDgtCount,pot); |
digits := Init(MaxDgtCount,pot); |
||
T0 := GetTickCount64; |
T0 := GetTickCount64; |
||
Line 641: | Line 641: | ||
tmp := 0; |
tmp := 0; |
||
for i := 0 to High(Numbers) do |
for i := 0 to High(Numbers)-1 do |
||
begin |
begin |
||
write(Numb2USA(IntToStr(Numbers[i])),' + '); |
|||
tmp +=Numbers[i]; |
tmp +=Numbers[i]; |
||
end; |
end; |
||
write(Numb2USA(IntToStr(Numbers[High(Numbers)])),' = '); |
|||
writeln('sum to ',Numb2USA(IntToStr(tmp))); |
writeln('sum to ',Numb2USA(IntToStr(tmp))); |
||
end; |
end; |
||
Line 658: | Line 659: | ||
end.</lang> |
end.</lang> |
||
{{Out}} |
{{Out}} |
||
<pre style="height: |
<pre style="height:260px"> |
||
Up to 19 Digits: |
Up to 19 Digits: |
||
TIO.RUN Real time: 10.699 s CPU share: 98.66 % |
TIO.RUN Real time: 10.699 s CPU share: 98.66 % |
||
Exponent : 2 |
Exponent : 2 used 275 recursions |
||
275 recursions |
|||
Exponent : 3 |
Exponent : 3 used 990 recursions |
||
153 + 370 + 371 + 407 = sum to 894 |
|||
990 recursions |
|||
153 |
|||
370 |
|||
371 |
|||
407 |
|||
sum to 1,301 |
|||
Exponent : 4 |
Exponent : 4 used 2992 recursions |
||
1,634 + 8,208 + 9,474 = sum to 9,842 |
|||
2992 recursions |
|||
1,634 |
|||
8,208 |
|||
9,474 |
|||
sum to 19,316 |
|||
Exponent : 5 |
Exponent : 5 used 7997 recursions |
||
4,150 + 4,151 + 54,748 + 92,727 + 93,084 + 194,979 = sum to 248,860 |
|||
7997 recursions |
|||
4,150 |
|||
4,151 |
|||
54,748 |
|||
92,727 |
|||
93,084 |
|||
194,979 |
|||
sum to 443,839 |
|||
Exponent : 6 |
Exponent : 6 used 19437 recursions |
||
548,834 = sum to 0 |
|||
19437 recursions |
|||
548,834 |
|||
sum to 548,834 |
|||
Exponent : 7 |
Exponent : 7 used 43747 recursions |
||
1,741,725 + 4,210,818 + 9,800,817 + 9,926,315 + 14,459,929 = sum to 25,679,675 |
|||
43747 recursions |
|||
1,741,725 |
|||
4,210,818 |
|||
9,800,817 |
|||
9,926,315 |
|||
14,459,929 |
|||
sum to 40,139,604 |
|||
Exponent : 8 |
Exponent : 8 used 92367 recursions |
||
24,678,050 + 24,678,051 + 88,593,477 = sum to 49,356,101 |
|||
92367 recursions |
|||
24,678,050 |
|||
24,678,051 |
|||
88,593,477 |
|||
sum to 137,949,578 |
|||
Exponent : 9 |
Exponent : 9 used 184745 recursions |
||
146,511,208 + 472,335,975 + 534,494,836 + 912,985,153 = sum to 1,153,342,019 |
|||
184745 recursions |
|||
146,511,208 |
|||
472,335,975 |
|||
534,494,836 |
|||
912,985,153 |
|||
sum to 2,066,327,172 |
|||
Exponent : 10 |
Exponent : 10 used 352705 recursions |
||
⚫ | |||
352705 recursions |
|||
⚫ | |||
sum to 4,679,307,774 |
|||
Exponent : 11 |
Exponent : 11 used 646635 recursions |
||
32,164,049,650 + 32,164,049,651 + 40,028,394,225 + 42,678,290,603 + 44,708,635,679 + 49,388,550,606 + 82,693,916,578 + 94,204,591,914 = sum to 323,825,886,992 |
|||
646635 recursions |
|||
32,164,049,650 |
|||
32,164,049,651 |
|||
40,028,394,225 |
|||
42,678,290,603 |
|||
44,708,635,679 |
|||
49,388,550,606 |
|||
82,693,916,578 |
|||
94,204,591,914 |
|||
sum to 418,030,478,906 |
|||
Exponent : 12 |
Exponent : 12 used 1144055 recursions |
||
1144055 recursions |
|||
Exponent : 13 |
Exponent : 13 used 1961245 recursions |
||
⚫ | |||
1961245 recursions |
|||
⚫ | |||
sum to 564,240,140,138 |
|||
Exponent : 14 |
Exponent : 14 used 3268749 recursions |
||
⚫ | |||
3268749 recursions |
|||
⚫ | |||
sum to 28,116,440,335,967 |
|||
Exponent : 15 |
Exponent : 15 used 5311724 recursions |
||
5311724 recursions |
|||
Exponent : 16 |
Exponent : 16 used 8436274 recursions |
||
4,338,281,769,391,370 + 4,338,281,769,391,371 = sum to 4,338,281,769,391,370 |
|||
8436274 recursions |
|||
4,338,281,769,391,370 |
|||
4,338,281,769,391,371 |
|||
sum to 8,676,563,538,782,741 |
|||
Exponent : 17 |
Exponent : 17 used 13123099 recursions |
||
233,411,150,132,317 + 21,897,142,587,612,075 + 35,641,594,208,964,132 + 35,875,699,062,250,035 = sum to 57,772,147,946,708,524 |
|||
13123099 recursions |
|||
233,411,150,132,317 |
|||
21,897,142,587,612,075 |
|||
35,641,594,208,964,132 |
|||
35,875,699,062,250,035 |
|||
sum to 93,647,847,008,958,559 |
|||
Exponent : 18 |
Exponent : 18 used 20029999 recursions |
||
20029999 recursions |
|||
Exponent : 19 |
Exponent : 19 used 30045004 recursions |
||
1,517,841,543,307,505,039 + 3,289,582,984,443,187,032 + 4,498,128,791,164,624,869 + 4,929,273,885,928,088,826 = sum to 9,305,553,318,915,316,940 |
|||
30045004 recursions |
|||
1,517,841,543,307,505,039 |
|||
3,289,582,984,443,187,032 |
|||
4,498,128,791,164,624,869 |
|||
4,929,273,885,928,088,826 |
|||
sum to 14,234,827,204,843,405,766 |
|||
Max Uint64 18,446,744,073,709,551,615</pre> |
Max Uint64 18,446,744,073,709,551,615</pre> |
||
=={{header|Perl}}== |
=={{header|Perl}}== |