составьте программу,которая заполняет массив a[1..10]случайными целыми числами в диапазоне от 1 до 10 и выводит на экран последний элемент с нечётнымзначением и его индекс
var a: array[1..10] of integer; //Массив а i, index: integer; //index - индекс последнего элемента с нечетным значением begin write('Исходный массив: '); for i:= 1 to 10 do {Заполняем массив элементами в диапазоне [1..10], печатаем его и определяем индекс последнего элемента с нечетным значением} begin a:= random(10) + 1; write(a, ' '); if a mod 2 = 1 then index:= i; end; writeln; writeln('Последний элемент с нечетным значением: a[', index, '] = ', a[index]); end. Отметь решение как лучшее)