Problem:
Score : 700 points

Problem Statement

You have an integer sequence of length N: a_1, a_2, ..., a_N.

You repeatedly perform the following operation until the length of the sequence becomes 1:

First, choose an element of the sequence.

If that element is at either end of the sequence, delete the element.

If that element is not at either end of the sequence, replace the element with the sum of the two elements that are adjacent to it. Then, delete those two elements.

You would like to maximize the final element that remains in the sequence.

Find the maximum possible value of the final element, and the way to achieve it.

Constraints

All input values are integers.

2 \leq N \leq 1000

|a_i| \leq 10^9

Input

Input is given from Standard Input in the following format:

N
a_1 a_2 ... a_N

Output

In the first line, print the maximum possible value of the final element in the sequence.

In the second line, print the number of operations that you perform.

In the (2+i)-th line, if the element chosen in the i-th operation is the x-th element from the left in the sequence at that moment, print x.

If there are multiple ways to achieve the maximum value of the final element, any of them may be printed.

Sample Input 1

5
1 4 3 7 5

Sample Output 1

11
3
1
4
2

The sequence would change as follows:

After the first operation: 4, 3, 7, 5

After the second operation: 4, 3, 7

After the third operation: 11(4+7)

Sample Input 2

4
100 100 -1 100

Sample Output 2

200
2
3
1

After the first operation: 100, 200(100+100)

After the second operation: 200

Sample Input 3

6
-1 -2 -3 1 2 3

Sample Output 3

4
3
2
1
2

After the first operation: -4, 1, 2, 3

After the second operation: 1, 2, 3

After the third operation: 4

Sample Input 4

9
1000000000 1000000000 1000000000 1000000000 1000000000 1000000000 1000000000 1000000000 1000000000

Sample Output 4

5000000000
4
2
2
2
2

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

use std::io::*;
use std::str::FromStr;

const INF: i64 = 1e+14 as i64;

fn read<T: FromStr>() -> T {
    let stdin = stdin();
    let stdin = stdin.lock();
    let token: String = stdin
        .bytes()
        .map(|c| c.expect("failed to read char") as char)
        .skip_while(|c| c.is_whitespace())
        .take_while(|c| !c.is_whitespace())
        .collect();
    token.parse().ok().expect("failed to parse token")
}

fn select(moves: &mut Vec<usize>, aseq: &mut Vec<i64>, index: usize) {
    moves.push(index);
    // println!("{:?} {}", aseq, index);
    if index == 0 || index == aseq.len() - 1 {
        aseq.remove(index);
    } else {
        aseq[index] = aseq[index - 1] + aseq[index + 1];
        aseq.remove(index + 1);
        aseq.remove(index - 1);
    }
}

fn solve(n: usize, aseq: &Vec<i64>, offset: usize) -> (i64, Vec<usize>) {
    let mut ans = -INF;
    let mut moves = vec![];
    if n == 1 && offset == 1 { return (ans, moves); }
    {
        // all minus case
        let mut all_minus = true;
        let mut ans = -INF;
        let mut pos = 0;
        for i in 0..n {
            if i % 2 != offset { continue; }
            if aseq[i] > 0 { all_minus = false; }
            if ans < aseq[i] { 
                ans = aseq[i];
                pos = i;
            }
        }
        if all_minus {
            for i in (pos+1..n).rev() {
                moves.push(i);
            }
            for _ in 0..pos {
                moves.push(0);
            }
            return (ans, moves);
        }
    }
    ans = 0;
    for i in 0..n {
        if i % 2 != offset { continue; }
        if aseq[i] > 0 { ans += aseq[i]; }
    }
    let mut aseq = aseq.clone();
    if offset == 1 {
        select(&mut moves, &mut aseq, 0)
    }
    if aseq.len() % 2 != 1 {
        let index = aseq.len() - 1;
        select(&mut moves, &mut aseq, index);
    }
    while *aseq.first().unwrap() < 0 {
        select(&mut moves, &mut aseq, 0);
        select(&mut moves, &mut aseq, 0);
    }
    while *aseq.last().unwrap() < 0 {
        let index = aseq.len() - 1;
        select(&mut moves, &mut aseq, index);
        select(&mut moves, &mut aseq, index - 1);
    }
    while aseq.len() != 1 {
        assert!(aseq.len() >= 3);
        if aseq[2] > 0 {
            select(&mut moves, &mut aseq, 1);
        } else {
            assert!(aseq.len() >= 5);
            select(&mut moves, &mut aseq, 2);
        }
    }
    return (ans, moves);
}

fn print_ans(ans: (i64, Vec<usize>)) {
    println!("{}", ans.0);
    println!("{}", ans.1.len());
    for v in ans.1 {
        println!("{}", v + 1);
    }
}

fn main() {
    let n: usize = read();
    let mut aseq: Vec<i64> = vec![0; n];
    for i in 0..n {
        aseq[i] = read();
    }
    let ans0 = solve(n, &aseq, 0);
    let ans1 = solve(n, &aseq, 1);
    print_ans(if ans0.0 > ans1.0 { ans0 } else { ans1 });
}