Problem:
Score : 400 points

Problem Statement

You have N items and a bag of strength W.
The i-th item has a weight of w_i and a value of v_i.

You will select some of the items and put them in the bag.
Here, the total weight of the selected items needs to be at most W.

Your objective is to maximize the total value of the selected items.

Constraints

1 ≤ N ≤ 100

1 ≤ W ≤ 10^9

1 ≤ w_i ≤ 10^9

For each i = 2,3,...,N, w_1 ≤ w_i ≤ w_1 + 3.

1 ≤ v_i ≤ 10^7

W, each w_i and v_i are integers.

Input

Input is given from Standard Input in the following format:

N W
w_1 v_1
w_2 v_2
:
w_N v_N

Output

Print the maximum possible total value of the selected items.

Sample Input 1

4 6
2 1
3 4
4 10
3 4

Sample Output 1

11

The first and third items should be selected.

Sample Input 2

4 6
2 1
3 7
4 10
3 6

Sample Output 2

13

The second and fourth items should be selected.

Sample Input 3

4 10
1 100
1 100
1 100
1 100

Sample Output 3

400

You can take everything.

Sample Input 4

4 1
10 100
10 100
10 100
10 100

Sample Output 4

0

You can take nothing.

Solution in Rust (1.15.1) (judge verdict: Accepted)

use std::cmp::max;

macro_rules! input {
    (source = $s:expr, $($r:tt)*) => {
        let mut iter = $s.split_whitespace();
        input_inner!{iter, $($r)*}
    };
    ($($r:tt)*) => {
        let s = {
            use std::io::Read;
            let mut s = String::new();
            std::io::stdin().read_to_string(&mut s).unwrap();
            s
        };
        let mut iter = s.split_whitespace();
        input_inner!{iter, $($r)*}
    };
}

macro_rules! input_inner {
    ($iter:expr) => {};
    ($iter:expr, ) => {};
    // var... 変数の識別子, $t...型を一つよむ
    ($iter:expr, $var:ident : $t:tt $($r:tt)*) => {
        let $var = read_value!($iter, $t);
        //ここで繰り返し
        input_inner!{$iter $($r)*}
    };
}

macro_rules! read_value {
    ($iter:expr, ( $($t:tt),* )) => {
        ( $(read_value!($iter, $t)),* )
    };
    //
    ($iter:expr, [ $t:tt ; $len:expr ]) => {
        (0..$len).map(|_| read_value!($iter, $t)).collect::<Vec<_>>()
    };

    ($iter:expr, chars) => {
        read_value!($iter, String).chars().collect::<Vec<char>>()
    };

    ($iter:expr, usize1) => {
        read_value!($iter, usize) - 1
    };
    // 配列の最後のNestではここで型が指定されてparseされる
    ($iter:expr, $t:ty) => {
        $iter.next().unwrap().parse::<$t>().expect("Parse error")
    };
}

fn accumulate_sum(v: &Vec<usize>) -> Vec<usize> {
    let mut res = vec![0; v.len() + 1];
    for i in 1..res.len() {
        res[i] += v[i - 1] + res[i - 1];
    }
    res
}

fn main() {
    input! {
        n: usize,
        w: usize,
        wv: [(usize, usize);n]
    }
    let mut v0: Vec<usize> = vec![];
    let mut v1: Vec<usize> = vec![];
    let mut v2: Vec<usize> = vec![];
    let mut v3: Vec<usize> = vec![];
    for i in 0..n {
        match wv[i].0 - wv[0].0 {
            0 => v0.push(wv[i].1),
            1 => v1.push(wv[i].1),
            2 => v2.push(wv[i].1),
            3 => v3.push(wv[i].1),
            _ => (),
        }
    }
    v0.sort_by(|a, b| b.cmp(&a));
    let ac0 = accumulate_sum(&v0);
    v1.sort_by(|a, b| b.cmp(&a));
    let ac1 = accumulate_sum(&v1);
    v2.sort_by(|a, b| b.cmp(&a));
    let ac2 = accumulate_sum(&v2);
    v3.sort_by(|a, b| b.cmp(&a));
    let ac3 = accumulate_sum(&v3);
    let mut ans = 0;
    for i in 0..(v0.len() + 1) {
        for j in 0..(v1.len() + 1) {
            for k in 0..(v2.len() + 1) {
                for l in 0..(v3.len() + 1) {
                    let mut tmpans = 0;
                    tmpans += ac0[i] + ac1[j] + ac2[k] + ac3[l];
                    if w >= i * wv[0].0 + j * (wv[0].0 + 1) + k * (wv[0].0 + 2) + l * (wv[0].0 + 3)
                    {
                        ans = max(ans, tmpans);
                    }
                }
            }
        }
    }
    println!("{}", ans);
}