Este sitio utiliza cookies propias y de terceros. Si continúa navegando consideramos que acepta el uso de cookies. OK Más Información.

Cifrado cesar - haskell

  • 0 Respuestas
  • 2657 Vistas

0 Usuarios y 2 Visitantes están viendo este tema.

Desconectado Sanko

  • *
  • Underc0der
  • Mensajes: 541
  • Actividad:
    0%
  • Reputación 0
  • ¿Puedes?
    • Ver Perfil
    • Underc0de
« en: Febrero 26, 2014, 02:29:05 pm »
Simple práctica del lenguaje, ya se que soy pesao repitiendo siempre mismos ciphers

Código: Haskell
  1. module Cesar where
  2.         import Data.Char
  3.         xEnc :: String -> Int -> String
  4.         xEnc z y = [chr ((ord x + y) `mod` 256) | x <- z]
  5.  
  6.         xDec :: String -> Int -> String
  7.         xDec z y = [chr ((ord x - y) `mod` 256) | x <- z]
  8.  
« Última modificación: Mayo 01, 2014, 09:17:12 am por Expermicid »
Sigueme en Twitter : @Sankosk
Estos nuevos staff no tienen puta idea XD

 

¿Te gustó el post? COMPARTILO!



[Código-Haskell] Recorrer Lista declarada por usuario - JaAViEr

Iniciado por JaAViEr

Respuestas: 0
Vistas: 3731
Último mensaje Julio 17, 2011, 10:57:46 am
por JaAViEr
[Código-Haskell] Cuenta caracteres de un archivo - JaAViEr

Iniciado por JaAViEr

Respuestas: 0
Vistas: 1546
Último mensaje Julio 17, 2011, 03:33:33 am
por JaAViEr
[Código-Haskell] Números Pares & Impares - JaAViEr

Iniciado por JaAViEr

Respuestas: 1
Vistas: 2186
Último mensaje Julio 17, 2011, 03:34:36 am
por LucaSthefano
[Datos] Funciones para Haskell internas - JaAViEr

Iniciado por JaAViEr

Respuestas: 0
Vistas: 1710
Último mensaje Julio 17, 2011, 06:37:29 am
por JaAViEr
[Código-Haskell] Limpia Archivo - JaAViEr

Iniciado por JaAViEr

Respuestas: 0
Vistas: 1575
Último mensaje Julio 17, 2011, 03:40:07 am
por JaAViEr