map$a{$'}+=($a{$'-$_*2}+$'%2)/6,//..6for++$a{0}..<>;print$_>99?$_+5/3:$a{$_*2-1}/$a{$_*2},$/for<>