RosettaCodeData/Task/Hailstone-sequence/J/hailstone-sequence-2.j
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

7 lines
263 B
Text

# hailseq 27 NB. sequence length
112
4 _4 {."0 1 hailseq 27 NB. first & last 4 numbers in sequence
27 82 41 124
8 4 2 1
(>:@(i. >./) , >./) #@hailseq }.i. 1e5 NB. number < 100000 with max seq length & its seq length
77031 351