Menu: Difference between revisions

Content added Content deleted
(bug fix)
Line 153:
=={{header|J}}==
 
<lang J>select=: ({::~ 'choose a number 0..' 0_&".@prompt@, ': ',~ ":@<:@# [ i.@# smoutput@,&":&> ' '&,&.>) :: (select@([ smoutput bind 'please choose a valid number'))</lang>
 
Example use: