Winner Nicke (Revolution IV)

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

cyclist_14

by cyclist

Status: Passed
Results: pass
CPU Time: 41.37
Score: 275.0
Submitted at: 2003-11-06 16:09:08 UTC
Scored at: 2003-11-06 16:16:07 UTC

Current Rank: 172nd
Based on: cyclist_4 (diff)
Basis for: cyclist_14 ;end (diff)
Comments
Please login or create a profile.
Code 
[n m]=size(a);
z=n*m;
y = 1:z
for i=y
    p{i}=i;
end
for i=1:99
    for k=y
        e=p{k}(end);
        if e+n<=z & a(e+n)==a(e)+1
            p{k} = [p{k} e+n];
        elseif e>n & a(e-n)==a(e)+1
            p{k} = [p{k} e-n];
        elseif mod(e-1,n)<n-1 & a(e+1)==a(e)+1
            p{k} = [p{k} e+1];
        elseif mod(e-1,n)>0 & a(e-1)==a(e)+1
            p{k} = [p{k} e-1];
        end
        d(k) = nnz(p{k});
    end
end
[a b]=max(d);
b = p{b}'