洛谷 P1057 傳球遊戲

題目描述

上體育課的時候，小蠻的老師經常帶著同學們一起做遊戲。這次，老師帶著同學們一起做傳球遊戲。

遊戲規則是這樣的：n個同學站成乙個圓圈，其中的乙個同學手裡拿著乙個球，當老師吹哨子時開始傳球，每個同學可以把球傳給自己左右的兩個同學中的乙個（左右任意），當老師在此吹哨子時，傳球停止，此時，拿著球沒有傳出去的那個同學就是敗者，要給大家表演乙個節目。

聰明的小蠻提出乙個有趣的問題：有多少種不同的傳球方法可以使得從小蠻手裡開始傳的球，傳了m次以後，又回到小蠻手裡。兩種傳球方法被視作不同的方法，當且僅當這兩種方法中，接到球的同學按接球順序組成的序列是不同的。比如有三個同學1號、2號、3號，並假設小蠻為1號，球傳了3次回到小蠻手裡的方式有1->2->3->1和1->3->2->1，共2種。

輸入輸出格式

輸入格式：

輸入檔案ball.in共一行，有兩個用空格隔開的整數n，m（3<=n<=30，1<=m<=30）。

輸出格式：

輸出檔案ball.out共一行，有乙個整數，表示符合題意的方法數。

輸入輸出樣例

輸入樣例#1：

3 3

輸出樣例#1：

2 說明

40%的資料滿足：3<=n<=30，1<=m<=20

100%的資料滿足：3<=n<=30，1<=m<=30

var n,m:longint;
f:array[0..35,0..35]of longint;
procedure
init;
var i:longint;
begin
readln(n,m);
end;
procedure
main;
var i,j,k:longint;
begin
fillchar(f,sizeof(f),0);
f[1,0]:=1;
for j:=1
to m do
for i:=1
to n do
if i=1
then f[i,j]:=f[i,j]+f[n,j-1]+f[i+1,j-1] else
if i=n then f[i,j]:=f[i,j]+f[i-1,j-1]+f[1,j-1]
else f[i,j]:=f[i,j]+f[i-1,j-1]+f[i+1,j-1];
write(f[1,m]);
end;
begin
init;
main;
end.

洛谷 P1057 傳球遊戲

洛谷 P1057 傳球遊戲

洛谷 P1057 傳球遊戲

P1057 傳球遊戲 洛谷

相關推薦

P1057 傳球遊戲洛谷