Question

Ввести одномерный массив размерностью n. Вывести значение и номер последнего четного элемента или сообщение об отсутствии четных значений.

Answer 1

// F#
[<EntryPoint>]
let main argv =
    let elements =
        System.Console.ReadLine().Split(' ')
        |> Seq.map (fun x -> System.Int32.Parse x)
        |> Seq.mapi (fun i x -> (x, i))
        |> Seq.where (fun (x, i) -> x % 2 = 0)
    if elements |> Seq.length > 0
        then System.Console.WriteLine("{0} {1}", elements |> Seq.last |> fst, (elements |> Seq.last |> snd) + 1)
        else System.Console.WriteLine("No results")
    System.Console.ReadKey true |> ignore
    0

Answer 2

Для выполнения этой задачи вам потребуется написать программу на языке программирования. Вот пример программы на Python, которая выполняет указанную задачу:

pythonCopy code
# Функция для поиска последнего четного элемента и его номера в массиве
def find_last_even(arr):
    last_even = None
    last_even_index = -1

    for i in range(len(arr)):
        if arr[i] % 2 == 0:
            last_even = arr[i]
            last_even_index = i

    return last_even, last_even_index

# Ввод размерности массива
n = int(input("Введите размерность массива: "))

# Ввод элементов массива
arr = []
for i in range(n):
    element = int(input(f"Введите элемент {i+1}: "))
    arr.append(element)

# Вызов функции для поиска последнего четного элемента
last_even, last_even_index = find_last_even(arr)

# Вывод результата
if last_even is not None:
    print(f"Последний четный элемент: {last_even}, его номер: {last_even_index + 1}")
else:
    print("Четные элементы отсутствуют в массиве.")

Вы можете скопировать этот код и выполнить его на своем компьютере, чтобы ввести массив и найти последний четный элемент и его номер.