COBAL What is the output of the following code give me some

COBAL What is the output of the following code, give me some explanation ?? IDENTIFICATION DIVISION. PROGRAM-ID. SOLVE. DATA DIVISION. WORKING-STORAGE SECTION. 01 WS-X PIC 9(6) VALUE 10. 01 WS-Y PIC 9(5) VALUE 10. 01 WS-Z PIC 9(6) VALUE 25. 01 WS-APIC 9(8) VALUE 50. 01 WS-B PIC 9(7) VALUE 10. 01 WS^C PIC 9(5). PROCEDURE DIVISION. COMPUTE WS-C = (WS-X/WS-Y) * (WS-A * WS-B)/WS-Z. DISPLAY \"WS-X: \" WS-X DISPLAY \"WS-Y: \" WS-Y DISPLAY \"WS-Z: \" WS-Z DISPLAY \"WS-A: \" WS-A DISPLAY \"WS-B: \" WS-B DISPLAY \"WS-C: \" WS-C STOP RUN

Solution

OUTPUT :

ws-x :000010

ws-y :00010

ws=z :000025

ws-A :00000050

WS-B : 0000010

WS-C :00020

 COBAL What is the output of the following code, give me some explanation ?? IDENTIFICATION DIVISION. PROGRAM-ID. SOLVE. DATA DIVISION. WORKING-STORAGE SECTION.

Get Help Now

Submit a Take Down Notice

Tutor
Tutor: Dr Jack
Most rated tutor on our site