Given an array B (n, n), find the number of elements less than 13.

program zz1;
const n = 4;
var i, j, k: integer; // set variables of integer type
b: array [1..n, 1..n] of integer;
begin
for i: = 1 to n do
for j: = 1 to n do // get numbers and write them into an array
b [i, j]: = random (101) -50;
for i: = 1 to n do // display the resulting array on the screen
begin
for j: = 1 to n do
write (b [i, j]: 4);
writeln;
end;
for i: = 1 to n do
for j: = 1 to n do
if b [i, j] <13 then k: = k + 1; // check if the array element is less than thirteen, then count it
writeln (‘number of elements less than 13 =’, k);
end.