渣渣小白学R（每日一题）--猜数字游戏【猜错的话，提示正确的区间段，直到猜对为止】

num=round(runif(1,1,200))
num
b=1
c=200
d=0
g=0
print('待猜数字在1-200之间')

while(1)#等于0不执行，等于1一直执行这个循环
{
  a=as.numeric(readline('这个生成的随机数是：'))
  
  if(a>num)
  {
    if(d==1)#在执行这个循环前，有没有执行a<num的循环
    {
      b=e#等于上次循环的a
    }
    print(paste('您猜错了，在',b,'-',a,'之间',sep=''))
    f=a
    g=1#如果g等于1，说明执行了这个循环
    d=0#判断完了之后，还原成初始值，以供下次使用
  }
  
  else if(a<num)
  {
    if(g==1)#在执行这个循环前，有没有执行a>num的循环
    {
      c=f
    }
    print(paste('您猜错了，在',a,'-', c,'之间',sep=''))
    e=a
    d=1#如果d等于1，说明执行了这个循环
    g=0
  }
  
  else
  {
    print('恭喜您，猜对了！')
    break
  }
}