计算式子的值：s=1+2+3+...+100（编程 pascal语言 for语句）

来源：学生作业帮编辑：百度作业网作业帮分类：综合作业时间：2024/04/30 01:17:31

计算式子的值：s=1+2+3+...+100（编程 pascal语言 for语句）
这是我编的：
var a,s,i:integer;
begin
s:=0;
begin
for i:=1 to 10 do;
readln(a);
a:=1+i;
s:=s+i;
end;
writeln(s:10)
end.

program juio;
var
i:integer;
a,s:real;
begin
a:=0;
for i:=1 to 100 do
begin
s:=a+i;
a:=s;
end;
writeln(s:0:0);
readln
end.
你的程序这些地方写的不太恰当：
1、你要输出的是s的值,但是s值可能会非常大,而integer的范围是0~32000出头的整数,万一超过了范围怎么办?所以最好将s定义为real；
2、你把var和后面的一些要定义的内容写在了同一行,这样的习惯不好,万一出错了不好更正,建议写分开；
3、【a:=1+i; s:=s+i;】这个你是想运算是吧?但是应该是将s作为输出,然后呢,以a为0代入,之后再将s每次运算的值赋值给a,这样才能循环；
4、【readln(a);】代表你读取了个a,跟题目有什么关系么?你要计算的是1+..+100的值；
5、for循环是这样的格式：
For := to do
；
For := to do
Begin
；
End;
注意:这里的do后面是不能加分号‘;’的,加分号代表运算终止,但是你的循环是要带下面的条件的,单语句与多语句的写法也不一样,分号是不可以乱加的- -；
6、【S:10】你是要设场宽么?你最后得到的值肯定是整数,s定义是real,为了避免出现科学技术法,你可以这样设置【S:0:0】.前一个分号后的数字代表的是总场宽,但是当场宽满足不了值的表示时,总场宽会被突破,后一个分号是限制小数位的,因为答案是整数,则小数再多也无任何意义,只是看着很乱,于是两个都是0
写的时候仔细点,电脑不像人脑那样聪明,多个分号什么的都是不行的,编译的时候看提示错在哪,错的多了自然也就会了.

计算式子的值：s=1+2+3+...+100（编程 pascal语言 for语句） VFP编程环境中,编程计算S=1+2+3+...+100的值怎么算 C语言for语句求...s=1!-2!+3!-4!+…+9!-10!的值用DO WHILE 语句编程计算1*2+2*3+3*4+.+99*100的值 vb编程.会的来.感激不尽~vb 【循环结构】编程计算【s=1+2+3++100的值】用pascal语言的while循环求s=1+2+3+...+10 C语言编程计算:s=1 12 123 1234 12345 123456(必须用循环控制语句实现) C语言题目编程计算下列表达式：s=1!+2!+3!+4!+……+20! C语言编程计算1*2*3+3*4*5+...+99*100*101的值 17、求s=1+2+3+……+100的和.用C语言编程两道编程题目（Pascal语言） pascal语言编程题