关于cobol有关的书面练习题

2024-12-29 02:58:12

推荐回答（3个）

回答1：

COBOL语言测试
(只有部分答案,其他可在书上或电子文档找到)
一. 名词解释(每题2分)共10分
1. HIGH-VALUE(一个字节)= FF LOW-VALUE(一个字节)= 00 QUOTE表示是引号
JUSTIFIED RIGHT表示是右对齐 POSITIVE表示是正数 NEGATIVE表示是负数
2. 数据类型为”A”和”X”分别代表是:A字母X字符
3. 解释bit, Byte, Word,半字, 双字及它们的关系(占多少位).

4. 解释 01 B COPY LIB1
REPLACING A1 BY B1
A2 BY B2
A3 BY B3
A4 BY B4.
5. 解释TRANSFORM T FROM ‘TNU’ TO ‘*’.T为”TOTAL AMOUNT”

二. 填空题(共33分)
1. (4分)
描述数值在内存中表示
02 A PIC 999V99 99.2 09920
02 A PIC 9(6) 8010 008010
02 A PIC P(3)9(2) 0.00011 11
02 A PIC －9999 ＋1268 _1268
02 A PIC S9(4)V99 -0.49 000049
02 A PIC $ Z(2). Z Z 0.01 $_ _.01
02 A PIC ++++.++ 0.0 _ _ _ _ _ _ _
02 A PIC $9(2). 99DB 856. 19 $56.19_ _
02 A PIC +Z(3).99 6.4 +_ _6.40
2. (2分)
77 T PIC 99999V9999
77 N PIC 99.999,9
若T的原值为567. 5685, MOVE T TO N
N为:67.568,5
3. (2分)
77 R PIC 999PP
77 T PIC B99900
当R的在内存值为123时， MOVE R TO T
T为:_12300
4.画出下列对应关系(4分)
外部十进制DISPLAY
外部浮点数DISPLAY
内部十进制COMP-3
定点二进制COMP
内部短浮点COMP-1
内部长浮点COMP-2

数值为14外部十进制为_F1F4_内部十进制_014C_定点二进制000E
5.比较大小(2分)
EBCPIC码’V’_<_‘8’ ASCII码’V’_>_‘8’
6. (2分)
定点二进制：
在PIC子句中描述字符9的个数占内存字节
1-4 2
5-9 4
10-18 8
7. (2分)
02 A PIC S9(3) SIGN IS LEADING SEPARATE

A为－648
60 F6 F4 F8
“--”在EBCDIC码中为60
8. (3分)
01 A.
02 A1 PIC 9(3) SYNC LEFT VALUE 82.
02 A2 PIC X(3) SYNC RIGHT VALUE ‘ABC’.
02 A3 PIC 9(5) SYNC LEFT VALUE 82345.
02 A4 PIC X(2) VALUE ‘RE’.
02 A5 PIC 9(4) VALUE 123
画出上面变量在内存结构.

9. (1分)
Y*C=>C
MULTIPLY Y _BY_ C.
10. (2分)
DIVIDE 43 INTO 456 GIVING C REMAINDER D
C为_10_ D为_26_
11. (2分)
A=FGH_, B=KLM_, C=XYZ_, D 为PIC X(12)
MOVE 4 TO T.
STRING A, B, C DELIMITED BY ALL SPACE WITH POINTER T INTO D
D为_ _ _ FGHKLMXYZ
12. (4分)
A=DATE_ _PSDASDFT_GDSGDTITY_
B PIC X(6), C PIC X(8), D PIC X(9)
UNSTRING A DELIMITED BY ‘R’ INTO B COUNT IN W.
W为_25_
MOVE 7 TO U.
UNSTRING A INTO B,C,D WITH POINTER U TALLYING IN N.
N为_3_
13. (2分)
INSPECT A TALLYING N FOR ALL ‘L’
REPACING LEADING A BY ‘E’ AFTER ‘L’.
A=SAALAMALI, N=2, A为SAALEMALI
14. (1分)
COBOL语言中变量名最长长度为_30_
三. 判断题: (每题2分)共10分
1.77 A PIC 9(4)V99
77 B PIC $(6). 99
MOVE B TO A 是否可以?为什么?

2. IF B**2-4*A*C NOT < 0 THEN
NEXT SENTENCE
ELSE
DISPLAY ‘B**2-4*A*C<0’. 是否可以? 为什么?

3.GOTO 0000-MAIN. 是否可以? 为什么?

4.表元素B(I+1),A(3+5) 是否可以? 为什么?

5.定义一个变量
00 WORK-RECORD.
01 NAME PIC X(20). 是否可以? 为什么?

四. 简答: (共47分)
1. COBOL程序的结构并说明和包含四个部(中英文)及作用. (10分)

2. COBOL源程序的书写格式并加以说明(3分)

3. 在层次的概念中, 层次结构是什么, 层次规定是什么,66层,77层, 88层一般用于定义什么.
(8分)

4. (3分)
01 PAY-RECORD. 01 EDITTED-RECORD.
04 A1 PIC 9(4)V99. 04 B3 PIC ZZZZ.99.
04 A2 PIC 9(4)V99. 04 A2 PIC ZZZ9.99.
04 A3 PIC 9(3)V99. 04 A1 PIC ZZZ9.99.
MOVE CORR PAY-RECORD TO EDITTED-RECORD. 左边这个语句相当于：
MOVE A1 OF PAY-RECORD TO A1 OF EDITTED-RECORD.
MOVE A2 OF PAY-RECORD TO A2 OF EDITTED-RECORD.

5. (3分)
01 A.
02 A1 PIC 9(3).
02 A2 PIC 9(2)V99.
02 A3 PIC 9V9.

01 B.
02 A1 PIC 99V99.
02 A3 PIC 9V9.
02 A2 PIC 99V99.
ADD CORR A TO B 左边这个语句相当于：
ADD A1 OF A TO A1 OF B.
ADD A2 OF A TO A2 OF B.
ADD A3 OF A TO A3 OF B.

6. (4分)
将下面公式对应的COBOL语句.(禁止用COMPUTE)
C = A + B + C
COBOL语句:ADD A,B TO C.

D = Z-A-B-C
E = Z-A-B-C
F = Z-A-B-C
COBOL语句(用一条语句写):
SUBTRACT A,B,C FROM Z GIVING D,E,F.
6. (2分)
将下面COBOL语句对应的数学公式.
DIVIDE Y INTO Z GIVING C. C=Z/Y
DIVIDE Y BY Z GIVING C. C=Y/Z

7. (2分)
根据优先级顺序用括号画出优先级
(X=Y) OR *((T=W) AND (G IS NOT POSITIVE)) AND (C>D))

8. (6分)
根据下图写出COBOL语句
A->X
当X<= 5
执行T1到T2段
X+B->X
执行PERFORM的下一语句

PERFORM T1 THRU T2 VARYING X FROM A
BY B UNTIL X > 5.
9.解释下面COBOL语句(4分)
01 STUDENT-SCORE-RECORD.
03 NAME PIC X(10).
03 QTY-OF-COURSE PIC 9(2).
03 SCORE OCCURS 1 TO 15 TIMES
DEPENDING ON QTY-OF-COURSE PIC 9(3).

11. (2分)
’LABEL RECORD IS STANDARD’和’LABEL RECORD IS OMITTED’区别?

回答2：

现在市面上的cobol教程都很少了~~`更别说练习题了~~

不过谭浩强的《cobol语言》这教材不错~~~我有.pdf的教程~~可以给你``
你只要把上面的程序看懂，再自己动手写一遍，我想也能够学好！！！

回答3：

谭浩强的cobol很不错还有pdf的文件如果有需要可以发给你至于练习题比较少面试的题目还是不少的。