Winner Nicke (Revolution IV)

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

Imre 23

by Imre Polik

Status: Passed
Results: pass
CPU Time: 54.919
Score: 245.0
Submitted at: 2003-11-06 16:58:58 UTC
Scored at: 2003-11-06 18:43:25 UTC

Current Rank: 72nd
Based on: Imre 22 (diff)
Basis for: cyclist_28 (diff)
Basis for: Imre 24 (diff)

Comments
Please login or create a profile.
Code
[n m]=size(a);
z=n*m;
for i=1:z
    p{i}=i;
end
for i=';;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;'
    for k=1:z
        e=p{k}(end);
        h = a(e)+1;
        g = e-1;
        w = e+n;
        x = p{k};
        f = mod(g,n);        
        if w<=z & a(w)==h
            p{k} = [x; w];
        elseif e>n & a(e-n)==h
            p{k} = [x; e-n];
        elseif f<n-1 & a(e+1)==h
            p{k} = [x; e+1];
        elseif f>0 & a(g)==h
            p{k} = [x; g];
        end
        d(k) = nnz(p{k});
    end
end
[v b]=max(d);
b = p{b}