CLS
PRINT "Algoritmo para calcular si estas o no en el peso ideal"
INPUT "Diga su masa en kilogramos :", A
INPUT "Diga su altura en metros  :", B
LET P = A / (B ^ 2)
IF P = 25 THEN
PRINT "Estas en el peso ideal"
END IF
IF P > 25 THEN
PRINT "Debes bajar de peso o crecer"
END IF
IF P < 25 THEN
PRINT "Debes subir de peso o crecer"
END IF