В одномерном массиве найти сумму отрицательных, количество положительных и произведение не нулевых элементов - Pascal
Формулировка задачи:
Всем доброго времени суток. Задали сделать лабораторные работы, но вот незадача, простые я смог выполнить а с массивом и так и сяк, не как не получается. Прошу вашей помощи, если можно то программу лучше напишите полностью.
Задача.
В одномерном массиве X(15) найти сумму отрицательных, количество положительных и произведение не нулевых элементов.
P.S. я с таким не сталкивался но возможно ли выполнить все эти действия из задачи в одной программе?
Решение задачи: «В одномерном массиве найти сумму отрицательных, количество положительных и произведение не нулевых элементов»
textual
Листинг программы
a:array[0..15] of integer;
Объяснение кода листинга программы
В данном коде объявляется одномерный массив из 16 элементов типа integer.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д