（二）請用PERFORM…THRU…VARYING… UNTIL 撰寫1 到101 所有奇數的和。【15 分】 註：作答時只需撰寫 PROCEDURE DIVISION 部分就可。

第一題： 使用COBOL程式語言撰寫一程式，此程式能從鍵盤輸入兩個小於100的正整數X與Y， 並判斷 X 的十位數或個位數是否有與 Y 的十位數或個位數的數值相同？如果是，則於螢幕上 輸出"YES"；否則於螢幕上輸出"NO"。假設使用者輸入之資料皆會符合小於 100 之正整數規 範，故程式中不需額外考慮輸入資料時會有不符規範之程式碼。例如：X 與 Y 之輸入值分別 為 81 與 98，因有 8 相同，則螢幕輸出結果為 YES。如輸入只有個位數之情況，則視同其十 位數部分為 0。所以如果輸入 4，則視之為 04。所以如果 X 與 Y 之輸入值分別為 50 與 4， 因有 0 相同，則螢幕會輸出 YES。同理，如果 X 與 Y 之輸入值分別為 2 與 9，因有 0 相同， 則螢幕也會輸出 YES。【25 分】 註：COBOL 程式作答時只需從 DATA DIVISION 部分開始撰寫，DATA DIVISION 之前 的部分無需撰寫。

第二題： 使用 COBOL 程式語言撰寫一程式，此程式能先從鍵盤輸入一個正整數 N 當做接續要從 鍵盤輸入整數的資料量，如果所輸入的 N 不是大於 0，則必需重新輸入，直到所輸入的 N 大 於 0 的整數為止。再根據所輸入之 N 值，從鍵盤連續輸入 N 個整數，最後於螢幕輸出此後 續輸入 N 個整數後為偶數的數量。例如：先從鍵盤輸入之 N 為 7，則表示接續需再從鍵盤連 續輸入 7 個整數，假設該輸入的 7 個整數為 141, 86, 42, 53, 18, 31, 5，則螢幕輸出該 7 個 整數後為偶數的數量為 3。【25 分】 註：COBOL 程式作答時只需從 DATA DIVISION 部分開始撰寫，DATA DIVISION 之前 的部分無需撰寫。

（一）有一個採購交易紀錄包括採購單號、廠商名稱、採購數量內容存到磁碟中，請試 寫新增刪除記錄的程式。【15 分】 註：作答時只需撰寫 DATA DIVISION 以及 PROCEDURE DIVISION 兩部分就可。

（二）請根據上述採購交易紀錄，撰寫計算每日及每月的採購交易量之程式。【10 分】 註：作答時只需撰寫 DATA DIVISION 部分就可。

（一）有一個班級共 80 人，撰寫一 PERFORM THRU 常式來分別統計男女人數。【10 分】

第四題： 使用 COBOL 程式語言撰寫一程式，此程式中會宣告一個可容納 100 筆整數的一維陣 列 DATA-REC，使用者最多可從鍵盤輸入 100 筆整數資料至此一維陣列 DATA-REC 中， 但如果使用者在輸入資料過程中輸入 999999，則即使輸入資料量不足 100 筆，也將停止後 續資料的輸入，然後將所有輸入整數之平均值（不包含輸入的 999999）輸出於螢幕上。 [註：DATA DIVISION 之前的部分不需撰寫，作答時僅需從 DATA DIVISION 部分開始撰寫。] 【25 分】

第三題： 請撰寫程式使之能計算TOTAL = 之值並於螢幕上輸出 TOTAL 結果。【註：k! = 1 × 2 × 3 × … × k ; k# = 1 + 2 + 3 + ⋯ + k】 [註：DATA DIVISION 之前的部分不需撰寫，作答時僅需從 DATA DIVISION 部分開始撰寫。] 【25 分】

第二題： 海龍(Heron)公式是個可以計算三角形面積的公式，假設三角形的三邊長分別為 A, B, C，且 ，則三角形的面積。請以 COBOL 程式語言撰寫一程式使之能從鍵盤輸入 A, B, C 三個正整數並於螢幕上輸出 AREA 的結果。 [註：DATA DIVISION 之前的部分不需撰寫，作答時僅需從 DATA DIVISION 部分開始撰寫。] 【25 分】

第一題： 請設計一個 COBOL 程式，當中定義一個產品資料表格，內部包含：(1) 300 種產品的 編號，(2)各種產品均有 3 個型態、而各個型態有其價格及數量（可參考下方之產品資料表 格，其中各編號為由小至大排列、而編號內之各型態則為由大至小排列）。之後，請設計程 式以透過鍵盤輸入取得欲查詢之產品編號及型態資料，並呼叫一個副程式將此產品編號及 型態的值傳遞過去，並於副程式中透過二分搜尋法找到並顯示出符合此產品編號及型態的 產品價格及數量，但若無法找到符合的產品編號或型態，則顯示 “無法找到” 訊息。 [註：DATA DIVISION 之前的部分不需撰寫，作答時僅需從 DATA DIVISION 部分開始撰寫。] 【25 分】

109年 - 109 合作金庫商業銀行 新進人員甄試 大型主機程式設計人員：程式設計(以COBOL語言為主)#85462

108年 - 合作金庫商業銀行 108 年第二次新進人員 大型主機程式設計人員 專業科目：程式設計(以 COBOL 語言為主)#78866