假設 DATA DIVISION 之前的程式碼區已經提供如下：【25 分】 IDENTIFICATION DIVISION

(1)

高雄銀行 105 年新進人員甄試試題

職等／甄試類別【代碼】：七職等／台幣主機應用程式設計人員【I6207】

科目二：程式撰寫（以 COBOL 程式語言為主）

＊請填寫入場通知書編號：________________

注意：作答前須檢查答案卷、入場通知書號碼、座位標籤號碼、應試類別是否相符，如有不同應立即請監試人員處理，使用非本人答案卷作答者，該節不予計分。

本試卷為一張單面，共有四大題之非選擇題，每題配分 25 分，總計 100 分。

非選擇題限用藍、黑色鋼筆或原子筆於答案卷上採橫式作答，並請依標題指示之題號於各題指定作答區內作答。

請勿於答案卷上書寫姓名、入場通知書號碼或與答案無關之任何文字或符號。

本項測驗僅得使用簡易型電子計算器(不具任何財務函數、工程函數功能、儲存程式功能)，但不得發出聲響；若應考人於測驗時將不符規定之電子計算器放置於桌面或使用，經勸阻無效，仍執意使用者，該科扣 10 分；該電子計算器並由監試人員保管至該節測驗結束後歸還。

答案卷務必繳回，未繳回者該科以零分計算。

第一題：

撰寫程式從鍵盤輸入 a,b 兩數，若 a>b 要重新輸入，請輸出 a~b 的所有質數，並計算其個數。以其中一數為-1 當作結束不列入計算。

假設 DATA DIVISION 之前的程式碼區已經提供如下：【25 分】

IDENTIFICATION DIVISION.

PROGRAM-ID. SeqWrite.

ENVIRONMENT DIVISION.

CONFIGURATION SECTION.

SOURCE-COMPUTER. IBM-370.

OBJECT-COMPUTER. IBM-370.

作答時只需從 DATA DIVISION 部分開始寫。

第二題：

撰寫程式使之能從鍵盤輸入三角形三邊長，判斷是否可以形成三角形，若可形成三角形，請問是何種三角形（正、等腰或直角，若是其他三角形不用標示出），以其中一邊長為-1 當作結束不列入計算。【提示：正三角形三邊長皆相等，等腰三角形任兩邊長相等，直角三角形請帶畢氏定理，兩邊平方和等於最大邊平方】

第三題：

撰寫程式使之能從鍵盤連續輸入任何整數，以-1 當作結束不列入計算，印出這些值的最小及次小的值。

第四題：

撰寫程式使之能從鍵盤輸入任何成績，超過 100 則重新輸入，以-1 當作結束不列入計算，

請列出其等第。等第分級如下：

90~100 等第 A 80~89 等第 B 70~79 等第 C 60~69 等第 D

< 60 等第 F