Pascal: Сумма некоторых элементов массива

Задача: Дан одномерный массив А(n). Получить сумму тех элементов массива, которые не четны и отрицательны.

Идея в том, чтобы заполнить массив, вывести его, а потом в том же цикле проверять, являются ли элементы подходящими. Условие первое — нечетность. Остаток от деления на 2 должен быть не равен нулю. Второе условие — элемент массива меньше нуля. Таким образом выбираются необходимые нам элементы.

Остается лишь сложить эти элементы между собой.

Вот исходный код:

Добавить комментарий