algol-things/src/guess5.a68

18 lines
523 B
Plaintext

BEGIN
INT random_number = ENTIER(next random * 100.0) + 1; # Generate directly #
print(("the secret number is", random_number, newline));
print("guess a number: ");
WHILE
INT guess = read int;
IF guess < random_number THEN
print("too low, try again: ");
TRUE
ELIF guess > random_number THEN
print("too high, try again: ");
TRUE
ELSE
print(("that's right",new line));
FALSE
FI
DO SKIP OD
END