study the following
01 A PIC 99V0 VALUE 5
01 B PIC 9V9 VALUE 6
01 C PIC 99V9 VALUE 2.5
01 D PIC 99 VALUE 3
COMPUTE A ROUNDED B C = A+B*C/D
ON SIZE ERROR PERFORM PRINT-ERROR
the comments of A.B.C after execution of the above
statement are
a.A=10 B=0 C=10
b.A=10 B=9.9 C=9.9
c.A=10 B=0 C=9.9
d.A=10 B=6 C=10
Answer Posted / kamesh
5+6*2.5 div 3=10 so a=10,b=0 bcz truncated 1.and c= 10.
| Is This Answer Correct ? | 8 Yes | 2 No |
Post New Answer View All Answers
How to traceback if I am getting SOC7 or SOC4 abend? List down the steps
How to get the last record in vsam file in cluster? And how can you get the ksds file records into cobol program?
If you are current on the owner of a set, what is the difference between obtain next and obtain first?
example for sub strings ? and refernce modifications whit output pls
What are the various section in data division and briefly explain them.
how do you define single dimensional array and multidimensional array in your cobol?
For rewrite, why is it mandatory that file needs to be opened?
)If there are 10 steps in GDG, if I want to refer the step2 after step5 . what should I do?
How to use the same COBOL program in Batch and CICS on lines? explain with an example
what is amode(24), amode(31), rmode(24) and rmode(any)?
How you can characterize tables in cobol?
EXPLAIN MAIN FRAME TESTING PROCESS...HOW TO FIX THE MAINFRAME BUGS?
What is rmode(any) ?
what is s000 u4087 error? please give the all error codes in cobol,jcl.
What is the difference between Call and a Link?