Элементы массива - это 15 случайных чисел, принадлежащих промежутку [-2; 7] ,выведите эти числа на экран в столбец. найдите их сумму

Type mas=Array [1..15] of integer;
var i,s:integer;
a:mas;
begin
randomize;
for i:=1 to 15
do begin
A[i]:=random(-2,7);
writeln(A[i]);
S:=S+A[i];
end;
writeln(S);
end.