Problem:
Score : 700 points

Problem Statement

N cells are arranged in a row.
Some of them may contain tokens.
You are given a string s that consists of 0s and 1s.
If the i-th character of s is 1, the i-th cell (from left) contains a token.
Otherwise, it doesn't contain a token.

Snuke wants to perform the following operation as many times as possible.
In each operation, he chooses three consecutive cells.
Let's call the cells X, Y, Z from left to right.
In order for the operation to be valid, both X and Z must contain tokens and Y must not contain a token.
Then, he removes these two tokens and puts a new token on Y.

How many operations can he perform if he performs operations in the optimal way?

Constraints

1 \leq N \leq 500,000

|s| = N

Each character in s is either 0 or 1.

Input

Input is given from Standard Input in the following format:

N
s

Output

Print the answer.

Sample Input 1

7
1010101

Sample Output 1

2

For example, he can perform two operations in the following way:

Perform an operation on the last three cells. Now the string that represents tokens becomes 1010010.

Perform an operation on the first three cells. Now the string that represents tokens becomes 0100010.

Note that the choice of operations matters.
For example, if he chooses three cells in the middle first, he can perform no more operations.

Sample Input 2

50
10101000010011011110001001111110000101010111100110

Sample Output 2

10

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

/// Thank you tanakh!!!
/// https://qiita.com/tanakh/items/0ba42c7ca36cd29d0ac8
macro_rules! input {
    (source = $s:expr, $($r:tt)*) => {
        let mut iter = $s.split_whitespace();
        input_inner!{iter, $($r)*}
    };
    ($($r:tt)*) => {
        let mut 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, ) => {};

    ($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
    };

    ($iter:expr, $t:ty) => {
        $iter.next().unwrap().parse::<$t>().expect("Parse error")
    };
}

use std::cmp;

fn main() {
    input!(n: usize, s: chars);
    let mut ok = vec![false; n];
    let mut left = vec![0; n];
    let mut right = vec![0; n];
    for i in 1..(n - 1) {
        if s[i - 1] == '1' && s[i] == '0' && s[i + 1] == '1' {
            ok[i] = true;

            let mut cur = i - 1;
            while cur > 0 && s[cur - 1] == '1' {
                left[i] += 1;
                cur -= 1;
            }

            let mut cur = i + 1;
            while cur + 1 < n && s[cur + 1] == '1' {
                right[i] += 1;
                cur += 1;
            }
        }
    }

    let mut dp = vec![0; n + 1];
    for i in 0..n {
        dp[i + 1] = cmp::max(dp[i + 1], dp[i]);
        if !ok[i] {
            continue;
        }
        dp[i + 2] = cmp::max(dp[i + 2], dp[i - 1] + 1);
        dp[i + 2] = cmp::max(dp[i + 2], dp[i - 1 - left[i]] + 1 + left[i]);
        dp[i + 2 + right[i]] = cmp::max(dp[i + 2 + right[i]], dp[i - 1] + 1 + right[i]);
        if left[i] > 0 {
            dp[i + 2] = cmp::max(dp[i + 2], dp[i - 1 - (left[i] - 1)] + 1 + (left[i] - 1));
        }
        if right[i] > 0 {
            dp[i + 2 + (right[i] - 1)] =
                cmp::max(dp[i + 2 + (right[i] - 1)], dp[i - 1] + 1 + (right[i] - 1));
        }
    }
    println!("{}", dp[n]);
}