您现在的位置:小学生自学网>> 信息>> 学习电脑

for while repeat三种循环的运用

作者: 来源: 发布时间:2017年10月09日 点击数:
 

都是编写1+2+3+4……+98+99+100=这道题,分别用三种不同的循环来编程

 

 
 
var i,s:longint;
begin
for i:=1 to 100 do s:=s+i;
 
writeln(s);
end.
 
 
 
 
 
 
var i,s:longint;
begin
i:=1;
while i<=100 do
        begin
        s:=s+i;
        i:=i+1;
        end;
 
writeln(s);
end.
 
 
这种要提醒学生注意i的初始值, s:=s+i; i:=i+1; 这二句话的顺序直接影响i的初始值
 
 
var i,s:longint;
begin
i:=1;
repeat
 
        s:=s+i;
        i:=i+1;
        until i>100;
 
writeln(s);
end.
 
 
再思考怎么样用三种循环编写1+3+5+7……+95+97+99=