package main

import (
	"fmt"
	"math"
	"os"
	"strconv"
	"strings"
)

func main() {
	var n int
	fmt.Fscanf(os.Stdin, "%d", &n)
	var input string
	fmt.Fscanf(os.Stdin, "%s", &input)
	nums := make([]int, n)
	dists := make([]int, n-1)
	for i, v := range strings.Split(input, " ") {
		nums[i], _ = strconv.Atoi(v)
	}

	start, end := 1001, 0
	for i := 0; i < n-1; i++ {
		tmp := nums[i] - nums[i+1]
		if tmp < 0 {
			tmp *= -1
		}
		dists[i] = tmp
		if start > nums[i] {
			start = nums[i]
		}
		if start > nums[i+1] {
			start = nums[i+1]
		}
		if end < nums[i] {
			end = nums[i]
		}
		if end < nums[i+1] {
			end = nums[i+1]
		}
	}

	var startPos []int
	var endPos []int
	for i, v = range nums {
		if i == start {
			startPos = append(startPos, i)
		}
		if i == end {
			endPos = append(endPos, i)
		}
	}

	minDist := 1000
	for _, i := range startPos {
		for _, j := range endPos {
			d := 0
			for _, v := range dists[startPos : endPos-1] {
				d += v
			}
			if minDist > d {
				minDist = d
			}
		}
	}

	fmt.Println(d)
}
