PROGRAM FOR DIVIDE VERB:
We have to write an easy program to elaborate DIVIDE verb. You can also use edit characters in the program.
Program- id. Divverb.
77 a pic s9(3)v9(2) value 0.
77 b pic s9(3)v9(2) value 0.
77 c pic s9(4)v9(2) value 0.
77 e-c pic -z(4).z(2).
Display(1 1) erase.
Display(3 5) "Enter first number :".
Display(5 5) "Enter second number :".
Divide a by b giving c.
Move c to e-c.
Display(15 5) "Answer = " e-c.
Description: This program gets 2 inputs from the user.
It divides them by using the DIVIDE verb.
a/b is computed and stored in c.
The unedited result is accessible in c.
We move c to e-c, where the edit characters are accessible.
Keep in mind that the variable e-c makes use of the - edit character.
The e-c will always be exhibited with result.