A[i]:=random(20)-10;
while (i>0)
if i<>0
Объяснение
Ошибка A[i]:=random(21); Твой диапазон [0;20]
Исправление A[i]:=random(20)-10;
Дальше можно находить элемент в массиве по разному, можно просто все элементы проверить, счётчик дойдёт до нуля - программа выведет "Не найден!", если счётчик не равен нулю, значит хотя бы 1 значение х в массиве было найдено.
Ошибка while (i<=N)
Исправление while (i>0)
Ошибка if i<=N
Исправление if i<>0
Условие (i<=N) выполняется всегда, поэтому оно вообще не нужно
A[i]:=random(20)-10;
while (i>0)
if i<>0
Объяснение
Ошибка A[i]:=random(21); Твой диапазон [0;20]
Исправление A[i]:=random(20)-10;
Дальше можно находить элемент в массиве по разному, можно просто все элементы проверить, счётчик дойдёт до нуля - программа выведет "Не найден!", если счётчик не равен нулю, значит хотя бы 1 значение х в массиве было найдено.
Ошибка while (i<=N)
Исправление while (i>0)
Ошибка if i<=N
Исправление if i<>0
Условие (i<=N) выполняется всегда, поэтому оно вообще не нужно