Is it delphi`s bug?????

2007-04-03 04:18:33 464 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

抓蜂鸟网站图片爬虫项目名称：抓蜂鸟网站图片爬虫源代码：http://download.csdn.net/detail/ytt747536970/7035393 参考微博：http://yxmhero1989.blog.163.com/blog/static/112157956201311743439712/ 所用工具：python2.7 使用方法：使用python2.7打开py文件因为实验室要用一个网阅读详情

procedure TForm1.Button1Click(Sender: TObject);
var
tempInt: integer;
begin
tempInt := Floor((7.2 - 7) * 10);
showmessage(IntToStr(tempInt));
end;

//run the procedure behind and tell me why?
//why the result is 1 not 2????
//Is it delphi`s bug?

...全文

python 爬虫爬取百度贴吧图片 urllib.request.urlretrieve图片批量下载函数每天一点点，记录学习琐事 python 爬虫爬取百度贴吧美图图片，urllib.request.urlretrieve图片批量下载函数百度贴吧美图网址：https://tieba.baidu.com/p/5815297430 思路：1:每次最多发3张图片，一张页面有35张图片； 2:在页面上的图片，右键，检查，可以看到每张图片存储的方式及位置 img中的src，用xpath方法进行抓取：这3... 阅读详情

何鲁青

语言基础/算法/系统设计 16,741 成员 33,233 内容

+ 关注 + 加入社区

切换为时间正序

何鲁青 2007-04-25

打赏
举报

有位高人指点道：
floor = round(x - 0.5);
ceil = round(x + 0.5);

何鲁青 2007-04-17

打赏
举报

http://stephensuen.spaces.live.com/Blog/cns!1p1G_DGhjYiYGmj6keNZQAcw!172.entry
看了上面的文章，发现对于对于float认识太浅薄了，揭帖，给分，留解决方案。

何鲁青 2007-04-17

打赏
举报

英语和浮点数有关系？

brightyang 2007-04-11

打赏
举报

我晕....
你英语这么好不去读读关于浮点数的介绍.

zaza_bbface 2007-04-06

打赏
举报

你才知道呀

何鲁青 2007-04-06

打赏
举报

听到了新消息：李维去CodeGear了，呵呵！

zwjchina 2007-04-03

打赏
举报

在single的情况下
无论 a:=0.500000003241342141234....后面怎么写
a = b都是成立的
因为，在内存中他们是一样的

zwjchina 2007-04-03

打赏
举报

再给例子,你可以看看结果
procedure TForm1.Button1Click(Sender: TObject);
var
a, b: single;//double
begin
a := 0.5000000001;
b := 0.5;
if a = b then
ShowMessage('ok');

end;

类型分别换成single和double是有不同结果的,如果你不明白浮点数的话,会认为在single的情况下,delphi又出bug了.

zwjchina 2007-04-03

打赏
举报

因为浮点数是不精确的数,只能和数很接近,但不一定等于该数
你可以找找资料看看浮点数的内存存储方式
其实,浮点数字随着阶码长度和尾数长度不同,其有意义的位数也是不同的.
比如我写的1.999999999999999999999,如果是single类型,有效数字只有8位
也就是 1.9999999469584和1.999999904343543在内存中的表示是无区别的,
换个角度说19999999324.0和119999999444也是没有区别的.

何鲁青 2007-04-03

打赏
举报

7.2-7)*10 = 1.999999999999999999999999999999999999...
but why????

flashtong 2007-04-03

打赏
举报

楼上的楼上证解

chenzhuo 2007-04-03

打赏
举报

难道 7 = 7.00000000000000000000000000000000000000000000000000000000000000000001?

zwjchina 2007-04-03

打赏
举报

不是BUG，是你对浮点数字理解不够。

Floor(1.99999999999)你觉得应该是多少？

(7.2-7)*10 = 1.999999999999999999999999999999999999...
(7.2-7)*10 != 2

chenzhuo 2007-04-03

打赏
举报

procedure TForm1.Button1Click(Sender: TObject);
var
tempInt: integer;
begin
tempInt := Floor((7.2 - 7.0) * 10);
showmessage(IntToStr(tempInt));
end;

这样可以,不知什么原因

chenzhuo 2007-04-03

打赏
举报

搞不清楚,tempInt := Floor((7.2 - 7) * 100);
是会等于19,那么也就是说系统(7.2-7)*10=1.9
floor(1.9)=1,

var
tempInt: double;
i: Integer;
begin
tempInt := (7.2 - 7)* 100;
i := floor(tempInt);
showmessage(IntToStr(i));
end;

这样就可以了!呵呵

Red_angelX 2007-04-03

打赏
举报

uouo

何鲁青 2007-04-03

打赏
举报

upup!!!

Is it delphi`s bug?????

相关推荐