ll a[2d4],y,t;{rd(y);REP(y){rd(y);t=MD;rep(j,2d4)a[j]=t<?=a[j]+abs(y-j);}wt(t);}