// PascalABC.NET 3.1, сборка 1174 от 22.02.2016
begin
var a:=ArrRandom(ReadInteger('n='),-30,50);
a.Println(', ');
Writeln('max-min=',a.Max-a.Min)
end.
<u><em>Тестовое решение:</em></u>
n= 10
-19, 50, 8, -12, -26, 50, -28, -9, -7, 42
max-min=78
Таблица симметрична по оси, значит
1. рисуем точки A, B, C, D, E
2. цифра на пересечении ( например AC-3) значит стоимость/длину/и т. д., зависит от условий задачи, нет цифры или 0 = нет дороги
3. чертим дороги между пунктами, обозначаем цифрами
4. перебираем возможные пути из начала в конец и складываем цифры на дорогах
следовательно, минимальная сумма → оптимальный маршрут
данная задача решается так
<em>(заранее извиняюсь за качество фото)</em>
<u>Белоруссия</u> - Минск
<u>Германия</u> - Берлин
<u>Испания</u> - Мадрид
<u>Италия</u> - Рим
<u>Швеция</u> - Стокгольм