Я и мой ёбаный кот на фоне ковра. Войти !bnw Сегодня Клубы
let luhny x = (\s -> x ++ show (10 - (s `div` 10))) $ sum $ map (\n -> read [n] :: Int) $ concatMap show $ zipWith (*) (cycle [1,2]) $ map (\n -> read [n] :: Int) x in getStdRandom (randomR (0,999999)) >>= \x -> return $ luhny $ "35876105" ++ ((printf "%06d" x) :: String) Я случайно генератор айфонов.
Рекомендовали: @fuck
#EVHB6M / @l29ah / 3274 дня назад

заебись // абсолютно нечитаемо

#EVHB6M/N4X / @ninesigns / 3274 дня назад
ipv6 ready BnW для ведрофона BnW на Реформале Викивач Котятки

Цоперайт © 2010-2016 @stiletto.