Código
QBASF9