Напишите программу для исполнителя робот рисующего букву н используя цикл с параметром начальное положение робота - левый верхний угол

Program pr2;
uses crt;
var
m,n,i,j,k,l:integer;
mas: array[1..99,1..99] of integer;
masb: array [1..99] of integer;
begin
clrscr;
write('vvedite m');
readln(m);
write('vvedite n');
readln(n);
writeln('vvedite massiv MxN')
;for i:=1 to m do
for j:=1 to n do
begin
write('mas[',i,',',j,']= ');
readln(mas[i,j]);
end;
for i:=1 to m do
begin
k:=mas[i,1];
l:=mas[i,1];
for j:=1 to n do
begin
if k < mas[i,j] then k:=mas[i,j];
if l > mas[i,j] then l:=mas[i,j];
end;
masb[i]:=k-l;

end;
for i:=1 to m do
begin
for j:=1 to n do
write(mas[i,j],' ');
writeln('result = ',masb[i]);
end;
readln(i)
end.

Прямые параллельны между собой, если частное коэффициентов у X и Y равны.
Коэффициент - это числовой множитель в алгебраическом выражении.*
Посчитаем их.

7x + 6y + 9 = 0
У этого уравнения коэффициент у X - 7, а у Y - 6
их частное - это 

5x + 7y + 14 = 0
Тут коэффициенты X, Y это 5 и 7
их частное - 

8x + 6y + 19 = 0
Тут коэффициенты X, Y это 8 и 6
их частное - 
сократим дробь на 2, получим

15x + 21y + 22 = 0
Тут коэффициенты X, Y это 15 и 21
их частное - 
сократим дробь на 3, получим 

10x + 14y + 4 = 0
Тут коэффициенты X, Y это 10 и 14
их частное - 
сократим дробь на 2, получим 

И того у нас получилось 3 равные дроби, это и есть те уравнения.
5x + 7y + 14 = 0
15x + 21y + 22 = 0
10x + 14y + 4 = 0