Дан целочисленный массив из 10 целых чисел. Преобразуйте его, прибавив к нечетным числам значение последнего элемента. Последний элемент массива оставьте без изменений. (В Паскале)

Question

Информатика

Натан

2 марта, 20:23

Дан целочисленный массив из 10 целых чисел. Преобразуйте его, прибавив к нечетным числам значение последнего элемента. Последний элемент массива оставьте без изменений. (В Паскале)

+5

Ответы (1)

Знаете ответ на вопрос?

Левонтий · Answer 1

var

m : array [1 ... 10] of Integer;

i : Integer;

begin

/ / Здесь заносишь значения в массив.

for i : = 1 to 9 do

if (m[i] mod 2) 0 then m[i] : = m[i] + m[10];

end.