用随机函数产生80个10~99之间的随机整数,将其中的偶数按由小到大的...

发布网友

我来回答

1个回答

热心网友

Create Cursor Cur0 (num i)
Create Cursor Cur1 (num i)

For i = 1 To 80
m.Num = INT(RAND( ) * 90 + 10)
If Mod(m.Num,2) = 0
Insert Into Cur0 From Memvar
Else
Insert Into Cur1 From Memvar
endif
Endfor
Select num From Cur0 Order By num asc && 偶数
Select num From Cur1 Order By num desc && 奇数

声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com