26行目の 　S=1'RND(10)/5 を 　S=RND(10)/5 にしてください。