10 rem BMI Calculator

20 rem by CaptainD 

30 rem Visit www.darscom.net/chipmunk_basic.html for more programs

40 print “Enter height (in metres)”

50 input height

60 print “Enter weight (in kilograms)”

70 input weight

80 h=sq(height)

90 bmi=weight/h

100 print “BMI is”_bmi

110 print “Calculate another BMI? (y for yes or anything else to end)”

120 input cont$

130 if cont$=”y” or cont$=”Y” then goto 40

140 end