19 lines
458 B
Text
19 lines
458 B
Text
F juggler(n)
|
||
V a = Int64(n)
|
||
V r_count = 0
|
||
V r_max = a
|
||
V r_maxidx = 0
|
||
L a != 1
|
||
V f = Float(a)
|
||
a = Int64(I a [&] 1 == 0 {sqrt(f)} E f * sqrt(f))
|
||
r_count++
|
||
I a > r_max
|
||
r_max = a
|
||
r_maxidx = r_count
|
||
R (r_count, r_max, r_maxidx)
|
||
|
||
print(‘n l[n] h[n] i[n]’)
|
||
print(‘------------------------------’)
|
||
L(n) 20..39
|
||
V (l, h, i) = juggler(n)
|
||
print(f:‘{n} {l:2} {h:14} {i}’)
|