Código
QBOL26