Посчитать и вывести на экран сумму элементов массива, имеющих нечетные индексы

@Kenpa4i · Регистрация: 09.12.2020

Author24 — интернет-сервис помощи студентам

Дан одномерный массив из 24 элементов, запросить у пользователя ввод этих элементов. Посчитать и вывести на экран сумму элементов, имеющих нечетные индексы.(например, mas[1]=2;mas[2]=6;mas[3]=8;mas[4]=12, тогда на экране будет 2+8=10)

@Cyborg Drone · 16.12.2020, 05:42

Pascal

const
  m = 24;
var
  mas: array[1..m] of integer;
  i, s: integer;
begin
  s := 0;
  writeln('Введите элементы массива:');
  for i := 1 to m do
    begin
      write('mas[', i, '] = ');
      readln(mas[i]);
      if odd(i) then inc(s, mas[i])
    end;
  write('Сумма элементов, имеющих нечетные индексы: ', s);
  readln
end.

@Kenpa4i 0 / 0 / 0 Регистрация: 09.12.2020 Сообщений: 4
		1
	Посчитать и вывести на экран сумму элементов массива, имеющих нечетные индексы 09.12.2020, 23:25. Показов 1702. Ответов 1 Метки массив pascal (Все метки) Дан одномерный массив из 24 элементов, запросить у пользователя ввод этих элементов. Посчитать и вывести на экран сумму элементов, имеющих нечетные индексы.(например, mas[1]=2;mas[2]=6;mas[3]=8;mas[4]=12, тогда на экране будет 2+8=10) 0

	16.12.2020, 05:42