?"Five random numbers from one to 100:"
FOR MYCOUNTER=1 TO 5
?"Number ";MYCOUNTER;" is ";OneTo100()
NEXT
DEF OneTo100()
RETURN 1+RND(100)
END
The output is
Five random numbers from one to 100:
Number 1 is 54
Number 2 is 89
Number 3 is 7
Number 4 is 11
Number 5 is 93
0そうだね プレイ済み