Помогите, нужно написать на языке Паскаль: известно что в массиве имеются элементы равные 5 определить номер первого из них

Program z;
Var mas:array[1..10] of integer;
       i: integer;
Writeln(Введите массив: );
for i:=1 to 10 do
Readln(mas[i])
for i:=1 to 10 do
if(mas[i]=5) then
Writeln(Элемент массива под номером,i, равен пяти);
end;

Вот задача, по идее ошибок быть не должно.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.