данным, если значение очередного элемента совпадет с Х, то запоминаем
его номер в переменной k.For i := 1 to n do if a[i] = x then k := i;
Недостатки данной реализации алгоритма:
находим только последнее вхождение элемента
в любом случае производится n сравнений