Description

A straight dirt road connects two fields on FJ‘s farm, but it changes elevation more than FJ would like. His cows do not mind climbing up or down a single slope, but they are not fond of an alternating succession of hills and valleys. FJ would like to add and remove dirt from the road so that it becomes one monotonic slope (either sloping up or down).

You are given N integers A1, ... , AN (1 ≤ N ≤ 2,000) describing the elevation (0 ≤ Ai ≤ 1,000,000,000) at each of N equally-spaced positions along the road, starting at the first field and ending at the other. FJ would like to adjust these elevations to a new sequence B1, . ... , BN that is either nonincreasing or nondecreasing. Since it costs the same amount of money to add or remove dirt at any position along the road, the total cost of modifying the road is

|AB1| + |AB2| + ... + |AN - BN |

Please compute the minimum cost of grading his road so it becomes a continuous slope. FJ happily informs you that signed 32-bit integers can certainly be used to compute the answer.

Input

* Line 1: A single integer: N
* Lines 2..N+1: Line i+1 contains a single integer elevation: Ai

Output

* Line 1: A single integer that is the minimum cost for FJ to grade his dirt road so it becomes nonincreasing or nondecreasing in elevation.

Sample Input

```7
1
3
2
4
5
3
9
```

Sample Output

```3
```

Source

```#include <iostream>
#include <algorithm>
#include <climits>
#include <cstdio>
#define LL long long
using namespace std;

const int INF = INT_MAX;

int dp;
int a;
int b;
int main()
{
int n;
while (cin >> n)
{
for (int i = 1; i <= n; i++)
{
scanf("%d", a + i);
b[i] = a[i];
}
sort(b + 1, b + n + 1);
a = 0;
int ans = INF, ans1 = INF;
int mi, minn;

for (int i = 0; i <= n; i++)
{
mi = INF;
for (int j = 1; j <= n; j++)
{
if (i)
{
dp[i][j] = INF;
dp[i][j] = min(dp[i - 1][j], mi) + abs(a[i] - b[j]);
if (mi > dp[i - 1][j])
mi = dp[i - 1][j];
if (i == n)
ans = min(dp[n][j], ans);
}
else dp[i][j] = 0;
}
}
for (int i = 0; i <= n; i++)
{
minn = INF;
for (int j = 1; j <= n; j++)
{
if (i)
{
dp[i][j] = INF;
dp[i][j] = min(dp[i - 1][j], minn) + abs(a[i] - b[n - j + 1]);
if (minn > dp[i - 1][j])
minn = dp[i - 1][j];
if (i == n)
ans1 = min(dp[n][j], ans1);
}
else dp[i][j] = 0;
}
}
for (int i = 1; i <= n; i++)
ans1 = min(dp[n][i], ans1);
printf("%d\n", min(ans, ans1));
}
return 0;
}```