十万火急!在线等 x的5次-5*x-1=0,求x?用DELPHI 写成一个程序 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 var sum,x:Extended;begin x:=StrToInt(Edit1.Text); sum:=power(x,5)-5*x-1; if sum=0 then ShowMessage('ok') else ShowMessage('no');end; 刚才打的比较急,将x:=StrToInt(Edit1.Text);改为x:=StrToFloat(Edit1.Text);比较好! Indy9基础问题 fastreport脚本问题? 用savedialog对话框保存文件时怎样防止有同名文件被覆盖? 报表打印问题? 高手、低手一起进来 怎样读一个库(access,sql等)里的所有表名 如何做一个类似delphi中组件拖放的东东?? delphi WebBrowser编程中,点击其中的连接时,不要出现IE的界面怎么设置? :D 各位请问,如何用FORM 在不隐藏任务栏的情况下,最大化时挡住任务栏 怎样往.exe文件里加入一段程序? 菜鸟问题,控件数组 如何打印form!
sum,x:Extended;
begin
x:=StrToInt(Edit1.Text);
sum:=power(x,5)-5*x-1;
if sum=0 then
ShowMessage('ok')
else
ShowMessage('no');
end;
x:=StrToInt(Edit1.Text);
改为
x:=StrToFloat(Edit1.Text);
比较好!