написать программу для подсчета положительных элементов одномерного массива. размерность массива произвольнаянаписать прогрумму для подсчёта отрицательных элементов одномерного массива. размерность массива произвольная. в паскале и блок схему ,умоляю