[DP][RQNOJ 3822]选择题

描述

众所周知，如果一个函数在区间内可导，他必定连续。所以他想连续的图选择题，即对于第i个选择题，他只能涂与i-1相同的答案或者是i-1道选择题上一个活下一个选择题（第i-1道题涂了A，第i道只能涂A，B；第i-1道题涂了B，第i道只能涂A，B，C；第i-1道题涂了C，第i道只能涂B，C，D；第i-1道题涂了D，第i道只能涂C，D）。他已经知道了选择题答案，求他能获得的最大分数。注意每道题都一个不同的分数.

输入格式

首先输入一个数n表示一共有n个选择题。

以下共有n行，第i+1行共有一个ai字符和一个数字ci表示分别第i道选择题的答案和分数。

输出格式

输出一个数字，表示按照给定要求最多能够拿到的最大分数。

输入

8
B 1
A 4
B 1
C 1
D 9
C 1
C 9
D 7

输出

33

备注

ai属于{A，B，C，D}
0< ci<=10
对于25%的数据0< n<=5000
对于50%的数据0< n<=10000
对于100%的数据0< n<=500000

var w,dp:array[0..500000,1..4]of longint; n,l:longint; i,j,k:longint; t:char;function max(a,b:longint):longint;begin if a>b then exit(a) else exit(b);end;begin readln(n); for i:=1 to n do  begin   readln(t,l);   case t of   'A':w[i,1]:=l;   'B':w[i,2]:=l;   'C':w[i,3]:=l;   'D':w[i,4]:=l;   end;  end; for i:=1 to n do  begin   dp[i,1]:=max(dp[i-1,1],dp[i-1,2])+w[i,1];   dp[i,2]:=max(max(dp[i-1,1],dp[i-1,2]),dp[i-1,3])+w[i,2];   dp[i,3]:=max(max(dp[ i-1,2],dp[i-1,3]),dp[i-1,4])+w[i,3];   dp[i,4]:=max(dp[i-1,3],dp[i-1,4])+w[i,4];  end; writeln(max(max(max(dp[n,1],dp[n,2]),dp[n,3]),dp[n,4]));end.