Найти сумму первых n натуральных чисел где n задается с клавиатурой. Помогите пжжж.
Program suma; Var n, sum, i:integer; begin read(n); for i:=1 to n do sum:=sum+i; write(sum); end.