COBOL EVALUATE ARITHMETIC EXPRESSION

EVALUATE ARITHMETIC EXPRESSION The following COBOL program depicts the use of  EVALUATE ARITH EXPRESSION        01 MARKS-OBTAINED  PIC 9(4)  VALUE ZEROS.        01 MARKS-TOTAL     PIC 9(4)  VALUE ZEROS.              MOVE 900  TO MARKS-OBTAINED.              MOVE 1000 TO MARKS-TOTAL.              EVALUATE ((MARKS-OBTAINED/MARKS-TOTAL)*100)                   DISPLAY ‘STUDENT HAS 100% MARKS’                   DISPLAY ‘STUDENT DOES NOT HAVE 100% MARKS’ The output of the program is  STUDENT DOES NOT HAVE 100% MARKS