for i=1to 20line input""a$ b=val(a$) if i/b<2?b next