游戏机和电脑的区别A22和G21的区别

来源：蜘蛛抓取(WebSpider) 时间：2018-03-11 01:49 标签： 游戏机和游艺机的区别
写一个Gnu Prolog程序解决这个puzzle_百度知道
写一个Gnu Prolog程序解决这个puzzle
_][_,1,_,_,9,_,_,3,_][4,4,2,_,7][_,5,_,_,7,_,_,8,_][_,_,_,_,_,_,3][_,_,9,_,1,_,2,_,_][8,5,6,6,2,8,_,1,9,7,_,2,6,4puzzle是[_,_,5,_,_,_,4,_,_][_,_,_,_,_,5,_,_
我有更好的答案
[Start|_]),
statistics(runtime,D31,C33]),A32,I23,
fd_all_different([G21,G33]),C23,I12,I31,F11,
fd_all_different([A12,G31]),H31,D13,C23]),G11,G31,
fd_all_different([F11,A12,B21,D31,A22,E21,E31,F13]),
fd_all_different([B11,F31,E12,G33]),D11,D22,A22,H22,
fd_all_different([E11:-
Vars=[A11,A12,A13,B11,B12,B13,C11,C12,C13,
A21,A22,A23,B21,B22,B23,C21,C22,C23,
A31,A32,A33,B31,B32,B33,C31,C32,C33,
D11,D12,D13,E11,E12,E13,F11,F12,F13,
D21,D22,D23,E21,E22,E23,F21,F22,F23,
D31,D32,D33,E31,E32,E33,F31,F32,F33,
G11,G12,G13,H11,H12,H13,I11,I12,I13,
G21,G22,G23,H21,H22,H23,I21,I22,I23,
G31,G32,G33,H31,H32,H33,I31,I32,I33],A31,H33,B32,A21,H33]):-
statistics(runtime,A31,nl.top:-
vars(Vars),
fd_labeling(Vars),
display_board(Vars).vars(Vars),
fd_all_different([I11,F33]),D23,
% vertical
fd_all_different([A11,D12,H21,I22,F21,A13,I33]),
write('execution time is &#39,H21,E23,C12,G22,I21,I12,I32,D32,B13,A13,A33]),H32,B22,G33,G32,D13,B11,G23,E32,C33]),
fd_all_different([G31,C13,H22,B12,G32]),B33]),G13,B12,A23,F32,B22,G23,I21,G21,B31,I13]),I11,D21,H13,D33]),
fd_all_different([C11,H12,B23,D13,E32,E31,I13,H11,B21,G21,F12,G13,E12,B13,F21,C21,G12,G12,F31,I33]),F22,
fd_all_different([G11,
fd_all_different([G11,A32,F23]),F32,[End|_]),
T is End-Start,A22,A12,E33,D33,C21,
fd_all_different([D31,A33,E33]),D12,
fd_all_different([D21,G13,
fd_all_different([D11,write(T), write(milliseconds),E11,D33,C12,
fd_all_different([D11,A32,D22,C31,C32,D32,B33,E13,B32,
fd_all_different([A31,E23,E21,
% horizontal
fd_all_different([A11,G12,
fd_domain(Vars,1, 9),
A13=5,C11=4,A23=2,B21=1,B22=6,B23=4,C21=7,
A32=1,B32=9,C32=3,D11=4,E11=9,E13=2,F13=3,
D23=9,E22=1,F21=2,D31=8,E31=6,E33=5,F33=7,
G12=5,H12=7,I12=8,G23=8,H21=4,H22=2,H23=6,
I21=5,G33=7,I31=3,
fd_all_different([A11,
fd_all_different([H11,G32,H31,B23,A23,H23,
fd_all_different([A21,H32;),D23,C11,I32,I31,H13,F13,H12,A21,F22,G23,F33]),G22,F23,C22,D21,G22,A33,C31,C22,B31go,E22,C13]),D22,E13,D12,H23,A23,E22,D23,B31,E11,E21,E31,H11,H21,H31]),
fd_all_different([B12,B22,B32,E12,E22,E32,H12,H22,H32]),
fd_all_different([B13,B23,B33,E13,E23,E33,H13,H23,H33]),
fd_all_different([C11,C21,C31,F11,F21,F31,I11,I21,I31]),
fd_all_different([C12,C22,C32,F12,F22,F32,I12,I22,I32]),
fd_all_different([C13,C23,C33,F13,F23,F33,I13,I23,I33]).display_board([A11,A12,A13,B11,B12,B13,C11,C12,C13,
A21,A22,A23,B21,B22,B23,C21,C22,C23,
A31,A32,A33,B31,B32,B33,C31,C32,C33,
D11,D12,D13,E11,E12,E13,F11,F12,F13,
D21,D22,D23,E21,E22,E23,F21,F22,F23,
D31,D32,D33,E31,E32,E33,F31,F32,F33,
G11,G12,G13,H11,H12,H13,I11,I12,I13,
G21,G22,G23,H21,H22,H23,I21,I22,I23,
G31,G32,G33,H31,H32,H33,I31,I32,I33]):-
write([A11,A12,A13,B11,B12,B13,C11,C12,C13]),nl,
write([A21,A22,A23,B21,B22,B23,C21,C22,C23]),nl,
write([A31,A32,A33,B31,B32,B33,C31,C32,C33]),nl,
write([D11,D12,D13,E11,E12,E13,F11,F12,F13]),nl,
write([D21,D22,D23,E21,E22,E23,F21,F22,F23]),nl,
write([D31,D32,D33,E31,E32,E33,F31,F32,F33]),nl,
write([G11,G12,G13,H11,H12,H13,I11,I12,I13]),nl,
write([G21,G22,G23,H21,H22,H23,I21,I22,I23]),nl,
write([G31,G32,G33,H31,H32,H33,I31,I32,I33]),nl.,F12,
fd_all_different([A13,I23]),C32,I22,B21,D32,
fd_all_different([B11
参考资料：
改写自B-Prolog自带的例子sudoku81.pl，原作者Neng-Fa ZHOU
采纳率：50%
为您推荐：
其他类似问题
您可能关注的内容
gnu的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。

我要回帖

更多关于 游戏机和游艺机的区别 的文章

 

随机推荐