1450 X=INT(20*R+.5)