Проходим паскаль, решить. дан одномерный массив, найти количество отрицательных чисел, увеличить их на значение самого элемента. и найти произведение отрицательных чисел. знаю только, что начинается вот так: program p1; type mass = array [1..100] of