大师作文网谁知道郑启华的PASCAL程序设计第五章习题答案
来源：学生作业帮 编辑：大师作文网作业帮 分类：综合作业 时间：2024/11/18 14:12:49
谁知道郑启华的PASCAL程序设计第五章习题答案
用函数解 输入a,b,c,计算M.M=max(a,b,c)/(max(a,b,c)*max(a,b,c)) 将求三个数的最大数max（x,y,z）
用函数解 输入a,b,c,计算M.M=max(a,b,c)/(max(a,b,c)*max(a,b,c)) 将求三个数的最大数max（x,y,z）
5.7 输入a,b,c,计算m.已知： m=max(a,b,c)/(max(a+b,b,c)*max(a,b,b+c) 将求三个数的最大数max(x,y,z)定义成函数和过程两种方法作此题. 用函数解题： program ex5_71; var a,b,c,m:real; function max(a,b,c:real):real; var ma:real; begin ma:=a; if b>ma then ma:=b; if c>ma then ma:=c; max:=ma; end; begin read(a,b,c); writeln('a=',a,'b=',b,'c=',c); m:=max(a,b,c)/(max(a+b,b,c)*max(a,b,b+c); writeln('m=',m); end.