商科技艺竞赛试题解析.PDF

商科技藝競賽 16 試題解析 16-1　96年試題解析 16-2　97年試題解析 16-3　98年試題解析 16-4　99年試題解析 程　式　設　計 本書以下兩章解析商科與工科技藝競賽試題，這些題目都非常有創意且 實用，值得高中職學生臨摹解析，筆者在此提供解答，期望更多人一起共襄 盛舉。其次，競賽前的注意事項如下 ： 1. 記得自備USB鍵盤與滑鼠，因為每一鍵盤的尺寸與觸感不一，比賽時間分 秒必爭，當然是要自備以上工具。 2. 競賽前幾天，腦筋還是要低溫運轉 ，這樣一進考場，才能馬上加速前進。 反之，若停機太久，則要耗費較多時間，才能正常運轉。 3. 競賽前要有至少兩次4小時的模擬考，這樣才能練習專注力與持續力。 4. 競賽給的隨身碟資料要先複製到硬碟 ，以免不慎破壞 ，尤其工科是逐題 交出隨身碟檢查，一旦回座發現問題 ，要能馬上先行更正，並要求取回重 交。若未先行複製檔案，則必須先取回、重做、再重交，當然為時已晚。 5. 存檔路徑與格式要符合競賽規定，否則評審可能找不到檔案。 6. 要能精準選題 ，不要隨便作，又隨便放棄，結果一事無成。尤其要先拿到 基本題2~4題 ，就可拿到優勝而上台領獎。不然辛苦一年，到頭來空手而 回，那就虧大了。 16-1 96年試題解析 ⾽ 、 一 最長遞增子序列(21%) )考慮一個數列在刪除最少個數的情況下 ，使得剩下的數字呈現遞增狀 態。例如 ：有一個數列為8,20,27,17,13,28,35,31 ，若保留前三個數字，其 餘的全部刪除，剩下的就是一個遞增序列 ；或者是保留第一、第三、第六 及第七 ，其餘的全部刪除，剩下的也是一個遞增序列 ，但是與前一個例子 相比 ，其遞增的序列較長。 16-2 chapter 商科技藝競賽試題解析 16 ⾽輸入說明 輸入之奇數列為下一行數列中的個數，偶數列為數列資料，代表一組測 試資料。每個數字與數字間的區隔為一個空白符號 ，當奇數列為0 時表示結 束 （請參照輸入範例）。 ⾽輸入範圍 每個數列最少有2 個數字，最多不超過100 個。每個數列中的數字皆大 於0 ，小於1000 ，且不重複。 ⾽輸入範例 test1.txt 8 8 20 27 17 13 28 35 31 15 13 14 55 21 66 72 23 73 1 2 88 83 84 24 7 0 ⾽輸出說明 每組測試的數列皆要輸出欲刪除的個數 （請參照輸出範例）。 ⾽輸出範例 result1.txt 3 7 ⾽輸出結果 16-3 程　式　設　計 ⾽演算說明 Cn Cn Cn Cn 本題可依序由 、 、 、 檢驗是否遞增，當遞增時即為最長遞 n n−1 n−2 n−3 增子序列。 ⾽程式列印 以下程式先使用陣列預設數列資料。 Private Sub Command1_Click () Dim r, n, k, index As Integer Dim c As Variant r = 25 c = Array (0, 16, 17, 1, 2, 3, 4, 5, 18, 6, 19,