comment
IRC Chat
play_arrow
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 Vigenere - Haskell

  • 0 Respuestas
  • 2065 Vistas

0 Usuarios y 1 Visitante están viendo este tema.

Desconectado Sanko

  • *
  • Underc0der
  • Mensajes: 541
  • Actividad:
    0%
  • Reputación 0
  • ¿Puedes?
    • Ver Perfil
    • Underc0de
« en: Febrero 26, 2014, 02:28:29 pm »
Código: Haskell
  1. module Vigenere where
  2.         import Data.Char
  3.        
  4.         xEnc :: String -> Int -> String
  5.         xEnc xs ys = [chr ((fst(x) + snd(x)) `mod` 256)| x <- zip [ord x | x <- xs] [ord y | y <- ys]]
  6.        
  7.         xDec :: String -> Int -> String
  8.         xDec xs ys = [chr ((fst(x) - snd(x)) `mod` 256)| x <- zip [ord x | x <- xs] [ord y | y <- ys]]

« Última modificación: Mayo 01, 2014, 09:16:54 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: 3563
Ú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: 1434
Ú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: 1997
Último mensaje Julio 17, 2011, 03:34:36 am
por LucaSthefano
[Datos] Funciones para Haskell internas - JaAViEr

Iniciado por JaAViEr

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

Iniciado por JaAViEr

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