算法复习参考题_第1页
算法复习参考题_第2页
算法复习参考题_第3页
免费预览已结束,剩余6页可下载查看

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

复习参考题,P.40复习参考题A组第1题QB源程序,INPUTpleaseinputaletter;x$IFx$=CTHENPRINTGENDIFIFx$=hTHENPRINTlENDIFIFx$=iTHENPRINTmENDIF,IFx$=nTHENPRINTrENDIFIFx$=aTHENPRINTeENDIFIFx$CORx$hORx$iORx$aORx$nTHENPRINT?ENDIFEND,开始,输出提出:“输入第一个方程的系数”,“x的系数是”:a1“y的系数是”:b1“常数项是”:c1,输出“x=”;x“y=”;y,方程有无数多组解,a1*b2a2*b10,x=(c2*b1c1*b2)/(a1*b2a2*b1),y=(c2*b1c1*b2)/(a1*b2a2*b1),结束,输出提出:“输入第二个方程的系数”,“x的系数是”:a2“y的系数是”:b2“常数项是”:c2,N,Y,c1=c2,方程无解,P.40复习参考题A组第2题框图,P.40复习参考题A组第2题QB源程序,INPUT请输入第一个方程的系数a1,b1,c1:;a1,b1,c1INPUT请输入第二个方程的系数a2,b2,c2:;a2,b2,c2IFa1*b2-a2*b10THENx=(c2*b1-c1*b2)/(a1*b2-a2*b1)y=(c1*a2-c2*a1)/(a1*b2-a2*b1)PRINTx=;xPRINTy=;yELSEIFc1=c2THENPRINT方程组有无数多组解ELSEPRINT方程组无解ENDIFENDIFEND,开始,输入一个正整数n,输入S的值,结束,S=0,i=1,S=S+1/i,i=i+1,in,Y,N,INPUT输入一个正整数n:“;nI=1s=0WhileI=3.21ANDx=4.2ANDx=5.21ANDx=6.22ANDx=7.23ANDx=8.23ANDx=9.23ANDx=10.23ANDx=11.22ANDx=12.22ANDx=1.2ANDx=2.19ANDx6THENx=xMOD7ENDIFIFx=0THENp$=SundayENDIFIFx=1THENp$=MondayENDIFIFx=2THENp$=TuesdayENDIF,IFx=3THENp$=WednesdayENDIFIFx=4THENp$=ThursdayENDIFIFx=5THENp$=FridayENDIFIFx=6THENp$=SaturdayENDIFPRINTp$END,P.40复习参考题B组第1题源程序,开始,x1=20 x2=21,f(x)=1.3x3-26.013x2+0.975x-19.50975,x1=mx2=m,m=(x1+x2)/2,x1=m,x2=m,f(m)=0,f(x1)f(m)0,|x1-x2|0.005,结束,输出所求的近似根m,m=(x1+x2)/2,y,n,n,y,n,y,P.40复习参考题B组第2题框图,P.41复习参考题B组第3题QB源程序,INPUTn=;ns1=0s2=0s=0i=1DOs1=s1+nn=n/2s2=s2+ns=s+s1+s2i=i+1LOOPUNTILi10PRINTs1=;s1PRINTn10=;nP

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论