作者AppleMan (蜷着苹果的猫)
看板Prob_Solve
标题Re: VB目前问题
时间Tue Aug 19 19:35:03 2003
※ 引述《popfish (好了吗)》之铭言:
: 我设计了一个有规矩性的数列:
: 1000 1005 1010 1015 1020 1030 1040 1050 1060 1070 1085 1100 1115 1130 1145...An
: 分别对应1 2 3 4 5....n
: 想要用vb求这n
: 比如说 当我将 某An值输入text里头
: 然後按计算键 计算结果将n值显示在一lable上
: 若An=1005 则label显示2
: An=1008 一样显示2
: An=1018 则显示4
: 大於1020小於1030显示为5...等等
: 请问该怎麽写?? 程式码应该如何?
: 当时我想说用阵列 但使用发生错误 说缺MSDN语言无法执行
: 也不知道是我写错 还是电脑缺了这功能才写不出来
: 不知道有没人有知道别的写法 我只会阵列...和土法炼钢法...
既然是你设计的数列,即使是 MSDN 我也不认为会有这个数列的计算式。
回圈中利用的特性为,您这个数列似乎是扩散数列(An+1 > An)。
那麽一个无尽回圈如下 :
当答案还没找到,作以下回圈
{
N++;
计算 数列的下一个值(An+1)。
如果 数列的下一个值 等於 使用者输入数列
找到答案,脱离回圈。
如果 数列的下一个值 大於 使用者输入数列
输入值不存在於本数列中。
脱离回圈。
}
在资料结构上来说,这个回圈甚至不需要动用到阵列。
你只需要用到四个变数 ( Aperv, Acurr, Anext and Counter
前一数列值 目前数列值 下一个数列值 以及 N ) 就可以做出这个回圈。
老猫
--
※ 发信站: 批踢踢实业坊(ptt.csie.ntu.edu.tw)
◆ From: 61.56.254.32