Cifrado César

Cómo realizar el cifrado César

Tabla Ascii del 32 al 126

Función Ascii()

Función Mod()

Función Char()

Procedimiento para obtener cada una de las letras de un texto y su código ascii

DELIMITER $$
CREATE PROCEDURE letras (IN texto VARCHAR(20))
BEGIN
 
    DECLARE i INT;
    DECLARE longitud INT;
    DECLARE letra CHARACTER;
 
    SET i = 1;
    SET longitud = LENGTH(texto);
 
    REPEAT
        SET letra = SUBSTRING(texto, i, 1);
        IF letra <> ' ' THEN      
        	SELECT CONCAT(letra, ", código: ", ascii(letra));
        ELSE
        	SELECT CONCAT(letra, ", código: ", ascii(' '));
        END IF;
        SET i = i + 1;
    UNTIL i > longitud
    END REPEAT;

END
$$
DELIMITER ;

Ejecución

CALL letras("ejemplo de texto!");