Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Sloth_sirit
0 / 0 / 0
Регистрация: 13.12.2016
Сообщений: 10
1

Массив: Вычислить произведение положительных элементов массива

06.07.2017, 20:09. Просмотров 261. Ответов 8
Метки нет (Все метки)

В одномерном массиве, состоящем из n вещественных элементов, вычислить:
произведение положительных элементов массива;
сумму элементов массива, расположенных до минимального элемента.
Упорядочить по возрастанию отдельно элементы, стоящие на четных местах, и элементы, стоящие на нечетных местах.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
06.07.2017, 20:09
Ответы с готовыми решениями:

Вычислить произведение первого, третьего и шестого положительных элементов массива
Срочно нужно решить задачу через стринг Рид Вычислить произведение первого,...

Массив: Вычислить количество положительных элементов массива
Задача 3. Массивы . В одномерном массиве, состоящем из n целочисленных...

Найти произведение всех положительных элементов массива В с 9 элементов
Найти произведение всех положительных элементов массива В с 9 элементов....

Дана матрица n*n, вычислить произведение положительных х элементов матрицы
Матрица вводиться рандомно и она долна отображаться на форме.

Вычислить сумму элементов массива А, количество положительных элементов массива В и его максимальный элемент
Дано натуральное число n, массивы А и В размерностью n. Вести с клавиатуры...

8
D1973
Модератор
3562 / 2568 / 1253
Регистрация: 21.01.2014
Сообщений: 10,787
Записей в блоге: 3
Завершенные тесты: 1
07.07.2017, 09:00 2
Цитата Сообщение от Sloth_sirit Посмотреть сообщение
произведение положительных элементов массива;
А если их нет?
Цитата Сообщение от Sloth_sirit Посмотреть сообщение
сумму элементов массива, расположенных до минимального элемента.
А если он первый?
0
AHBAR
239 / 239 / 167
Регистрация: 05.04.2013
Сообщений: 1,110
07.07.2017, 11:07 3
Sloth_sirit,
Цитата Сообщение от Sloth_sirit Посмотреть сообщение
произведение положительных элементов массива
Delphi
1
2
3
p:=1;
for i := 0 to n-1 do if a[i] > 0 then p := p * a[i];
if p <> 1 then ShowMessage('Произведение равно ' + FloatToStr(p)) else ShowMessage('Нет положительный элементов');
Цитата Сообщение от Sloth_sirit Посмотреть сообщение
сумму элементов массива, расположенных до минимального элемента
а если минимальных несколько?
0
D1973
Модератор
3562 / 2568 / 1253
Регистрация: 21.01.2014
Сообщений: 10,787
Записей в блоге: 3
Завершенные тесты: 1
07.07.2017, 11:54 4
Цитата Сообщение от AHBAR Посмотреть сообщение
if a[i] > 0 then p := p * a[i];
if p <> 1 then
AHBAR, а если все положительные элементы равны 1? Вторая проверка. ИМХО, ни к чему...
0
AHBAR
239 / 239 / 167
Регистрация: 05.04.2013
Сообщений: 1,110
07.07.2017, 14:22 5
Цитата Сообщение от D1973 Посмотреть сообщение
а если все положительные элементы равны 1? Вторая проверка. ИМХО, ни к чему...
согласен
Delphi
1
2
3
4
5
p:=1;
count := 0;
for i := 0 to n-1 do
if a[i] > 0 then begin p := p * a[i]; inc(count); end;
if count > 0 then ShowMessage('Произведение равно ' + FloatToStr(p)) else ShowMessage('Нет положительный элементов');
0
Sloth_sirit
0 / 0 / 0
Регистрация: 13.12.2016
Сообщений: 10
13.07.2017, 10:59  [ТС] 6
up.
0
D1973
Модератор
3562 / 2568 / 1253
Регистрация: 21.01.2014
Сообщений: 10,787
Записей в блоге: 3
Завершенные тесты: 1
13.07.2017, 11:32 7
Sloth_sirit, что up??? Вам ответ был дан еще 7-го числа!
0
AHBAR
13.07.2017, 14:04
  #8

Не по теме:

Цитата Сообщение от D1973 Посмотреть сообщение
что up???
это он проглотил ответ. ртом - ааап

0
D1973
13.07.2017, 14:46     Массив: Вычислить произведение положительных элементов массива
  #9

Не по теме:

AHBAR, понятно... :D лишь бы переварилось теперь...

0
13.07.2017, 14:46
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
13.07.2017, 14:46
Привет! Вот еще темы с ответами:

Дан массив Х(100). Вычислить сумму и количество положительных и отрицательных элементов массива, если -1xi1
Дан массив Х(100). Вычислить сумму и количество положительных и отрицательных...

Подсчитать количество и произведение положительных элементов массива
Значит задача звучит так: Задан массив из 90 случайных целых чисел....

Вычислить произведение положительных элементов матрицы А расположенных под главной диагональю
Ребят!!!Помогите пожалуйста!!!Надо срочно программу написать!!!буду очень...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
9
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru