Отыскать сумму частей массива,имеющих нечётные номера.Помогите пожалуйста 30 баллов даю

Отыскать сумму частей массива,имеющих нечётные номера.
Помогите пожалуйста 30 баллов даю

Задать свой вопрос
1 ответ

n - количество частей массива, после этого вводится каждый элемент.

var sum,n,i:integer;


a:array[1..100000] of integer;


begin


sum:=0;


readln(n);


for i:=1 to n do begin readln(a[i]); if(i mod 2 lt;gt; 0) then sum:=sum+a[i]; end;


writeln(sum);


end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт