Форум программистов, компьютерный форум, киберфорум
Наши страницы
Free Pascal
Войти
Регистрация
Восстановить пароль
Показать сообщение отдельно
Veyron
106 / 106 / 9
Регистрация: 02.06.2009
Сообщений: 578
26.01.2012, 22:52

Посчитать произведение отрицательных элементов массива

26.01.2012, 22:52. Просмотров 1158. Ответов 7
Метки (Все метки)

Ответ

взять переменную S, в которой будет единица первоначально. Затем, Если число в массиве является отрицательным, умножать его на S.

Вернуться к обсуждению:
Посчитать произведение отрицательных элементов массива
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
26.01.2012, 22:52
Готовые ответы и решения:

Вычислить произведение сумм положительных и отрицательных элементов массива
Помогите пожалуйста решить задачи. Массивы Вычислить произведение сумм...

Массив: Получить количество отрицательных членов массива а1, ... , an и произведение элементов, принадлежащих отрезку [a,b].
Помогите!!! Составить программу, просто в паскале полный 0 :( Дан массив...

Посчитать сумму отрицательных элементов вектора
1.1. С клавиатуры вводятся длина (<=100) вектора и его (целые) элементы....

Посчитать произведение элементов, которые больше 6
Здравствуйте уважаемые модераторы! помогите, пожалуйста, написать 2 программы:...

Посчитать произведение всех ненулевых элементов матрицы
посчитать произведение всех ненулевых элементов массива Т

7
Другие темы раздела
Free Pascal Вывод на экран элементов массива http://www.cyberforum.ru/free-pascal/thread435832.html
в общем такая трабла - готовлюсь к экзамену в лекции прочитал следующий пример и решил его проверить: program test; uses crt; type color=(red, blue, green, black); Mass=array of color; var...
Free Pascal Как выделяется память в записях с вариантами? По логике вещей компилятор должен выделять место под самый большой вариант вариантной части записи. Однако вот такой эксперимент: type govno=record name:string; case... http://www.cyberforum.ru/free-pascal/thread435711.html
Free Pascal Динамические списки
Привет! Вот задание: -новый элемент Е в начало списка L, упорядоченного по неубыванию; -добавляет в конец списка L1 все элементы списка L2; Не получается сделать процедуру добавления, т.е....
Free Pascal Найти первые 4 четыре натуральных числа, пятая степень которых оканчивается тремя одинаковыми цифрами, кроме нулей
Найти первые 4 четыре натуральных числа, пятая степень которых оканчивается тремя одинаковыми цифрами, кроме нулей
Free Pascal Записать элементы нечетных строк матрицы в обратном виде http://www.cyberforum.ru/free-pascal/thread435427.html
Нашел на форуме задачу, котоорая записывает элементы нечетных строк в обратном виде в комплексной матрице. unit unit1; interface const n=5; type complex=record re,im:real; ...
Free Pascal Комплексная матрица. Экзамен. В комплексной матрице а сосчитать средней арифметическое элементов главной и побочной диогонали. Я сейчас на экзамене, помощь очень нужна. подробнее
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru