Back to task

95 symbols haskell
Fri Mar 13 13:52:27 2015 YoshikuniJujo
main=interact$show.(\[p,q,e]->head$filter((==1).(`mod`((p-1)*(q-1))).(*e))[1..]).map read.lines


Leave a comment

Parsed as Markdown

Login to leave a comment