program SUM_ARRAY(input, output);
TYPE
   IntArray = array[1..5] of integer;

VAR 
   i, sum: integer;
   numbers : IntArray;

begin
   sum := 0;
   numbers[1] := 3;
   numbers[2] := 7;
   numbers[3] := 2;
   numbers[4] := 4;
   numbers[5] := 5;

   for i := 1 to 5 do
       sum := sum + numbers[1];
   writeln('sum = ', sum);
end.