Question

COBOL的面试题

cobol 进制相关的面试题！ 1.请写出立即数2048被放入下列数据类型的变量后的实际存储形式（以十六进制表示）
类型 字节1 字节2 字节3 字节4 字节5
9（5）
9（5） comp-3
9（5） comp
s9(5)
s9(5) comp-3
zzzz9
x(5)
2.请写出一段代码将数字112358转换成不带符号位的压缩十进制数据
提示：压缩十进制数据是由多个半字节数字加放在最后一个字节的后半个字节符号组成，题目的要求就是去掉这个符号位，得到完全由半字节数字组成的数据。
3.
01 ws-edit.
05 ws-edit1 pic s9(4) comp value zeros.
05 ws-edit2 pic s9(4) comp-3 value zeros.
05 ws-edit3 pic s9(4) value zeros.
问题：ws-edit1、ws-edit2、ws-edit3在内存中存放的内容是什么（以十六进制表示）。
如何解答，先谢谢了。

Answer 1

第一题
类型 字节1 字节2 字节3 字节4 字节5
9（5） F0 F2 F0 F4 F8
9（5） Comp-3 00 00 02 04 8C
9（5） Comp 00 08 00 00 00 2048=256*8,所以是800
s9(5) F0 F2 F0 F4 C8
s9(5) Comp-3 02 04 8C 00 00
zzzz9 40 F2 F0 F4 F8
x(5) F2 F0 F4 F8 40

第二题
X PIC 9(6) Comp-3 VALUE 112358.
Y PIC 9(7) Comp-3.
Z PIC X(4).
MULTIPLY X BY 10 GIVING Y.
MOVE Y TO Z.
Z就是不带符号位的压缩十进制数据

第三题
ws-edit1：00 00
ws-edit2：00 00 0C
ws-edit3：F0 F0 F0 C0

Answer 2

第1题：
类型 字节1 字节2 字节3 字节4 字节5
9（5） 0 2 0 4 8
9（5） comp-3 02 04 8F
9（5） comp 8 0 0
s9(5) 0 2 0 4 8
zzzz9 (SPACE) 2 0 4 8
x(5) 2 0 4 8 (SPACE)

追问

9（5） comp 8 0 0
这个为什么是800

追答

2048 转成16进制，就是800