Очень нужна ваша помощь!! ! Это для людей, знающих информатику!! ! Умоляяю, помогите!!!! За помощь даю подарок;)

Question

Нужно записать программу, которая вычесляет сумму первых n чисел! 
Program my 
var s, b, i, n: integer; 
дальше не знаю (

Артём Филатов · Accepted Answer

О_о 
program shit; 
var 
 n, s: integer; 
begin 
 write('Vvedite N: '); 
 readln(n); 
 s := n*(n+1) div 2; 
 writeln('S = ',s); 
 readln; 
end.

Дмитрий Захаров · Answer

readln(i); 
for i:=0 to n do s:=s+i; вот и вся математика 
writeln("summa = ",s)

Никола Ф · Answer

Попробуем так: 
Program my 
var s, n: integer; 
begin 
write ('Vvedite n'); 
readln (n); 
s := n*(n+1)/2; 
writeln (s); 
end.