作业帮数独计算器是怎么编出来的
来源：学生作业帮助网 编辑：作业帮 时间：2024/04/28 21:38:46
数独计算器是怎么编出来的
数独计算器是怎么编出来的
数独计算器是怎么编出来的
空位用空格补齐（每用下划线）
可以文件输入（用编译好的程序打开文件）,亦可键盘输入.
用打过CRT补丁的Turbo Pascal编译,或使用Free Pascal(这个不保证正常)
样例没有超时,但对于特殊数据可能超时（我还没有数据,自己写得太简单,但是,特殊数据基本不会不超过0.01s）
程序如下：
program sdjsq;{数独解算器}
{-------------调用库------------------------------------------------USES}
uses CRT,Dos;{使用CRT Dos库}
{-------------数据类型定义------------------------------------------TYPE}
type
sz=0..9;{数字,byte类型的子界占一byte}
sy=1..9;{same as sz}
sd=array [sy,sy] of sz;{数独,占8×8×1byte=81byte}
ss=set of sy;{数字的集合}
dot=
record
s:ss;
n,x,y:byte;
end;
{-------------变量定义-----------------------------------------------VAR}
var
a:sd;
x,y:byte;
list:record
num:byte;
dat:array [1..81] of dot;
end;
{TRY}
function answer:boolean;
var
ans:boolean;
procedure try(num:byte);
var
i,j,n,x,y:byte;
s:ss;
begin
if keypressed then case readkey of #27:halt;#0:if readkey=#107 then halt; end;
if num
用不同的程序语言编写出来的咯.
百度上有人用PASCAL编写了个很不错的数独程序,你有兴趣可以去看看.
http://zhidao.baidu.com/question/33417315.html