Почему while не отрабатывает

#include <iostream> /* Подключение стандартной библиотеки */
#include <conio.h> /* Подключение библиотеки ввода, вывода */
#include <stdio.h>
#include <string>
#include <stdlib.h>
 
 
int main(int argc, char** argv)
{   
    int mass_length;
    int *mass_elements;
    int couple = 0;
    int summ = 0;
    // вводим количество элементов первого массива           
    std::cout << " Введите количество эллементов массива: "; 
    std::cin >> mass_length;
    std::cout << std::endl;
     // выделяем память для массива1
    mass_elements = new int[mass_length];
    // вводим элементы с клавиатуры
    for(int e = 0; e < mass_length; e++)
    {
        std::cout << " Введите эллемент массива: ", e + 1;
        std::cin >> mass_elements[e];
    }
    std::cout << std::endl;
////////////////////////////////////////////////////////////////////////////// Задание А
    for(int i = 0; i < mass_length; i++)
    {
        if(mass_elements[i] < mass_elements[i+1])
        {
            couple = couple + 1;
        }
    }
    std::cout << " Количество пар по первому заданию " << couple << std::endl;
////////////////////////////////////////////////////////////////////////////// Задание Б
    //ищем последний ноль в массиве (поиск предполагается с конца)
    int r = mass_length;
    while (mass_elements[r] != 0)
    {
        summ = summ + 1;
        r = r - 1;
    }
    //выводи количество элементов после последнего нуля (для проверки)
    std::cout << " Количество целых элементов после последнего нуля " << summ << std::endl; 
    //расчитываем произведение эллементов после последнего нуля
    int c = mass_length - summ;
    int mult = 1;
    for(c; c < mass_length; c++)
    {
        mult = mult * mass_elements[c];
    }
    std::cout << " Произведение чисел стоящих после нуля " << mult << std::endl;
    
    delete mass_elements;
    return(0);
};

int r = mass_length - 1;

for(int i = 0; i < mass_length; i++)
if (mass_elements[i]==0) k=i;

for(int i=k+1; i < mass_length; i++)
mult = mult * mass_elements[i];