Site hosted by Angelfire.com: Build your free website today!
CLS
INPUT "Ingrese su peso en (Kg)"; k
INPUT "ingrese su altura en (m)"; m
p = k / (m * m)
PRINT "tu peso ideal es de"; p
IF p = 25 THEN
PRINT "estas en tu peso ideal"
ELSEIF p > 25 THEN
PRINT "debes bajar de peso o dejar de crecer"
ELSE
PRINT "debes subir de peso o crecer"
END IF
END