Сканируется изображение размером 5 х10 см. Разрешающая сканера — 256 x 512 dpi, глубина цвета — 8 бит. Какой информационный объём в Мегабайтах будет иметь
полученный графический файл?

Ты понимаешь, что для начала стоит сказать , что в паскале несколько видов повторения бывает. В звисимости от видов и разные механизмы. Например цикл пока или цикл с предусловием он называется: while <условие> do begin <тело цикла> end; до тех пора выполныется условие выполняем цикл.

Цикл с постусловием: repeat <тело цикла> until <условие выхода> повторять какие то действия до тех пор пока не это число указанно например не попадет в условие выхода

И еще и еще об этом можно много говорить

// PascalABC.NET 3.3, сборка 1599 от 17.12.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var (m,n):=ReadInteger2('Количество строк и столбцов в массиве:');
  Writeln('*** Исходный массив ***');
  var d:=MatrRandom(m,n,-99,99);
  d.Println(4); Writeln(4*d.ColCount*'-');
  var min:=d.ElementsByRow.Min; // значение минимального элемента
  Writeln('Искомое среднее: ',d.ElementsByRow.Where(t->t<>min).Average)
end.

Пример
Количество строк и столбцов в массиве: 4 7
*** Исходный массив ***
   7 -31  80  21  38 -36  16
  42  93 -11  74  -6  37 -71
  15  90 -71 -88 -71  70 -27
  12  83  41  79  72  91 -88

Искомое среднее: 24.5