Здравствуйте, angel.nero.
Скалярное произведение это сумма произведений соответствующих координат, то есть элементов массива. Ну и вот сразу решение:
max:=M[1,1];
max_i:=1;
min:=M[1,1];
min_j:=1;
//поиск наименьшего и наибольшего эл-ов
for i:=1 to 7 do
for j:=1 to 7 do begin
if M[i,j]>max then begin
max:=M[i,j];
max_i:=i;
end;
if M[i,j]<min then begin
min:=M[i,j];
min_j:=j;
end
end;
//сколярное произведение строки на столбец
sp:=0;
for i:=1 to 7 do sp:=sp+M[max_i,i]*M[i,min_j];
//конец