算法课件课件.pptVIP

5.一个水平放置的四边形的斜二测直观图是一个底角为45°，腰和上底的长均为1的等腰梯形，那么原四边形的面积是（）（A）2+（B）1+（C）(2+)（D）(1+)C6.一个四边形的直观图是边长为a的正方形，则原图形的面积是。a=InputBox(输入第一个自然数)b=InputBox(输入第二个自然数)Dor=aModba=bb=rLoopUntilr=0MsgBox最大公约数为a?ExcelVBA-1算法

案例a=InputBox(输入第一个自然数)b=InputBox(输入第二个自然数)WhileaModb0r=aModba=bb=rWendMsgBox最大公约数为a?ExcelVBA-2例3用二分法求方程x3-x-1=0在区间[1,1.5]内的一个近似解（误差不超过0.001）。?问题背景与分析第一步确定有解区间[a,b]第二步取[a,b]的中点第三步计算函数在中点处的函数值第四步判断中点处函数值是否为0第五步判断新的有解区间的长度是否小于

给定的误差第4节算法案例?伪代码10Reada,b,c20x0←(a+b)/230f(a)←a3–a–140f(x0)←x03–x0–150Iff(x0)=0ThenGoto12060Iff(a)f(x0)0Then70b←x080Else90a←x0100EndIf110If|a–b|≥cThenGoto20120Printx0N输出x0x0←(a+b)f(x0)=0输入a,b,cb←x0f(a)f(x0)0|a–b|ca←x0f(a)←a3-a-1f(x0)←x03–x0–1YNYYN?流程图10a=Val(InputBox(输入区间左端点值))20b=Val(InputBox(输入区间右端点值))30c=Val(InputBox(输入误差点限制))40x0=(a+b)/250f1=a^3-a-160f2=x0^3-x0-170Iff2=0ThenGoto14080Iff1*f20Then90b=x0100Else110a=x0120EndIf130IfAbs(a–b)=cThenGoto40140MsgBox方程的近似解为x0?ExcelVBA-1a=Val(InputBox(输入区间左端点值))b=Val(InputBox(输入区间右端点值))c=Val(InputBox(输入误差限制))Dox0=(a+b)/2f1=a^3-a-1f2=x0^3-x0-1Iff2=0ThenExitdoIff1*f20Thenb=x0Elsea=x0EndIfLoopUntilAbs(a–b)cMsgBox方程的近似解为x0?ExcelVBA-2a=Val(InputBox(输入区间左端点值))b=Val(InputBox(输入区间右端点值))c=Val(InputBox(输入误差限制))Dox=(a+b)/2Iff(x)=0ThenExitdoIff(a)*f(x)0Thenb=xElsea=xEndIfLoopUntilAbs(a–b)cMsgBox方程的近似解为x?ExcelVBA-31.1.4投影与直观图一、投影