Помогите составить программу вычисления сумм от 1 го до n

Question

Помогите составить программу вычисления сумм от 1 го до n

Answer 1

Var n,i,s:integer;
begin
write('n=',n);readln(n);
s:=0;
for i:=1 to n do s:=s+i;
writeln('s=',s);
end.

Comments

даю 6 почему сумма 21

---

1+2+3+4+5+6=21

---

а да точно большое спасибо