Алгоритм:

Задаем массив размера N.Инициализируем переменную last_odd_value = 0 и переменную index = 0.Проходим по массиву от начала до конца.Если текущий элемент массива нечетный, присваиваем значение этого элемента переменной last_odd_value и запоминаем его индекс в переменной index.После прохождения по всем элементам массива выводим значение last_odd_value и index.

Программа на языке Паскаль:

program LastOddElement;
var
arr: array of integer;
N, i, last_odd_value, index: integer;
begin
write('Enter the size of the array: ');
readln(N);
SetLength(arr, N);
write('Enter the elements of the array: ');
for i := 0 to N-1 do
read(arr[i]);
last_odd_value := 0;
index := 0;
for i := 0 to N-1 do
begin
if arr[i] mod 2 <> 0 then
begin
last_odd_value := arr[i];
index := i;
end;
end;
writeln('The last odd element of the array is: ', last_odd_value);
writeln('Index of the last odd element: ', index);
end.

Этот код сначала запрашивает размер массива и его элементы у пользователя, затем находит последний нечетный элемент массива и выводит его значение и индекс.