PROGRAM THAT SHOWS THE WORKING OF EVALUATE VERB WITH MULTIPLE CONDITION.
IDENTIFICATION DIVISION. PROGRAM-ID. EVTEST. DATA DIVISION. WORKING-STORAGE SECTION. 01 MARKS PIC 999. 01 GRADE PIC X(10). PROCEDURE DIVISION. DISP. DISPLAY " ENTER THE MARKS : ". ACCEPT MARKS. EVALUATE MARKS WHEN 80 THRU 100 MOVE "A" TO GRADE WHEN 60 THRU 79 MOVE "B" TO GRADE WHEN 45 THRU 59 MOVE "C" TO GRADE WHEN 30 THRU 44 MOVE "D" TO GRADE WHEN ZERO THRU 29 MOVE "E" TO GRADE WHEN OTHER MOVE "WRONG" TO GRADE END-EVALUATE. DISPLAY " GRADE : " GRADE. STOP RUN. /********************************************************************************* OUTPUT*********************************************************************************/ ENTER THE MARKS : 89 A