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

Question

Информатика

Катюха

17 октября, 22:50

Дан целочисленный массив из 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.