本文主要是介绍车站解题程序,希望对大家解决编程问题提供一定的参考价值,需要的开发者们随着小编来一起学习吧!
var a,n,m,x,i,ans,b:longint;//ans是车上人数
f:array[1..100] of longint;//f其实是斐波那契数列begin
f[1]:=1;//前两个数的值
f[2]:=1;
for i:=3 to 23 do//把全部数算出来
f[i]:=f[i-1]+f[i-2];
readln(a,n,m,x);//输入
b:=(m-(f[n-3]+1)*a) div (f[n-2]-1);
ans:=(a*(f[x-2]+1))+(b*(f[x-1]-1));writeln(ans);//输出
end.
这篇关于车站解题程序的文章就介绍到这儿,希望我们推荐的文章对编程师们有所帮助!