Munchausen numbers: Difference between revisions

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

edits