主题：帮帮偶啦!我不机道做了~~~~
zhaoren
[专家分：420] 发布于 2006-03-25 20:03:00
大家帮我解道题啊啊啊!!!!!!:
走街道:设有一个N*M街道,规定:从A(1,1)点出发,只能向北或向东走~目标为B(N,M);问：从A~B共几条路？？？帮帮偶了啦~
[em18][em18]
回复列表 （共2个回复）
沙发
贺天行宝 [专家分：2300] 发布于 2006-03-27 16:55:00
var
s:array[1..100,1..100]of integer;
i,j,k,l,m,n:integer;
begin
readln(m,n);
for i:=1 to m do s[i,1]:=1;
for i:=1 to n do s[1,i]:=1;
for i:=2 to m do
for j:=2 to n do
s[i,j]:=s[i-1,j]+s[i,j-1];
for i:=1 to m do
begin
for j:=1 to n do write(s[i,j],' ');
writeln;
end;
writeln(s[m,n]);
end.
jia fen !!!
板凳
zhaoren [专家分：420] 发布于 2006-04-01 16:32:00
Thank you very much.~~
我来回复
您所在位置：