作者supercygnus (......)
看板Visual_Basic
标题[VB6 ] 取乱数的问题
时间Thu Mar 31 22:05:35 2011
下列片段程式执行完毕後
请列出第40 行所有可能出现的A 值
堦请列出第50 行所有可能出现的B 值
10 RANDOMIZE (TIMER)
20 A = INT(RND * 10)
30 B = INT((A + 1) / 2) * 2
40 PRINT A
50 PRINT B
程式说明:
指令 说明
RANDOMIZE(TIMER) 以时间当乱数种子选取乱数表
INT( NUMBER ) 对NUMBER 取整数
RND 为乱数产生器,数值范围介於0 至小於1 之间的浮点数
答案是:
A:0,1,2,3,4,5,6,7,8,9
B:0,2,4,6,8,10
请问要怎麽看呢~? 谢谢
A我知道怎麽看,但是当A=0时,((0+1)/2)*2 这样不就等於1了 ,
那B的答案为什麽没有1呢~?
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 118.160.137.39
※ 编辑: supercygnus 来自: 118.160.137.39 (03/31 22:08)
1F:推 pinkykk:因为INT罗,无条件舍去了 03/31 22:25
2F:→ MOONRAKER:你这是在用什麽上古时代的书 有行号还有print 04/01 00:02
3F:→ MOONRAKER:拜托换本新的吧 你这样学完也不是学VB6 04/01 00:02
4F:推 stool100:我支持你继续用这个版本.真的. 04/01 00:35
5F:→ supercygnus:这是考题啦 04/01 01:17
6F:→ samplewu:从allpost追文章追到这 XD 你这样的程度真的要考国考? 04/01 01:44
8F:→ samplewu:函数的功用要分清楚 INT和CINT不一样 04/01 01:48