Munchausen numbers: Difference between revisions

Content added Content deleted
(→‎{{header|ALGOL 68}}: Revised algorithm)
(→‎{{header|ALGOL 68}}: Remove unnecessary test)
Line 27: Line 27:
+ nth power[ d4 ];
+ nth power[ d4 ];
IF digit power sum = number THEN
IF digit power sum = number THEN
IF number > 0 THEN
print( ( whole( number, 0 ), newline ) )
print( ( whole( number, 0 ), newline ) )
FI
FI;
FI;
d4 +:= 1;
d4 +:= 1;