The following method can be used to generate random number in
the range 1 to 32767.

Start with any number in this range.
Shift left once.
Replace bit 0 by XOR of bits 14 and 15.
Clear bit 15.

Write the following procedures :
a. A procedure READ that lets the user enter a binary number and stores it in AX.
b. A procedure RANDOM that recieves a number in AX and returns
a random number in AX.
c. A procedure WRITE that displays AX in binary.

Write a program that displays a '?', calls READ to read a) binary number, and calls RANDOM and WRITE to compute and display 100 random numbers. The numbers should be displayed four per line, with four blanks separating the numbers.