算法举例若干三角形面积计算判断质数二分法解方程判断三角形数列求和程序三数大小排序一元二次方程求根算法举例若干辗转相除法秦九韶算法进制转换割圆术根分数计算搜索问题整除问题p=(2+3+4)/2s=SQR(p*(p-2)*(p-3)*(p-4))输出s结束开始三角形面积计算开始输入nflag=1d=2flag=0d=d+1n>2d整除n?d<=n-1且flag=1?flag=1?n是质数n不是质数结束是否否是否是否是判断质数程序开始x1=1x2=2f(x)=x2-2x1=mx2=mm=(x1+x2)/2x1=mx2=mf(m)=0?f(x1)f(m)>0|x1-x2|<0.005结束输出所求的近似根mm=(x1+x2)/2是否否是否是二分法解方程开始输入a,b,ca+b>c,a+c>b,b+c>a是否同时成立?存在这样的三角形不存在这样的三角形结束否是判断三角形开始i=1sum=0i=i+1sum=sum+ii≤100?输出sum结束否是求和程序开始t=a,a=b,b=tt=a,a=c,c=tt=b,b=c,c=t输入a,b,c输入a,b,cb>a?c>a?c>b?结束是是否否是否三数排序程序开始输入a,b,cΔ=b2-4acp=-b/2aq=SQR(ABS(Δ))/(2a)x1=p+qx2=p-qΔ≥0?x1=x2?原方程有两个不等的实数根x1,x2原方程有两个相等的实数根x1,x2原方程无实数根结束是否是否一元二次方程求根开始输入两个正整数n,mn>m?t=nn=mm=tr=mMODnr=0?m=nn=r输出最大公约数n结束否是辗转相除法开始输入f(x)的系数:a0、a1、a2、a3、a4、a5输入x0n=1v=a5n=n+1v=v·x0+a5-nn≤5?输出v结束否是秦九韶算法开始输入一个k进制的数a输入基数kS=0I=1将数字a转换顾字符bb$=str$(a)计算b$的长度m=Len(b$)取出b$中左起第I个字符c$=mid#(b$,I,1)转换成数字c=val(c$)S=S+c*k^(I-1)I=I+1I>m输出结果S结束是否进制转换开始输入n(n=96)输出n,s结束i=6x=1计算正六边形面积S=6*SQR(3)/4计算多边形的高h=SQR(1-(x/2)^2)计算多边形面积s=s+i*x*(1-h)/2计算多边形边长x=SQR((x/2)^2+(1-h)^2)i=2*in=2*nin?否是割圆术体会计数器—根分数(含有8个6)a1/6开始n1a16ann+1n7结束NY处理器输出a8根分数线中,只有上面7根决定循环的次数,注意排除最后1根的干扰.同样,8个“6”中只有前7个决定循环的次数.实质上,最后那个1/6可以换为任意数而不影响总体设计,只是改变一下a的初始值而已.I112.1iGPrint,iiNGII+1I10结束NYYN例写出在数5、8、19、7、35、6、18、56、2中搜索数18的一个算法,并画出流程图。iGiGNY开始打印结束=18i1ii+1输入各数据i11NY整除问题:例画出求两个正整数a与b相除所得商q及余数r的一个算法的流程图开始输入a、bq0a-bqbra-bq输出qr结束qq+1NY