Question

Паскаль. дан массив С(26). найдите сумму элементов второй половины массива (с клавиатуры)

Answer 1

1. program task31154004;
2. var
3.  C: array[1..26] of integer;
4.  S: integer;
5. begin
6.  for var i := 14 to 26 do
7.    begin
8.      Readln(C[i]);
9.      S := S + C[i];      
10.    end;
11.  Writeln(S);
12. end.