Anonymous user
Menu: Difference between revisions
→{{header|Icon}} and {{header|Unicon}}
Line 1,337:
<lang Icon>
## menu.icn : rewrite of the faulty version on Rosetta Code site 24/4/2021
procedure main()
Line 1,354 ⟶ 1,356:
# --------- subroutines below ---------------------------------
procedure
displaymenu(X)
repeat {
writes("Choose a number from the menu above: ")
Line 1,376 ⟶ 1,379:
procedure displaymenu(X)
every i := 1 to *X do
write(i,") ",X[i]) ##
end ## displaymenu(X)
</lang>
| |||