103年 銀行招考、金融雇員 不分職等 合作金庫-大型主機程式設計人員 程式設計(以COBOL語言為主)、系統分析及資料結構 試卷

pdf
286.36 KB
1 頁
youbin
侵權投訴
加載中. ..
PDF
 103 








F2910



(
COBOL
)
 !"#$%&
 !"#$%& !"#$%&
 !"#$%&



________________

 !"#$%&'
()*+,"-./01
2345678!9:;<=>?;@;A/B3
25
/0
=>?;CDEFGHIJKLIMNO
&PQR4STUVW
XYZ[-]/

0



 !"#$%&&apos;( )
 !"#$%&&apos;( ) !"#$%&&apos;( )
 !"#$%&&apos;( )*
**
*
(+,-./0123456
+,-./0123456+,-./0123456
+,-./0123456
(
"^_`abcdefcdghijfkgh
)
l " m
nopqrst(Muvwx"yz<{L.|}~M7JD
DYZ]
10
/rZ{L.|}&apos;()Zuv0
789
789789
789:
::
:;89<=>?@A45
;89<=>?@A45;89<=>?@A45
;89<=>?@A45*
**
*1
&apos;(
&apos;(&apos;(
&apos; (
COBOL

X
!
10
...
!
4
!
3
!
2
!
1
104321
XXXXX
SUM +++++=
!" #$%&
KK
×
×
×
=
...21!
&apos;
$
25
(&apos;
)*+
DATA DIVISION
,-./01234
IDENTIFICATION DIVISION.
PROGRAM-ID PROG.
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SOURCE-COMPUTER IBM-370.
OBJECT-COMPUTER IBM-370.
56789:;<:
DATA DIVISION
=(>?#
&apos;)
&apos;)&apos;)
&apos; )

COBOL
 @ A B C D EF
2BEFG
* +
* +* +
* +
HDG
, * +
, * +, * +
, * +
#F I J EK L
1
MN O
P -QR S T #U 2 " V
N
KWL
2
M
(N-1)
X-YZ
STG
N
EF #$
25
(&apos;
)*+
DATA DIVISION
,-./01234
IDENTIFICATION DIVISION.
PROGRAM-ID PROG.
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SOURCE-COMPUTER IBM-370.
OBJECT-COMPUTER IBM-370.
56789:;<:
DATA DIVISION
=(>?#
&apos;
&apos; &apos;
&apos; -
--
-
[73]^_`(a-b*4
cde f -!g h _ ` i : j k l m n o p q r s #$
10
(&apos;
ctd
(a)
u_ ` i -v + r s 2 Z w x !g h y z c
structured method
d{
DFD
|}~!gc
structure chart
d#$
10
(&apos;
(b)


_ ` E _ ` v {QUE!
g #$
5
(&apos;
&apos;
&apos; &apos;
&apos; .
..
.
[73]^!g-b*4
cd{3
AVL-tree
#$
10
(&apos;
16, 22, 25, 11, 15, 8, 31, 38, 27, 45
ctd
(a)
w x
(1
Stack)
i
Infix
Postfix
- z #$
10
(&apos;
(b)
{
Infix: A+B×(C-D/E)+F×G

Postfix
#$
5
(&apos;
收藏 ⬇️ 下載