Finish 2003-11-13 10:00:00 UTC

asd1

by Laszlo Sragner

Status: Passed
Results: pass
CPU Time: 28.872
Score: 247.0
Submitted at: 2003-11-06 11:40:24 UTC
Scored at: 2003-11-06 12:28:11 UTC

Current Rank: 91st
Based on: Finally? (diff)
Basis for: asd2 (diff)
Comments
Please login or create a profile.
Code 
n = size(a,1);
s = {1};
D = Inf*(1:n);
P = cell(1,n);
while numel(s)
   p = s{end};
   s(end)=[];
   k = setdiff(find(a(p(end),:)), p);
   for q = k
      r = [p q];
      s{end+1} = r;
      d = 0;
      for i = 2:numel(r)
         d = d + norm(b(r(i),:) - b(r(i-1),:));
      end
      if d < D(r(end))
         D(r(end)) = d;
         P{r(end)} = r;
      end
   end
end

D(isinf(D))=0;
[i,j]=max(D);
c=P{j};