不是VIP会员,不能显示答案

题目解答

题目:
rogram xx303;
var
i,j,s,n,k:integer;
begin
readln(n);
s:=0;
for i:=1 to n do begin
k:=-1;
for j:=1 to i do
k:=-k;
s:=s+k*i;
end;
writeln(s);
end.

输入:100
输出:-50
考点:
分析:
解答:
评论:
老师: