pascal 代码
有n个人站成一排，CCTV要采访其中一些人“你幸福吗？”。但是相邻两个人不能都被采访，否则这两个人就会因为相互影响而说出不真实的回答。CCTV想知道一共有多少种满足条件的...
有n个人站成一排，CCTV要采访其中一些人“你幸福吗？”。但是相邻两个人不能都被采访，否则这两个人就会因为相互影响而说出不真实的回答。CCTV想知道一共有多少种满足条件的采访方法呢？
展开
2个回答
展开全部
const MAX = 1000;
var i,j,n,s:longint;
opt:array[1..MAX]of longint;
begin
readln(n);
s:=0;
for i:=1 to n do begin
opt[i]:=1;
for j:=1 to i-2 do
inc(opt[i],opt[j]);
inc(s,opt[i]);
end;
writeln(s);
end.
如果一个人都不采访也算一种情况,则最后答案还要加1.
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
var i,j,n,s:longint;
opt:array[1..MAX]of longint;
begin
readln(n);
s:=0;
for i:=1 to n do begin
opt[i]:=1;
for j:=1 to i-2 do
inc(opt[i],opt[j]);
inc(s,opt[i]);
end;
writeln(s);
end.
opt:array[1..MAX]of longint;
begin
readln(n);
s:=0;
for i:=1 to n do begin
opt[i]:=1;
for j:=1 to i-2 do
inc(opt[i],opt[j]);
inc(s,opt[i]);
end;
writeln(s);
end.
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
