Форум программистов, компьютерный форум, киберфорум
Наши страницы

Delphi для начинающих

Войти
Регистрация
Восстановить пароль
 
Игорь Кузьменко
0 / 0 / 0
Регистрация: 02.06.2015
Сообщений: 6
#1

Найти произведение номеров нулевых элементов массива - Delphi

04.06.2015, 21:10. Просмотров 312. Ответов 3
Метки нет (Все метки)

Дан массив из 100 случайных чисел. Найти произведение номеров нулевых элементов массива.
Заранее спасибо, кто помог несчастному юзеру=-)
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
04.06.2015, 21:10
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Найти произведение номеров нулевых элементов массива (Delphi):

Найти произведение номеров нечетных элементов массива - Delphi
Найти произведение номеров нечетных элементов массива А=(1,2,3,4,5,6,7,8,9,10,11) Добавлено через 3 часа 15 минут Решил,вопрос снят.

В массиве d(16) найти k- количество нулевых элементов и распечатать первые k элементов массива d - Delphi
Ну помогите пожалуйста мне надо на экзамен допуск получить!! В массиве d(16) найти k- количество нулевых элементов и распечатать первые k...

Найти сумму номеров элементов массива - Delphi
Дан одномерный массив xn. Найти сумму номеров элементов массива, значение которых по модулю меньше 5. Вывести на экран все отрицательные...

Найти сумму номеров отрицательных элементов массива h=(h1,h2,…,hn ). - Delphi
Очень нужна ваша помощь. Преподаватель зверь, а пары пролетели и МАССИВЫ были заданы для домашнего прохождения. Вторую неделю группой весим...

Найти сумму номеров отрицательных элементов массива - Delphi
Есть задачка: Найти сумму номеров отрицательных элементов массива h=(h_1,h_2,…,h_n ). var h:array of...

Найти количество элементов массива, меньших заданного числа В, и произведение всех элементов - Delphi
19. В массиве X(N) найти количество элементов массива, меньших заданного числа В, и произведение всех элементов.

3
Immo
180 / 180 / 52
Регистрация: 02.10.2012
Сообщений: 807
05.06.2015, 09:10 #2
For I:=1 to 100 do
If x[i]=0 then multy:=multy*i;
1
SashaRasha
17 / 17 / 1
Регистрация: 08.10.2008
Сообщений: 235
05.06.2015, 09:18 #3
а мульти чему равен изначально?
0
Puporev
Модератор
53860 / 41493 / 14596
Регистрация: 18.05.2008
Сообщений: 97,282
05.06.2015, 09:30 #4
Цитата Сообщение от SashaRasha Посмотреть сообщение
а мульти чему равен изначально?
Delphi
1
multy:=1;
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
05.06.2015, 09:30
Привет! Вот еще темы с ответами:

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

Найти произведение порядковых номеров символов - Delphi
1задача. вычислить значение выражения в DElfi ∜(x√(ln⁡x )) +y/cos⁡x 2 задача. Найти произведение порядковых номеров символов.Входящих в...

Найти произведение элементов массива - Delphi
Попалось вот такое задание "Найти произведение элементов массива между минимальным и максимальны минимальным по модулю элементами" никак не...

Найти произведение элементов массива, кратных 5 - Delphi
1.Задан одномерный массив из N элементов. Размерность массива и сам массив вводится с клавиатуры. Найти произведение элементов массива,...


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

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

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