Дан целочисленный массив размера n. Преобразовать его, прибавив к четным числам первый элемент. Первый и последний элементы не изменять.

Question

Лонгин

17 июля, 20:06

+2

Ответы (1)

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

Моша · Answer 1

Dim Massiv (n) as Integer

Dim x as integer

For x=1 to n-1

If Massiv (x) mod 2 = 0 then Massiv (x) + = Massiv (0)

Next