| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 3687 人关注过本帖
标题:奇偶数判定代码
只看楼主 加入收藏
TZTJ
Rank: 3Rank: 3
等 级:论坛游侠
威 望:1
帖 子:737
专家分:115
注 册:2008-1-15
结帖率:100%
收藏
已结贴  问题点数:20 回复次数:59 
奇偶数判定代码
请高手帮忙,以下代码我想用来判定奇偶数,但得到全是偶数,我怎么查都找不到原因
   count for 年级=a(1) to bs1
     count for 年级=a(2) to bs2
  alter table kach add 考号 n(6)
n=reccount()
for i=1 to bs1
if int(n/2)!=n/2
bm= int(rand()*bs1)*2+1
replace 考号 WITH  bm for 年级=a(1)
endif
endfor
FOR j=1 TO bs2
if int(n/2)=n/2
bm1= int(rand()*bs2)*2
replace 考号 with  bm1 for 年级=a(2)

ENDIF
endfor
2015-10-18 20:55
sdta
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
来 自:江苏省连云港市
等 级:版主
威 望:335
帖 子:9841
专家分:27213
注 册:2012-2-5
收藏
得分:3 
mod(X,2) 或 X%2 为0

坚守VFP最后的阵地
2015-10-18 21:03
TZTJ
Rank: 3Rank: 3
等 级:论坛游侠
威 望:1
帖 子:737
专家分:115
注 册:2008-1-15
收藏
得分:0 
感谢!为什么bm1=int(rand()*n)*2+2 与bm2=int(rand()*n)*2+1都是偶数呢?
2015-10-18 21:31
wcx_cc
Rank: 9Rank: 9Rank: 9
等 级:贵宾
威 望:52
帖 子:371
专家分:1157
注 册:2015-10-2
收藏
得分:3 
n=reccount(),是个定植。导致 if int(n/2)!=n/2,if if int(n/2)=n/2 中,只能其中一个有作用,或者全部奇数,或者全部偶数。
2015-10-18 21:47
TZTJ
Rank: 3Rank: 3
等 级:论坛游侠
威 望:1
帖 子:737
专家分:115
注 册:2008-1-15
收藏
得分:0 
怎样表示随机奇偶数呢?
2015-10-18 21:59
吹水佬
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:版主
威 望:451
帖 子:10607
专家分:43186
注 册:2014-5-20
收藏
得分:3 
以下是引用TZTJ在2015-10-18 21:31:08的发言:

感谢!为什么bm1=int(rand()*n)*2+2 与bm2=int(rand()*n)*2+1都是偶数呢?

bm1=int(rand()*n)*2
bm2=int(rand()*n)*2+1
怎会都是偶数呢?
2015-10-18 22:48
tlliqi
Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19Rank: 19
等 级:贵宾
威 望:204
帖 子:15453
专家分:65956
注 册:2006-4-27
收藏
得分:3 
都是偶数?
2015-10-19 07:16
沙枣
Rank: 4
来 自:宁夏银川
等 级:业余侠客
威 望:5
帖 子:103
专家分:221
注 册:2015-5-31
收藏
得分:3 
回复 楼主 TZTJ
bm1=int(rand()*n)*2
bm2=int(rand()*n)*2+1
   rand()函数有个特点,如果括号中不指定参数,则每次启动时都使用默认的“种子”,导致每次启动时产生的随机数序列可能相同,如果前一次int(rand()*n)为偶数,则int(rand()*n)+2就是,如果后一次int(rand()*n)为奇数,则int(rand()*n)+1也是偶数,这要看rand()的运行姿态。
    rand()函数使用时,应当预先输入几个不同的参数计算,让其“空”运行,打乱其固有的随机数序列,才能较好产生所需的随机数,供参考。
2015-10-19 08:08
wengjl
Rank: 14Rank: 14Rank: 14Rank: 14
等 级:贵宾
威 望:109
帖 子:2214
专家分:3882
注 册:2007-4-27
收藏
得分:3 
if int(n/2)=n/2
  n是偶数
else
  n是奇数
endif

只求每天有一丁点儿的进步就可以了
2015-10-19 09:49
TZTJ
Rank: 3Rank: 3
等 级:论坛游侠
威 望:1
帖 子:737
专家分:115
注 册:2008-1-15
收藏
得分:0 
感谢高手们指点。四个班学生怎样处理得到的数据同班学生不能连在在一起
2015-10-19 10:28
快速回复:奇偶数判定代码
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.039356 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved