那里错了?高手帮帮忙

代码如下

var a,b:array[1..100,1..100] of 0..1;

s:string[100];

i,j,m,n,c,t,k,u:integer;

function huo(x,y:shortint):shortint;

var t:shortint;

begin

t:=0;

if (a[x-1,y-1]=1)and(t

0 条评论

目前还没有评论...

信息

ID
1415
难度
6
分类
模拟 点击显示
标签
(无)
递交数
1864
已通过
514
通过率
28%
上传者