Запишите результат операции -9 // 5.

- 8. -7 . -6 -5. -4. - 3 , -2 -1 12345

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

begin
  var a:=MatrRandom(5,5,0,100);
  Writeln('*** Исходная матрица ***');
  a.Println(4); Writeln(4*a.ColCount*'-');
  var k:=a.ElementsWithIndexes.MaxBy(t->t[0]);
  Write('Максимальный элемент [',k[1]+1,',',k[2]+1,']=',k[0]);
  var p:=' на ';
  if k[1]<k[2] then p:=' выше '
  else if k[1]>k[2] then p:=' ниже ';
  Writeln(', расположен',p,'главной диагонали')
end.

Пример
*** Исходная матрица ***
  41   4  37  54  30
  71  73  75  65  22
  38  60  85  89  74
   0  87  82  55  69
  69  87  21  71  73

Максимальный элемент [3,4]=89, расположен выше главной диагонали

0. Начало
1. Ввод - Гвозди, картина молоток, стена
2. Операция - Прибить гвоздь к стене при молотка
3. Условие - Гвоздь прибит к стене? Нет->Повторить пункт 2;
Да->Переходим к пункту 4
4. Повесить картину на гвоздь
5. Конец

Ну это если не заморачиваться с условиями. К примеру можно после 4 пункта поставить условие на проверку положения картины, т.е Картина висит прямо? ->Нет то Действие выровнять положение картины;
Да->Конец

UPD: Ещё можно создать условие на состояние гвоздя - погнутый или целый, вытаскивание погнутого гвоздя и т.д.