在delphi中:
uses Math;
procedure TForm1.FormCreate(Sender : TObject);
var
a : Double;
b : Double;
begin
//初始化a,b.
ShowMessage(FloatToStr(Max(a,b)));
end;
在delphi中,函数Max可以重载。所以,Max可以判断各种数值类型。另外还有函数Min,使用方法和Max相同。这种做法只能在delphi中才能使用,在其他的语言中需要人为的写函数进行判断。
比如用C++语言:
// C/C++中只能近似的判断出浮点数大小,因此需要使用结合相对误差和绝对误差来判断。
float Max(float a, float b,float error)
{
if(a==b)
cout<<"a=b"<<endl;
else if((a-b)>0 && (a-b)/a>error)
cout<<"a与b相差大于相对误差"<<endl;
else if((b-a)>0 && (b-a)/a>error)
cout<<"a与b相差大于相对误差"<<endl;
else
cout<<"a与b近似相等"<<endl;
return 0;
}
void main()
{
//float a ,b;
Max(0.1000001,0.1000010,0.00001);
}
原文链接: https://www.cnblogs.com/Blogs-young-chan/p/4680291.html
欢迎关注
微信关注下方公众号,第一时间获取干货硬货;公众号内回复【pdf】免费获取数百本计算机经典书籍
原创文章受到原创版权保护。转载请注明出处:https://www.ccppcoding.com/archives/219787
非原创文章文中已经注明原地址,如有侵权,联系删除
关注公众号【高性能架构探索】,第一时间获取最新文章
转载文章受原作者版权保护。转载请注明原作者出处!