Определите индекс указанного пользователями элемента массива - Pascal ABC

Формулировка задачи:

Определите индекс указанного пользователями элемента массива.Если такого элемента нет,сообщите об этом пользователю.Я написала программу но не знаю что вставить в 13 строчке после if.

var a: array[1..5] of integer;
 i,ind,n: integer;
begin
for i := 1 to 5 do
begin
 write('a[',i,'] = ');
 readln(a[i]);
 end;
 write('Введите элемент: ');
 readln(n);
 for i := 1 to 5 do
      if n = a[i] then ind := i;
      if (?) then
 Write('index = ',ind) else Writeln('Такого элемента нет');
  readln;
end.

Решение задачи: «Определите индекс указанного пользователями элемента массива»

Листинг программы

var a: array[1..5] of integer;
    i,ind,n: integer;
begin
for i := 1 to 5 do
 begin
  write('a[',i,'] = ');
  readln(a[i]);
 end;
write('Введите элемент: ');
readln(n);
i:=1;
ind:=0;
while(i<=5)and(ind=0) do
if a[i]=n then ind:=i
else i:=i+1;
if ind>0 then Write('index = ',ind)
else Writeln('Такого элемента нет');
readln;
end.

Объяснение кода листинга программы

Создается переменная a типа array[1..5] of integer, что означает создание массива из 5 целых чисел.
Задаются три переменные: i, ind и n. i будет использоваться для перебора элементов массива, ind - для хранения индекса найденного элемента, а n - для чтения введенного пользователем числа.
В цикле for перебираются элементы массива от 1 до 5.
Внутри цикла выводится сообщение a[i] = и считывается число, которое пользователь вводит.
После завершения цикла выводится сообщение Введите элемент: и считывается число n.
Задается переменная i равной 1 и переменная ind равной 0.
Запускается цикл while, который будет выполняться до тех пор, пока i меньше или равно 5 и ind равно 0.
Внутри цикла проверяется условие a[i] = n. Если оно истинно, то присваивается значение ind переменной i, иначе переменная i увеличивается на 1.
Если после выполнения цикла ind больше 0, то выводится сообщение index = и значение ind.
Если после выполнения цикла ind меньше 0, то выводится сообщение Такого элемента нет.
Цикл while завершается, и программа заканчивается.