主题:PASCAL入门问题S=1+2+3+...+n
试题描述】
编程求解下列式子的值:S=1+2+3+...+n
【输入描述】
输入一行,只有一个整数n(1<=n<=1000)
【输出描述】
输出只有一行(这意味着末尾有一个回车符号),包括1个整数。
【输入样例】
100
【输出样例】
5050
解答:
var
a,b,c:integer;
begin
a:=0;
c:=0;
readln(b);
while a<b do
begin
a:=a+1;
c:=c+a;
end;
writeln(c);
end.
有问题没有,怎么通不过呢??请问热心人帮忙看看,谢了!
编程求解下列式子的值:S=1+2+3+...+n
【输入描述】
输入一行,只有一个整数n(1<=n<=1000)
【输出描述】
输出只有一行(这意味着末尾有一个回车符号),包括1个整数。
【输入样例】
100
【输出样例】
5050
解答:
var
a,b,c:integer;
begin
a:=0;
c:=0;
readln(b);
while a<b do
begin
a:=a+1;
c:=c+a;
end;
writeln(c);
end.
有问题没有,怎么通不过呢??请问热心人帮忙看看,谢了!