PROGRAM "test"
VERSION "1.0"
CONSOLE

DECLARE FUNCTION Entry ()

FUNCTION Entry ()

  FOR b = 99 TO 3 STEP -1
    ? b; " bottles of beer on the wall,"; b; " bottles of beer."
    b_1 = b - 1
    ? "Take one down and pass it around,"; b_1; " bottles of beer on the wall.\n"
  NEXT b

  ? "2 bottles of beer on th