作者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