2564 LI=INT(10000*RND)