Happy numbers: Difference between revisions

→‎{{header|ALGOL W}}: tweak comments
(→‎{{header|ALGOL W}}: another tweak)
(→‎{{header|ALGOL W}}: tweak comments)
Line 474:
begin
% in base ten, numbers either reach 1 or loop around a sequence %
% containing 4 (see the Wikipedia article) - the Algol 68 sample %
% also uses this %
integer v, dSum, d;
v := abs n;
3,038

edits