CLS
PRINT "Calcular el doble de un numero"
INPUT "Diga un numero ", A
B = A * 2
PRINT "El doble de su numero es"; B
END