Question: how do i fix this issue WORKING-STORAGE SECTION. 01 ITEM-COST PIC 9(6) V99 VALUE ZERO. 01 TOTAL-COST PIC 9(9) V99 VALUE ZERO. 01 ITEM-COUNT PIC

how do i fix this issue how do i fix this issue WORKING-STORAGE SECTION. 01 ITEM-COST PIC 9(6)

WORKING-STORAGE SECTION. 01 ITEM-COST PIC 9(6) V99 VALUE ZERO. 01 TOTAL-COST PIC 9(9) V99 VALUE ZERO. 01 ITEM-COUNT PIC 9(3) VALUE ZERO. Q1 CONTINUE-FLAG PIC X VALUE ' Y '. PROCEDURE DIVISION. MAIN-PROCEDURE. DISPLAY'Enter item cost 1 or a negative value to to quit:l ACCEPT ITEM-COST PERFORM UNTIL ITEM-COST = TOTAL-COST + ITEM-COST END-PERFORM DISPLAY 'Enter item cost IITEM-COUNT +1, or a negative value to q END-PERFORM DISPLAY 'TOTaL: \$' FUNCIION NUMVAL (TOTAL-COST, "\$\$\$\$,\$\$\$.99") DISPLAY 'Number of items: 'ITEM-COUNT COMPUTE AVERAGE-COST = TOTAL-COST/ ITEM-COUNT DISPLAY 'Average ost: \$' FUNCTION NUMVAL (AVERAGE-COST, "\$\$\$\$,\$\$\$.99" STOP RUN

Step by Step Solution

There are 3 Steps involved in it

1 Expert Approved Answer
Step: 1 Unlock blur-text-image
Question Has Been Solved by an Expert!

Get step-by-step solutions from verified subject matter experts

Step: 2 Unlock
Step: 3 Unlock

Students Have Also Explored These Related Databases Questions!