CLS
PRINT "PESO IDEAL DE LOS PACIENTES de LA CLINICA"
INPUT "SEA SU PESO...", D
INPUT "SEA SU ALTURA...", E
LET G = D / E*E
IF G = 25 THEN
PRINT "ESTAS EN tu PESO IDEAL"
END IF
IF P > 25 THEN
PRINT "DEBES bajar esa lonja o estirarte"
END IF
IF P < 25 THEN
PRINT "DEBES comer mas chuleta"
END IF