急！！！！！！！！！pascal语言for循环的问题

来源：百度知道 编辑：UC知道 时间：2024/05/11 04:15:11
我想编一套程序，2+4+6+8+......+100，
在写到for i:=2 to 100这里要表达以2个为单位一个一个跳转该怎么写？
我想编一套程序，算从2+4+6+8+......+100的和，
在写到for i:=2 to 100这里要表达以2个为单位一个一个跳转该怎么写？

i := 2;
while i <= 100 do
begin
sum := sum + i;
i := i + 2;
end;
//在C语言里可以在for里面直接设置步长，pas里面只好改为while或者repeat

sum := 0;
for i:=1 To 50 Do sum := sum + i * 2;

sum := 0;
for i:=2 To 100 Do if i mod 2 = 0 THen sum := sum + i;

sum := 0;
for i:=2 To 100 Do if not odd(i) Then sum := sum + i;

三种方式了.可以了么

var
i,he:integer;
begin
he:=0;
for i:=1 to 50 to
he:=he+2*i
writeln(he);
end.
或者是
var
i,he:integer;
begin
i:=0;
repeat
i:=i+2;
he:=he+i;
until i=100;
end.
选我为最佳吧！！！

var
i,a:integer;
begin
for i:=2 to 100 do
if i mod 2=0 then a:=a+i;
writeln(a);
end.