刚开始学习cobol,很多东西很迷惑,希望高手们帮忙~~
1、浮动插入运算符是什么意思
2、运算符**是??
3、compute语句怎么用的?据个例子,谢谢
4、取消高零位 怎么和用法 有啥用途
5、GO TO a1,a2,....,an depending on XXX 这其中的depending on 是什么意思啊?
6、move语句是不是就像是赋值语句啊?例如move a to b是不是相当于b=a
------解决方案--------------------------------------------------------
举个例子吧,ACCEPT一个数值,然后求它的平方,DISPLAY出来,
working-storage section.
77 x pic x(10).
77 XasNum pic s9(09).
77 x2 pic 9(18).
77 x2-edit pic z(17)9.
procedure division.
display "请输入一个数值(最大9位,可以为负数): "
with no advancing.
accept x.
move function numval(x) to XasNum.
compute x2 = XasNum ** 2.
move x2 to x2-edit.
display "这个数值的平方是: " x2-edit.
stop run.
如果是MAINFRAME环境,你要在JCL中的SYSIN中指定X的数值,至于DISPLAY的输出结果,你要到JOB LOG中去看。