文档介绍：资源网站 -1- / 助你专升本 1 .递推算法(常用级数、数列求和、二分法、梯形积分法、穷举法等); * 1+1/2+1/3+1/4+...+1/n clear input '请输入 n的值:N=' ton s=0 for i=1 tons=s+1/i endfor ?S*112358 13..... clear input '请输入 n的值:N=' ton dimension a[n] a[1]=1 a[2]=1 s=2 for i=3 tona[i]=a[i-1]+a[i-2] s=s+a[i] endfor ?S* 二分法解方程 3x*x*x-4x*x+3x-6=0 要求误差小于十的负六次方 clear input 'x1=' tox1 input 'x2=' tox2 fx1=x1*((3*x1-4)*x1+3)-6 fx2=x2*((3*x2-4)*x2+3)-6 dowhile fx1*fx2 >0input 'x1=' tox1 input 'x2=' tox2 fx1=x1*((3*x1-4)*x1+3)-6 fx2=x2*((3*x2-4)*x2+3)-6 enddo x0=(x1+x2)/2 fx0=x0*((3*x0-4)*x0+3)-6 dowhile abs(fx0)>= x0=(x1+x2)/2 fx1=x1*((3*x1-4)*x1+3)-6 资源网站 -2- fx0=x0*((3*x0-4)*x0+3)-6 if((fx0*fx1)<0) x2=x0 else x1=x0 endif enddo ?x0 * 梯形积分法求函数 f=x*x-5x 在区间[a,b] 上的积分* clear ?txjf(1,10,10000) function txjf parameters a,b,n h=(b-a)/n s=0 for i=1 tonfa=f(a+i*h) fb=f(a+(i+1)*h) s=s+(fa+fb)*h/2 endfor return sfunction fparameter xreturn x*x-5*x 现有面值为 l元、 2元和 5 元的钞票( 假设每种钞票的数量都足够多) ,从这些钞票中取出 30 张使其总面值为 100 元,问有多少种取法? 输出每种取法中各种面额钞票的张数。 clear for i=1 to30 for j=1 to30 for k=1 to20 ifi+j+k=30 and i+2*j+5*k=100 ?'1元的'+str(i)+' 张'+'2 元的'+str(j)+' 张'+'5 元的'+str(k)+' 张' endif endfor endfor Endfor 2 .排序算法(选择法、冒泡法); 资源网站 -3- clear input 'N=' tondimension a[n] for i=1 toninput 'a['+str(i,2,1)+']=' toa[i] endfor for i=1 ton-1 p=i for j=i+1 tonIfa[j]<a[i] p=jEndIf endfor ifp<>i temp=a[i] a[i]=a[p] a[p]=temp endif endfor for i=1 ton??a[i] endfor clear