实验二数学建模课程实验报告

1、数学建模课程实验实验名称： 实验二程序设计任课教师：姓名：业： 信计(工程)号： 201321314306专班级： 133学完成日期：2015-10-01一、实验目的(1) 掌握的简单程序设计。二、实验内容(1)(2)实验 1：有一分数序列 2/1, 3/2, 5/3, 8/5, 13/8, 21/13, .求前 15 项的和。实验 2：写一个函数 m 文件，入参是一个矩阵（矩阵大小未知），用 for 循环计算矩阵的最大值与最小值，并作为函数的返回参数。（采用 size 得到矩阵的行数与列数）实验 3：求 Fibonacci 数列，大于 4000 的最小项。实验 4：地球大气问题(3)(4)地

2、球由大气层,是气液共存态.假设每天有 6%的液体蒸发为气体,而又有 2%的气体凝结(降雨、雪)为液体.假如开始时有 70%的液体,30%的气体, 问 1 天后气液共存态的地球中气体、液体的比例是多少？30 天后又如何？稳定的比例是多少？(5) 实验 5：课件排名(选做)(6) 实验 6：课件酒鬼躺在概率(选做)三、实验结果与结论：(1)(2)（3）(4)第一天后第 30 天后稳定比例（5）四、实验中遇到的问题、解决方法及体会(1)程序设计方法还需要练习与熟练。附录：程序源程序(1)p = 1, 7, 0, 9 , -20;x = roots(p)%建立多项式系数向量function sum=f

3、(n) F=zeros(n,1);A=zeros(n,1);B=zeros(n,1);A(1)=2 ;B(1)=1;F(1)=2;sum=F(1); for k=2:1:nA(k)=A(k-1)+B(k-1); B(k)=A(k-1);F(k)=A(k)/B(k);sum=sum+F(k);end end(2)function max,min=array(x) r,c=size(x)max=x(1,1);min=x(1,1); for i=1:1:rfor j=1:1:cif maxx(i,j) min=x(i,j);endendend end（3）function f=fibonacc(x)

4、 F=zeros(x,1);F(1)=0;F(2)=1;for i=3:1:xF(i)=F(i-1)+F(i-2); f=F(i-1);if F(i)4000breakendendend(4)A=0.94 0.02;0.06 0.98X=0.7;0.3; Y=A*XZ=A30*Xv,d=eig(A)s=v(1,2)+v(2,2);water=v(1,2)/s gas=v(2,2)/s（5）G=0 0 0 1 0 1;1 0 0 0 0 0;0 1 0 0 0 0;0 1 1 0 0 0;0 0 1 0 0 0;0 0 1 0 1 0; p=0.85;N=6;c=zeros(1,6);A=zeros(6,6);for n=1:6sum = 0; for m=1:6sum = sum + G(m,n);end c(n)=sum;endfor i=1:6for j=1:6A(i,j)=p*G(i,j)/c(j)+(1-p)/N;endend Av,d=eig(A); v