用循环语句描述下
问题描述：
用循环语句描述下
1+1/2+1/4+1/8+……1/512
用高一的循环语句 就是新课标课本上的语句WHILE条件END
答
pascal:varans :double;now,i :longint;beginans:=0;now:=1;for i:=0 to 10 dobeginans:=ans+1/now;now:=now*2;end;writeln(ans);end.// 512=2^10 当然如果你需要的是课本上的qbasic...那个现在其实是没人用的啦啦.....