Hailstone sequence: Difference between revisions

Content deleted Content added
No edit summary
Line 4,801:
Print "counter:";counter
m=0
a For i=2 to 99999 {
m1=max.data(count(i), m)
if m1<>m then m=m1: im=i
Line 4,816:
Number 77031 has then longest hailstone sequence of length 351
</pre >
 
=={{header|Maple}}==
Define the procedure: