Guess the number/With feedback: Difference between revisions
Added Quackery.
(Emacs Lisp: Improve solution) |
(Added Quackery.) |
||
Line 3,592:
I don't understand your input of 'Howdy' ?
Your guess(4): </pre>
=={{header|Quackery}}==
<lang Quackery> [ say "Guess the number (1-100 inclusive.)"
cr cr
100 random 1+
[ $ "Your guess... " input
trim reverse trim reverse
$->n
not iff
[ drop
say "That is not a number." cr ]
again
2dup != while
over < iff
[ say "Too small." cr ]
again
say "Too large." cr
again ]
say "Well done! "
echo say " is correct. " cr
drop ] is guess-the-number ( --> )</lang>
{{out}}
In the Quackery shell.
<pre>/O> guess-the-number
...
Guess the number (1-100 inclusive.)
Your guess...eleventy thruppence
That is not a number.
Your guess... 50
Too small.
Your guess... 75
Too small.
Your guess... 83
Too large.
Your guess... 79
Too large.
Your guess... 77
Too large.
Your guess... 76
Well done! 76 is correct.
Stack empty.
/O></pre>
=={{header|R}}==
| |||