POJ3666Making the Grade[DP 离散化 LIS相关]

Making the Grade

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 A₁, ... , A_N (1 ≤ N ≤ 2,000) describing the elevation (0 ≤ A_i ≤ 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 B₁, . ... , B_N 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

|A₁ - B₁| + |A₂ - B₂| + ... + |A_N - B_N |

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: A_i

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

USACO 2008 February Gold

//
//  main.cpp
//  poj3666
//
//  Created by Candy on 9/22/16.
//  Copyright © 2016 Candy. All rights reserved.
//

#include<iostream>
#include<cstdio>
#include<cstring>
#include<algorithm>
#include<cmath>
using namespace std;
const int N=2005,INF=1e9+5;
int read(){
    char c=getchar();int x=0,f=1;
    while(c<‘0‘||c>‘9‘){if(c==‘-‘)f=-1; c=getchar();}
    while(c>=‘0‘&&c<=‘9‘){x=x*10+c-‘0‘; c=getchar();}
    return x*f;
}
int n,a[N],mp[N],k,ans=INF;
int f[N][N];
void dp(){
    sort(mp+1,mp+1+n);
    for(int i=1;i<=n;i++){
        int mn=INF;
        for(int j=1;j<=k;j++){
            mn=min(mn,f[i-1][j]);
            f[i][j]=mn+abs(a[i]-mp[j]);
        }
    }
    for(int j=1;j<=k;j++) ans=min(ans,f[n][j]);

    for(int i=1;i<=n;i++){
        int mn=INF;
        for(int j=k;j>=1;j--){
            mn=min(mn,f[i-1][j]);
            f[i][j]=mn+abs(a[i]-mp[j]);
        }
    }
    for(int j=1;j<=k;j++) ans=min(ans,f[n][j]);
}
int main(int argc, const char * argv[]) {
    n=read();
    for(int i=1;i<=n;i++){
        a[i]=mp[i]=read();
    }
    k=unique(mp+1,mp+1+n)-mp-1;
    dp();
    printf("%d",ans);
    return 0;
}