read N
read A

A=($A)
M=$((N-1))

#最初
all=${A[0]/-/}

#中間
for (( i=0; i<M; i++ )); do

  j=$((i + 1))
  all=$(( ${A[i]} - ${A[j]} < 0 ? $all + ${A[j]} - ${A[i]} : $all + ${A[i]} - ${A[j]} ))

done

#最後
all=$(( ${A[j]} > 0 ? $all + ${A[j]} : $all - ${A[j]}))


#再計算

#最初

a=${A[0]/-/}
b=$(( ${A[0]} - ${A[1]} > 0 ? ${A[0]} - ${A[1]} : ${A[1]} - ${A[0]} ))
c=${A[1]/-/}

echo $(( $all - $a - $b + $c ))


#中間
for (( i=1; i<M; i++ )); do

  j=$(( i - 1 ))
  k=$(( i + 1 ))

  a=$(( ${A[j]} - ${A[i]} > 0 ? ${A[j]} - ${A[i]} : ${A[i]} - ${A[j]} ))
  b=$(( ${A[i]} - ${A[k]} > 0 ? ${A[i]} - ${A[k]} : ${A[k]} - ${A[i]} ))
  c=$(( ${A[j]} - ${A[k]} > 0 ? ${A[j]} - ${A[k]} : ${A[k]} - ${A[j]} ))
  echo $(( $all - $a - $b + $c ))

done

#最後

a=$(( ${A[j]} - ${A[i]} > 0 ? ${A[j]} - ${A[i]} : ${A[i]} - ${A[k]} ))
b=${A[i]/-/}
c=${A[j]/-/}

echo $(( $all - $a - $b + $c ))
