<span>В Power Point'e можно зайдя в Средства рисования (1), далее выбираем фигуры, изгибы стрелки (2) и рисуем(3), далее делаем скрин заходим например в Paint (или любой другой графический редактор) и сохраняем как рисунок.
</span><span>В Paint'e так же выбираем фигуры и рисуем...
Ну можно ещё в Gimp'e сделать, не говоря уже про Adobe Photoshop)</span>
var
i,j,s,n,max:integer;
a:array[1..5,1..5]of integer;
begin
for i:=1 to 5 do
begin
s:=0;
for j:=1 to 5 do
begin
a[i,j]:=random(10);
write(a[i,j],' ');
s:=s+a[i,j];
end;
if s>max then
begin
n:=i;
max:=s;
end;
writeln;
end;
writeln;
write('Строка ',n,': ');
for j:=1 to 5 do
write(a[n,j],' ');
<span>end.</span>
Если надо, чтобы выделились все пиксели, T должно быть не меньше, чем расстояние от исходной точки до самой дальней (в пространстве RGB). При этом расположение ячеек не играет роли. Остается перебрать все варианты начальных точек, для каждого найти наименьшее Т, и из полученных значений выбрать минимальное.
Код (python 3.5):
from math import sqrt, ceil
points = [["A",0,190,160],["B",0,165,160],["C",0,140,185],["D",0,150,170],
["E",0,140,160],["F",0,120,130],["G",0,140,110],["H",0,130,170],
["I",0,120,190],["J",0,90,160],["K",0,115,160],["L",0,140,130],
["M",0,160,190],["N",0,140,145],["O",0,140,210],["P",0,160,130]]
minT2 = 3*256**2
minpt = "A"
for pt in points:
T2 = 0
for pt2 in points:
T2 = max(T2, (pt[1]-pt2[1])**2+(pt[2]-pt2[2])**2+(pt[3]-pt2[3])**2)
if T2 < minT2:
minpt, minT2 = pt[0], T2
print(minpt, ceil(sqrt(T2)))