Given an array A of nonzero integers of size 10. Output the value of the first of those AK elements

Given an array A of nonzero integers of size 10. Output the value of the first of those AK elements that satisfy the AK neo-equality

program zz1;
const n = 10; // set the number of numbers in the array
var i: integer; // set variables of integer type
m: array [1..n] of integer;
begin
for i: = 1 to n do // get n random numbers and write them into an array
m [i]: = random (51) +1;
for i: = 1 to n do // display the original array on the screen
write (m [i], ”);
writeln; // go to a new line to display the response
for i: = 1 to n do // check the given inequality and print the answer
if m [i] <m [10] then begin write (‘found element =’, m [i]); break; end;
if i = 10 then write (0);
end.