# Given an n by m array, find the minimum three-digit number written in the array. if there are no such numbers

**Given an n by m array, find the minimum three-digit number written in the array. if there are no such numbers, then display the message “There are no such numbers”.**

program zz1;

const n = 3;

m = 3; // set the number of elements in the array

var i, j, min: integer; // set variables of integer type

b: array [1..n, 1..m] of integer;

begin

for i: = 1 to n do

for j: = 1 to m do // get numbers and write them into an array

b [i, j]: = random (501);

for i: = 1 to n do // display the resulting array on the screen

begin

for j: = 1 to m do

write (b [i, j]: 4);

writeln;

end;

min: = 100000;

for i: = 1 to n do

for j: = 1 to m do

begin

if (b [i, j]> 99) and (b [i, j] <1000) then if b [i, j] <min then min: = b [i, j];

end;

if min = 100000 then write (‘there are no such numbers’) else write (‘the minimum three-digit number of the array =’, min);

end.