Составьте программу, которая заполняет массив a[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[i]: =random (10)+1; write (a[i], '); if a[i] mod 2=1 then index: =i; end; writeln; writeln ('Последний элемент с нечетным значением: a[', index, ']=', a[index]); end. Отметь решение как лучшее)