Что делает данная процедура?

@kapri487 · Регистрация: 29.11.2017

Студворк — интернет-сервис помощи студентам

Помогите пожалуйста разобраться в коде. Скажите хотя бы приблизительно что делает данная процедура, что она ищет и какие переменные за что отвечают. (Программа ищет максимальную клику в графе, я не могу понять именно эту часть кода)

Delphi

procedure rec(ii, ololo:integer);
var i,j:Integer;
begin
if(ololo>N_res) then
  begin
        for i:=0 to i_end-1 do
            Res[i]:=Q[i];
        N_res:=ololo;
  end;
for i:=ii to n-1 do
begin
  for j:=0 to i_end-1 do
        if(g[Q[j]][i]=0) then break;
  if j>n+1 then j:=0;
  if(j=i_end)then
    begin
    Q[i_end]:=i;
    i_end:=i_end+1;
    rec(ii+1, ololo+1);
    i_end:=i_end-1;
    end;
  rec(ii+1, ololo);
  end;
end;

@Matan! · 24.04.2018, 10:47

Помещает в Res индексы с ii по ololo. Бред какой-то.

@Matan! 1437 / 1014 / 228 Регистрация: 31.05.2013 Сообщений: 6,645 Записей в блоге: 6
	24.04.2018, 10:47	2
	Помещает в Res индексы с ii по ololo. Бред какой-то. 0

Опции темы