Найти сумму членов арифметической прогрессии a, a+ d ,…, a+(n-1)d по данным значениям a, d, n.

(2*а+(н-1)д) *н/2

*Почему-то ответы с английскими буквами у меня не проходят*

Пишите на почту или в асю 586178755

написано на Pascal

var a,d,n,i,s:integer;
begin
write('a=');
read(a);
write('d=');
read(d);
write('n>0 n=');
read(n);
s:=(2*a+(n-1)*d)*n div 2;
write('Сумма=',s);
end.