Дано двузначное число. определите входит ли в него число b написать программу

Var a,b,c,d: integer; begin write('введи число=>   '); readln(a); write('введи цифру=>   '); readln(b); d: =0; while (a< > 0) do begin  c: =a mod 10; a: =a div 10; if (c=b) then d: =d+1; ; end; if (d> 0) then writeln('встречается') else writeln('не встречается'); end.

Скинте фотографию этого задания , а то не понятно 

2. Шаг 1. Выбор типа диаграммы.
Шаг 2. Задание исходных данных диаграммы.
Шаг 3. Задание параметров диаграммы.
Шаг 4. Размещение диаграммы.
4.Биржевая диаграмма — это диаграмма, специально созданная для работы с финансовыми или научными данными, в которой на каждую точку данных приходится до четырех значений. Эти значения сравниваются со значениями максимума, минимума, открытия и закрытия, используемыми для отображения биржевых данных. В этом типе диаграммы значения открытия и закрытия отображаются с помощью маркеров (обычно это линии или треугольники). В следующем примере значения открытия помечены маркерами слева, а значения закрытия — маркерами справа.
1и3 к сожелению не знаю...

Задачу можно сформулировать так: "Найти наибольший элемент массива A размерности N".
Q=7 - значение наибольшего элемента
K=4 - порядковый номер элемента в массиве