编程实现s=1+3+5+...+99的值

var
i,s:longint;
begin
i:=1;
s:=1;
repeat
i:=i+2;
s:=s+i;
until i=99;
writeln(s);
end.

简单的用C,因为C可以控制步长
main()
{
int i,s=0;
for(i=1;i<100;i=i+2)
{
s+=i;
}
printf("%d",s);
}

用什么语言呢？
简单的用C的话
main()
{
int i,s=0;
for(i=1;i<100;i=i+2)
{
s+=i;
}
printf("%d",s);
}

var i,j:integer;
begin
for j:=1 to 99 do
if j mod 2=1 then
i:=i+j;
writeln('S=',j);
end.

用VB的话那就是：
for i=1 to 99 step 2
sum=sum+i
next i
print sum

program exe_1;
var
s,i:integer;
begin
i:=1;
s:=1;
while i<99 do
begin
i:=i+2;
s:=s+i;
end;
writeln('s=',s);
readln;
end.