R=RND(10) WHILE 1 @A X=RND(10) IF R=X THEN GOTO @A ELSE R=X ?R WEND