一道奧數題，1999年，一個青年說，今年我的生日已過了，我現在的年齡正好是我出生年份的四個數字之和。這個青年是哪年出生的？

-- file : AS.hs -- 奧數計算calculateA :: [Integer] calculateA = [ years |a<-[1..9],b<-[0..9],c<-[0..9],d<-[0..9],let years=a*1000+b*100+c*10+d,years<1999,(1999-years)==(a+b+c+d)]

?Prelude> :l AS.hs
[1 of 1] Compiling Main???????????? ( AS.hs, interpreted )
Ok, modules loaded: Main.
*Main> calculateA
[1976]

轉載于:https://www.cnblogs.com/bailiang/archive/2012/06/07/2539820.html

總結

以上是生活随笔為你收集整理的奥数解答的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。