/* guess a number between 1 and 100. /* /* t. a. Gibson 11/29/76. /* guessnum [ int guess, number char answer pl "guess a number between 1 and 100. answer = 'y' while (answer = 'y') [ number = random (1,100) while (guess!=number) [ pl "What is your guess? guess = gn if (guess < number) pl Too low." if (guess > number) pl "Too high. if (guess == number) pl "RIGHT!! pl ";pl" ] /* end while loop. answer = 0 while ((answer!='y')*(answer!='n')) [ ps "again? answer = gc ] ] /* end of answer loop. ] /* end guessnum. /* /* random number generator. /* random int low, high [ int range if (last==0) last=seed=99 range = high - low + 1 last = last * seed if (last < 0) last = -last return low + (last/7)%range ] /* /* globals. /* int last, seed