posted on 2007-12-14 21:14 小屁 阅读(812) 评论(2) 编辑 收藏 所属分类: java
演示程序 jar文件, 直接运行 回复 更多评论
check out 一下www.operamasks.org的源码,发现老袁新创了一门名为elite的动态语言。在elite下,8皇后问题的解法如下: /* 利用列表聚合解决8皇后问题 */ define queens(n) { define scan(i) { if i==0 then [[]] else [[q:qs] where qs in scan(i-1), q in [1..n], safe(q, qs)]; } scan(n); } define safe(x, qs) { define n = 1; for (y in qs) { if (x==y || x==y+n || x==y-n) return false; n++; } return true; } define count = 0; for (x in queens(8)) { cout << ++count << ": " << x << endl; } 回复 更多评论
Powered by: BlogJava Copyright © 小屁