Сделать в Pascal ABC. Найти сумму первых 5-ти элементов одномерного массива

Program element_massiva5 
var 
Sum, i : integer; 
a : array [1..15] of integer;  
begin 
Sum := 0; 
 writeln(введите 15 чисел массива); 
for i:=1 to 15 do 
 begin  
 readln(a[i]); 
 end; 
Sum:=a[1]+a[2]+a[3]+a[4]+a[5]; 
 Writeln( Ответ: ,Sum); 
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.