疑难杂症
实在实不会做，请教各位了！一组数据有这样的规律：（2），（4、6），（8、10、12），（14、16、18、20）请问2008在第几组？
2007-05-14 04:46
2007-05-14 13:40
2007-05-14 17:30
2007-05-15 06:00
dim i as integer, j as integer, k as integer, r as integer
k = 1
r = 0
for i = 1 to 1000
for j = 1 to k
r = r + 1
if r = 1004 then
exit for
end if
next j
if r = 1004 then
exit for
end if
k = k + 1
next i
k 就是最后的结果
2007-05-15 09:52
2007-05-15 12:50
2007-05-17 04:54
2007-05-17 16:29
dim i as integer, j as integer, k as integer, r as integer
k = 1
r = 0
for i = 1 to 1000
for j = 1 to k
r = r + 1
if r = 1004 then
exit for
end if
next j
if r = 1004 then
exit for
end if
k = k + 1
next i
k 就是最后的结果
谢谢楼上的哈哈，不是楼主！
2007-05-18 06:51