20161207 求2+4+6+8....+100的和（至少两种方法）。

题目：

    求2+4+6+8....+100的和（至少两种方法）。

 

代码：

 1 program work20161207_1;
 2 var
 3   i,s:integer;
 4 BEGIN
 5   s:=0;
 6   for i:= 2 to 100 do
 7   begin
 8     if i mod 2=0 then
 9       s:=s+i;
10   end;
11   writeln(s);
12 END.

 

 1 program work20161207_2;
 2 var
 3   i,s:integer;
 4 BEGIN
 5   s:=0;
 6   for i:= 1 to 50 do
 7   begin
 8     s:=s+i*2;
 9   end;
10   writeln(s);
11 END.

 

老师的答案：

 

posted @ 2016-12-07 16:39  橙煦猿  阅读(440)  评论(0)  编辑  收藏  举报