用haskell求水仙花数
最近对haskell语言比较感兴趣,因为它简洁、高效、强大。 今天摸索着用haskell写了一个求水仙花数的程序,其实只有一行代码。 水仙花数是一个三位数,它的各个数位的三次方这和与该数相等。 如下: [c|i<-[1..0], j<-[0..9], k<[0..9],let c=i*100+j*10+k,c==i^3+j^3+k^3] |
最近对haskell语言比较感兴趣,因为它简洁、高效、强大。 今天摸索着用haskell写了一个求水仙花数的程序,其实只有一行代码。 水仙花数是一个三位数,它的各个数位的三次方这和与该数相等。 如下: [c|i<-[1..0], j<-[0..9], k<[0..9],let c=i*100+j*10+k,c==i^3+j^3+k^3] |