Дан двумерный массив, найти количество элементов массива меньше 5

Question

Дан двумерный массив, найти количество элементов массива меньше 5

Answer 1

Const 
n=10;//кол-во элементов

var 
i,j,t:byte;
{описание двумерного массива}
tarray:array[1..n,1..n] of integer;//например так

begin
t:=0;
{тут ввод двумерного массива}
for i:=1 to n do
 for j:=1 to n do
  if tarray[i,j] > 5 then t:=t+1;
writeln('В массиве ', t, ' элементов >5');
end.