INICIO:
CLS
MENU:
PRINT
PRINT TAB(10); "1.-SUMA"
PRINT TAB(10); "2.-RESTA"
PRINT TAB(10); "3.-FIN"
PRINT
OPCION:
INPUT "SELECCIONA UNA OPCION"; OP
IF OP = 1 THEN GOTO SUMA
IF OP = 2 THEN GOTO RESTA
IF OP = 3 THEN GOTO FIN
GOTO OPCION
SUMA:
CLS
INPUT "ENTRA EL NUMERO"; A
INPUT "ENTRA OTRO NUMERO"; B
S = A + B
PRINT "LA SUMA ES: "; S
GOTO MENU
RESTA:
CLS
INPUT "ENTRA UN NUMERO"; A
INPUT "ENTRA OTRO NUMERO"; B
R = A - B
PRINT "LA RESTA ES: "; R
GOTO MENU
FIN:
END

