计算S=1+3+5……+97+99 pascal

来源:学生作业帮助网 编辑:六六作业网 时间:2024/05/14 03:14:22
计算S=1+3+5……+97+99pascal计算S=1+3+5……+97+99pascal计算S=1+3+5……+97+99pascalvari,total:longint;begintotal:=

计算S=1+3+5……+97+99 pascal
计算S=1+3+5……+97+99 pascal

计算S=1+3+5……+97+99 pascal
var
i,total:longint;
begin
total:=0;
for i:=1 to 50 do
total:=total+i*2-1;
writeln(total);
end.