在pascal语言中运算: 1+3+5+……+97+99

******************************************
var s,i:longint;
begin
s:=0;
for i:=1 to 99 do
if odd(i) then s:=s+i;
writeln(s);
end.
******************************************
这个我没有编译过，你自己试一下就知道了。
解释：
s为总和。
i为循环变量。
让i从1到99穷举。
odd函数是判断是否为奇数的。如果是奇数，则函数值为TRUE，否则为FALSE。
判断i是否为奇数后，则如果是奇数就相加，不是奇数就不管他。
懂了吗？
懂了就选我吧！！！！！！！！！！！！！
不懂就给我发消息。

有问题随时奉陪。

******************************************************************
版权所有 严禁抄袭
******************************************************************
var i,s:longint
begin
for i:=1 to 99 do //从1到99循环
if odd(i) then s:=s+i; //如果i是奇数，就相加
writeln(s);
end.

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

这样最简单
for i:=0 to 49 do sum:=sum+i*2+1;
看到了上面的就不要看不见下面

program a;
var
i:1..100;
s:integer;
b