开方溢出???

[qfzcx]

如下:
x:extended;
x:=sqrt(50000*50000);
此时编译提示如下错误,[Error] SK.PAS(984): Overflow in conversion or arithmetic operation
我原来的计算数值有可能比50000*50000要大,我改变了几次x的数据类型都有错误怎么办??
难道开平方还对数值有限制? 如果在程序中是变量在运算过程中提示的是:
Invalid floating point operation.
怎么解决啊???

[dBASEIII]

需要显式地告诉编译器,你的立即数是实型的,比如:

var
X : Extended;
begin
X := sqrt(99999999.0 * 99999999.0);//还可以更大,自己试一下
end;

如果用99999999,那么编译器可能默认为一个integer立即数,计算完后,再转为实型

[qfzcx]

例如当是变量的时候怎么告诉编译器呢?
a,b:我声明过几种类型都有错误.
x:=sqrt(a*a+b*b);

[dBASEIII]

其实你完全可以自己试一下:

var
X : Extended;
A,B : Double;
begin
A := 99999999;
B := 99999999;
X := sqrt(A * B);
edit1.text := FloatToStr(X);
end;

[dBASEIII]

var
X : Extended;
A,B : Double;
begin
A := 99999999;
B := 99999999;
X := sqrt(A * A + B * B);
edit1.text := FloatToStr(X);// Result : 141421354.823096
end;