// 99 Bottles of Beer in KPL (Kid's Programming Language)

Program BottlesOfBeer

  Method Main()

    Define word As String = " bottles"
    Define B As String = "99"
    Define n As Int = 99
	
    ShowConsole()
	
    While n >= 1

      ConsoleWriteLine(n + word + " of beer on the wall, " + n + word + " of beer.")
      n = n - 1
      B = ConvertToString(n)