Re: LOGO-L> http://www.ionet.net/~timtroyr/funhouse/beer.html#unique

[Rena Schklowsky <ps9m@ns2.con2.com>]

At 09:27 PM 3/21/98 -0500, you wrote:
>At 8:37 PM +0200 3/21/98, Yehuda Katz wrote:
>>Hi,
>>
>>You might want to take a look at:
>>
>>	http://www.ionet.net/~timtroyr/funhouse/beer.html#unique
I also enjoyed the site. It's amazing just how simple the Logo code is.
However, your solution does not take into consideration the singular case (1
bottle of beer). Wouldn't you have to include the statement
if :how-many = 1 [print sentence [1 bottle of beer on the wall]
print sentence [1 bottle of beer]
print [take one down, pass it around,]
print sentence [1 bottle of beer on the wall]]
or something like that (I guess we can work on that in Colorado this summer).

>to 99bottles
>take-em-down 99
>end
>
>to take-em-down :how-many
>if :how-many = 0 [stop]
>print sentence :how-many [bottles of beer on the wall]
>print sentence :how-many [bottles of beer]
>print [take one down, pass it around,]
>print sentence :how-many - 1 [bottles of beer on the wall]
>pr []
>take-em-down :how-many - 1
>end

Rena Schklowsky

---------------------------------------------------------------
Please post messages to the Logo forum to logo-l@gsn.org.  Mail
questions about the list administration to logofdn@gsn.org.  To
unsubscribe send    unsubscribe logo-l    to majordomo@gsn.org.