过河卒问题求修改这是我的程序var a:array[0..20,0..20] of boolean;d:array[0.
来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:综合作业 时间:2024/06/13 14:50:22
过河卒问题求修改
这是我的程序
var a:array[0..20,0..20] of boolean;
d:array[0..20,0..20] of longint;
i,j,x,y,m,n:longint;
begin
readln(n,m,x,y);
for i:=0 to n do
for j:=0 to m do
a[i,j]:=true;
a[x+2,y+1]:=false;
a[x+2,y-1]:=false;
a[x-2,y+1]:=false;
a[x-2,y-1]:=false;
a[x+1,y+2]:=false;
a[x+1,y-2]:=false;
a[x-1,y+2]:=false;
a[x-1,y-2]:=false;
a[x,y]:=false;
d[0,0]:=1;
for i:=1 to n do if a[i,0]=true then
d[i,0]:=1 else break;
for i:=1 to m do if a[0,i]=true then
d[0,i]:=1 else break;
for i:=1 to n do
for j:=1 to m do
if a[i,j]=true then
d[i,j]:=d[i-1,j]+d[i,j-1];
writeln(d[n,m]);
end.
不知道哪里出错,输出是0,.个人认为没问题⊙﹏⊙b
这是我的程序
var a:array[0..20,0..20] of boolean;
d:array[0..20,0..20] of longint;
i,j,x,y,m,n:longint;
begin
readln(n,m,x,y);
for i:=0 to n do
for j:=0 to m do
a[i,j]:=true;
a[x+2,y+1]:=false;
a[x+2,y-1]:=false;
a[x-2,y+1]:=false;
a[x-2,y-1]:=false;
a[x+1,y+2]:=false;
a[x+1,y-2]:=false;
a[x-1,y+2]:=false;
a[x-1,y-2]:=false;
a[x,y]:=false;
d[0,0]:=1;
for i:=1 to n do if a[i,0]=true then
d[i,0]:=1 else break;
for i:=1 to m do if a[0,i]=true then
d[0,i]:=1 else break;
for i:=1 to n do
for j:=1 to m do
if a[i,j]=true then
d[i,j]:=d[i-1,j]+d[i,j-1];
writeln(d[n,m]);
end.
不知道哪里出错,输出是0,.个人认为没问题⊙﹏⊙b
- -没错,AC代码
过河卒问题求修改这是我的程序var a:array[0..20,0..20] of boolean;d:array[0.
若有二维数组a的说明:var a:array[0..m,0..n]; 则计算数组a的任意元素a[i][j]在数组中的位置
a array of quention
program Noname0; const n=7; var a:array[1..n] of integer; i,
program kuohao; type a=array[1..100]of char; var x:string; y
A light array of wind.
在step7中定义数组名称DB_VAR, ARRAY[0..30],请问在程序中使用DB_VAR[5],是什么含义,这里
array[x..y] of function a():byte 是不是函数a返回的值是byte的,还是其他含义?
英语翻译Write a function that dynamically allocates an array of
java中求二维数组第二维的长度用什么?另外,一个二维array, array.length默认的是第一维的长度么,有没
an array of 4 structures的中文意思?
我需要做一个array,目前的数据如下: