作者wdavidptt (wdavid)
看板NCIT
标题Re: [问题] 请问几题计概问题
时间Thu Jan 18 00:54:47 2007
说真的不知道回覆这种文章到底妥不妥当，
如果版主认为不妥就删了吧，
我不知道你为什麽不自已找书看，
也许是找不到或是有什麽理由吧。
我也不确定我的答案是否正确，希望你可以再求证一下是最好的。
※ 引述《bingomas (9527)》之铭言：
: 第一题
: Rem Main Program
: K=Game(5)
: Print K
: End
: Function Game(X)
: If(X>1)Then
: Game=X*Game(X-1)
: Else
: Game=1
: End If
: End Function
这题就是简单的回归问题，算出来的答案就是5阶层→5*4*3*2*1=120
Function内主要的逻辑就是X*((X-1)*((X-1)-1)).....到1为止
稍微想一下应该可以了解
: 第二题
: Private Sub Form_Activate() Function FS(X)
: X=5 FS=X
: A=FS(X) For J=X To 3 Step -1
: Print A+X FS=FS*J
: End Sub NEXT J
: END Function
这题主要是函式观念与回圈的问题
Function的初始值是5，接下来的回圈是由5开始每次-1至3为止
将回圈变数J乘进FS内，也就是5(FS初值)*5*4*3=300=A
而最後的print则是A+X，所以是300+5=305
: 第三题
: S=0
: For K = 1 TO 5
: For J 1 TO 5
: S=S+K+J
: Next J
: Next K
: print K * J
这题也是考你回圈的观念，中间的S对於答案是没有任何作用的，
重点在於最後的print是K*J，而K和J分别是1 TO 5的回圈，
而最後的值都会落在6，因为6>5，所以跳出回圈，此时的值是6不是5，
当值是5的时候还在回圈内，碰到next再回到for的时候还是会再加上预设的1
因此答案应该是6*6=36
: 第四题
: A=InputBox("A=")
: WhileA<5
: Print A;
: A=A+1
: Wend
最後一题则是让使用者自行输入A的值，
但是A的值是无法控制的，如果A>=5，则没有任何东西会被显示。
但是A小於5的时候，则会先列印出来，再作+1的动作。
所以可能出现的答案最後一个就是4了，因为等於5便不会进入回圈。
假设A>=0且为整数，可能出现的答案有：
A=0: 01234
A=1: 1234
A=2: 234
A=3: 34
A=4: 4
A>=5 : (不显示)
希望可以解决你的问题。
最後再强调一次，也许问别人是很快的方法，至少比翻书快，
但问过了就一定要记起来，下一次再碰到就要自已解决了。
如果这篇文章不妥，版主就...删了吧。(我承认我是来赚p币的)
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 61.64.168.113
1F：推 u39132003:胖大师出手, 果然不同凡响, 真不愧是勤益资管程设最强的 01/18 00:56
2F：→ u39132003:男人。 01/18 00:56
※ 编辑: wdavidptt 来自: 61.64.168.113 (01/18 00:57)
3F：推 wdavidptt:强个屁..硬要当就对了@@ 01/18 00:57
4F：推 u39132003:没要当啊, 在称赞你欸, 你的强是连老师都要找你帮他上课 01/18 01:02
6F：推 funnyway:XD 01/18 01:20
7F：推 pecr:输了!!XD 01/18 01:22
8F：→ ymbok:奕翔 老实说 你是不是踢一踢飞儿狗他大叔叔的儿子? 01/18 01:24
9F：→ ymbok:不要因为照片翻白眼就不好意思说出来 01/18 01:25
10F：→ ymbok:更正：叔叔的大儿子＠＠ 01/18 01:34
11F：推 u39132003:.......... 我没有那麽帅气的被照下来过 01/18 01:35
12F：→ ymbok:很真诚的表情啊 01/18 01:37