- функция поиска
- функция поиска минимума двух чисел}
if (n mod p=0) and (p<>1) then opn:=Min(opn,Op[n div p]+p-1);
end;
Op[n]:=opn;
end;
....
2.2.4. Автозаправка
Вдоль кольцевой дороги расположено m городов, в каждом из которых есть автозаправочная станция. Известна стоимость Z[i] заправки в городе с номером i и стоимость C[i] проезда по дороге, соединяющей i - й и (i+1)-й города, C[m] - стоимость проезда между первым и m-м городами. Для жителей каждого города определить город, в который им необходимо съездить, чтобы заправиться самым дешевым образом, и направление - «по часовой стрелке» или «против часовой стрелки», города пронумерованы по часовой стрелке.
Не будем рассматривать переборный вариант решения задачи, суть которого в проверке всех 2*m вариантов для жителей каждого города, итого - 2*m*m проверок. Введем два дополнительных массива
On, Ag: array[1..m] of record wh, qh:integer; end; .
On[i] означает, где следует заправляться (wh) и стоимость заправки (qh) жителям
Индекс
Элементарные функции
Линейные уравнения
Нелинейные уравнения
Случайные числа
