RosettaCodeData/Task/Execute-HQ9+/Fortran/execute-hq9+-1.f
2017-09-25 22:28:19 +02:00

1 line
50 B
Forth

"bottle" // IF (B.NE.1) THEN "s" FI // " of beer"