Stair-climbing puzzle: Difference between revisions

Content deleted Content added
Tikkanz (talk | contribs)
→‎{{header|J}}: use and explain 0:
Tikkanz (talk | contribs)
→‎{{header|J}}: shorten explicit
Line 172:
'''Solution (Explicit):'''
<lang j>step_upX=: monad define
while. -. +/y do. y=. y , _1 1 {~ step 0 end.
ClimbAttempts=. y
while. -. +/ClimbAttempts do.
ClimbAttempts=. ClimbAttempts , <:`>:@.step #''
end.
)</lang>