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
Write a program that uses move corresponding.
Mention the guidelines to write a structured cobol program?
What is rmode(any) ?
how do you reference the variable unblock file formats from cobol programs
how can i see junk values in dclgen or in hostvariable of comp ?
What are all the divisions of a COBOL program?
What are declaratives and what are their uses in cobol?
When is inspect verb is used in cobol?
What are INPUT PROCEDURE and OUTPUT PROCEDURE?
what is the difference between COBOL2 AND COBOL390?
Explain how to differentiate call by context by comparing it to other calls?
If you are current on the owner of a set, what is the difference between an obtain next and obtain first? Actually in which topic will we use dis???Plz explain it clearly
What is cobol?
input 1 input2 ouput1 output2 output 3 1 re 300 1 re 200 1 re 300 3 rc 500 1 re 200 2 rr 400 1 re 300 2 rr 400 1 rc 400 3 rc 500 1 rc 400 2 rr 700 2 rr 700 5 tt 900 5 tt 900 2 inputs r in flat file and output 1 is matched records,ouptput2 is unmatched of input1,output3 is unmatched of input2! how vl u get the output files using sequential order and to check with each and every records! let me know the procedure division ?
I have to write to a outfile where the number of records in that file should be the header of that file using IMS.. can anyone help me in this issue