Двумерные массивы

Задача 1. Заполнить двумерный целочисленный массив размерности 10х10 случайными числами в интервале от 0 до 100. 
Вывести массив на экран. Найти максимальный и минимальный элементы массива.

const n=10;
var i, j : integer;
      mas: array[1..n, 1..n] of integer;
begin
      randomize;
      for i:= 1 to n do
           for j:= 1 to n do
                 mas[i, j]:= random(100);
      for i:= 1 to n do
            begin
                 for j:= 1 to n do
                 write(mas(i, j):5);
            end;
       writeln();

           {блок решения задачи}

   end.

Задача 2. Заполнить двумерный целочисленный массив размерности 10х10 случайными числами в интервале от 0 до 50. 
Вывести массив на экран. Посчитать количество четных элементов массива.

Задача 3. Заполнить двумерный целочисленный массив размерности 10х10 случайными числами в интервале от 0 до 50. 

Вывести массив на экран. Вычислить сумму элементов массива, меньших 10.

Задачи с массивами

Многомерные массивы