Cоставить программу для вычисления суммы n чисел . 1-ое из этих

На каком языке программирования ????

Pascal..

Количество чисел вводится юзером?

Да.

Program task;
var a: array [0..20] of integer; //20-наибольшее количество чисел,сможете менять на своё число//
i,n:integer;
begin
write('Введите количество чисел : ');
read(n);
write('Введите первое число : ');
read(a[1]);
for i:=1 to n do  begin
a[i+1]:=a[i]-4;
write(a[i]:5);
end;
end.