R[bloc] then Find(bloc+1,1);
R[bloc] then Find(bloc+1,1);
Find(bloc,jnd+1);
end;{Find}
Нам осталось дать общую логику, но после выполненной работы она не вызывает затруднений.
program R_min;
const MaxN=...;
type ... var ...
procedure Init; {ввод и инициализация данных}
begin
...
end;
procedure Print;{вывод результата}
begin
...
end;
{процедуры и функции, рассмотренные ранее}
{основная логика}
begin
Init;
Blocs;
Find(1,1);
Print;
end.
3.8 Раскраски
3.8.1 Правильные раскраски
Пусть G=(V,E) - неориентированный граф. Произвольная функция f:V?{1,2,...,k}, где k принадлежит множеству натуральных чисел, называется вершинной k-раскраской графа G. Раскраска называется правильной, если f(u)?f(v), для любых смежных вершин u и v. Граф, для которого существует правильная k-раскраска, называется k-раскрашиваемым. Минимальное число k, при котором граф G является k-раскрашиваемым, называется хроматическим числом графа и обозначается ?(G).
Пример.?(G)=3.
Индекс
Элементарные функции
Линейные уравнения
Нелинейные уравнения
Случайные числа
