99 Bottles of Beer
That's really not what you think, apost on the joy of drinking :-)
This is really cool, one program in 621 languages and variations !
Of course VB.Net C# are there, but check also the more exotic ones.
And yes Applesoft too :-)
But for me Logo is really the one I used to love th most, because maybe of the syntax simplicity:
; by Augusto Chioccariello
to 99bottles
for [i 99 1 -1] [
print se :i [bottle(s) of beer on the wall]
print se :i [bottle(s) of beer]
print [take one down, pass it around]
print se (:i - 1) [bottle(s) of beer on the wall]]
end