given the following:
77 A PIC 9V9 VALUE 9.5
77 B PIC 9 VALUE 9.
77 C PIC V9 VALUE 0.8
77 D PIC 9
77 E PIC 9
77 F PIC 9V999
what are the contenta of D E nad F after the following
statements are
executed:
COMPUTE F ROUNDED=A+C/B
MULTIPLY A BY C GIVING E
ADD B C A GIVING D ROUNDED
a.F=9.589 E=8 D=1
b.F=9.589 E=8 D=9
c.F=9.589 E=7 D=9
d.F=9.589 E=7 D=1

Answer Posted / ulhas

Its 100 % 'd' only.
Third statement 'ADD B C A GIVING D ROUNDED' gives
19.3 but as D is declared as pic 9. it will have only 1.

Is This Answer Correct ?    1 Yes 5 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

What are the cobol coding sheets?

665


How do you define a variable of comp-1 and comp-2?

705


In COBOL, what is the different between index and subscript?

761


what is amode(24), amode(31), rmode(24) and rmode(any)?

705


I have program P1 which calls file F1 which has 100 records and following structure 001 .................. 002 .................. 003 .................. 098 .................... 099 ................... 100 .................... Now I want to read these files and write these records in file F2 in following manner. 001 ...... 051 ..... 002 ...... 052 ..... 003 ...... 053 ..... .......... ....... .......... ....... .......... ....... 048 ........ 098 ...... 049 .......... 099 ....... 050 .... 100 ......

10626






What is the difference between Call and a Link?

700


HOw can I get the negative sign while deduct high value from low value

1791


What is amode(24), amode(31), rmode(24) and rmode(any) (applicable to only mvsesa enterprise server) ?

676


I have File 1 occurs 5 times with Employee-ID,Employee-Name,Employee-Dept (EEE and MECH). I have File 2 occurs 10 times with Employee-ID,Employee-Name,Employee-Dept (EEE,CIVIL,CHEMICAL and MECH). In FIle 1 and FIle 2 , for matching Employee-DEPT (Only MECH) , we need to move entire records from file1 to file 2. We should not use 2D array. Your help is needed here.

1117


Write some characteristics of cobol as means of business language.

619


System Testing for Mainframe Developers What is System Testing? integration testing ? what's the procedure ..

1588


Differentiate between structured cobol programming and object-oriented cobol programming.

669


What type of SDLC u followed? Why?

1520


In which area will you utilize 88 level items in cobol?

722


If you are current on the owner of a set, what is the difference between obtain next and obtain first?

644