18/11/07 19:53:55.28 PN+gm2kl.net
こっちの方が可読性がいいかな。
Prelude> [(a,x)|b<-[10..99],c<-[0..99],x<-[10..99],let a=100*b+c, a*x==119868,100*b*x==117600]
[(1427,84),(2854,42),(4281,28)]
18/11/07 19:53:55.28 PN+gm2kl.net
こっちの方が可読性がいいかな。
Prelude> [(a,x)|b<-[10..99],c<-[0..99],x<-[10..99],let a=100*b+c, a*x==119868,100*b*x==117600]
[(1427,84),(2854,42),(4281,28)]