Question

Составить программу удаления из массива последнего нечётного элемента. Массив заполнить случайным образом в диапазоне [-35;50], размерность массива 10 элементов

Answer 1

===== PascalABC.NET =====

begin

 var a := ArrRandom(10, -35, 50);

 a.Println;

 var i := a.FindLastIndex(p -> p.IsOdd);

 a := a?[:i] + a?[i + 1:];

 a.Println

end.

Answer 2

Для удаления последнего нечётного элемента из массива можно использовать следующую программу на языке Python:

pythonCopy code
import random

def remove_last_odd(arr):
    last_odd_index = -1
    for i in range(len(arr)):
        if arr[i] % 2 != 0:
            last_odd_index = i

    if last_odd_index != -1:
        arr.pop(last_odd_index)

def main():
    array_size = 10
    array = [random.randint(-35, 50) for _ in range(array_size)]
    print("Исходный массив:", array)

    remove_last_odd(array)
    print("Массив после удаления последнего нечётного элемента:", array)

if __name__ == "__main__":
    main()

Эта программа сначала создает массив array из 10 случайных чисел в диапазоне [-35, 50]. Затем она находит индекс последнего нечётного элемента и удаляет его из массива. Если в массиве нет нечётных элементов, ничего не происходит.