Решение задачи, можно, пожалуйста

Question

Решение задачи, можно, пожалуйста

---

Comments

Отметь как лучший пожалуйста)

Answer 1

Var
i,sum: integer;
begin
for i:=1 to 100 do
sum:=sum+i;
Writeln(sum);
end.