Создать массив из пяти чисел вводом с клавиатуры и посчитать сумму элементов массива(в паскале)

Предыдущий
вопрос Следующий
вопрос

program SumOfArrayElements;

var
arr: array[1..5] of Integer;
i, sum: Integer;

begin
sum := 0;

writeln('Введите пять чисел:');
for i := 1 to 5 do
begin
readln(arr[i]);
sum := sum + arr[i];
end;

writeln('Сумма элементов массива: ', sum);
end.