Предмет: Информатика, автор: DenisBal

Задан одномерный массив [2, -6, 8, 1, 9]. Найти и вывести на печать все элементы списка и сумму четных элементов массива в той же строке вывода
Вывести элементы с нечетными индексами массива и сумму этих элементов.


dimagogvangog: Какой язык программирование?
DenisBal: Python

Ответы

Автор ответа: lenyashastin
2

Ответ:

var x,y,z,i,s:integer;

var a:array [1..5] of integer;

begin

 s:=0;

 writeln('Заполните массив:');

 for i:=1 to 5 do begin

   readln(a[i]);

 end;

 writeln();

 writeln('Исходный массив:');

 writeln(a);

 for i:=1 to 5 do begin

   if (a[i] mod 2 = 0) then

   s:=s+a[i];

 end;

 writeln();

 writeln('Сумма четных элементов массива =',' ',s);

 writeln();

 for i:=1 to 5 do begin

   if (i mod 2 <> 0) then

     writeln(i,'-й элемент с нечётным индексом =', ' ',a[i]);

   end;

   for i:=1 to 5 do begin

     if (i mod 2 <> 0) then

     x:=x+a[i];

   end;

   writeln();

 writeln('Сумма элементов массива с нечётными индексами =', ' ', x);

end.


DenisBal: Спасибо
DenisBal: Стоп, это питон?
DenisBal: Я туплю..
DenisBal: Так как выводит ошибку
vera2345: lenayshastin Здравствуйте.Можете пожалуйста мне помочь с информатикой,мой вопрос находится в моих новых вопросах.Первых два вопроса
dimagogvangog: это паскаль
Похожие вопросы
Предмет: Українська мова, автор: САНЯ12354543