Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.89/9: Рейтинг темы: голосов - 9, средняя оценка - 4.89
0 / 0 / 0
Регистрация: 24.05.2012
Сообщений: 3

Ввести одномерный массив из 12 чисел, в диапазоне от -50 до 50. Из них найти произведение чисел от 5-10

24.05.2012, 09:51. Показов 1944. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Ввести одномерный массив из 12 чисел, в диапазоне от -50 до 50. Из них найти произведение чисел от 5-10.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
24.05.2012, 09:51
Ответы с готовыми решениями:

Одномерный массив (Ввести массив из 10 вещественных чисел.Найти сумму чисел,стоящих на чётных местах)
Ввести массив из 10 вещественных чисел.Найти сумму чисел,стоящих на чётных местах. Обьясните что делать?

Ввести 10 целых чисел .Найти произведение тех,которые находятся в диапазоне от 3 до 7
Ввести 10 целых чисел.Найти произведение тех,которые находятся в диапазоне от 3 до 7.

Задан массив целых чисел М * Н. Найти элементы, которые делятся на 7 и образовать из них одномерный массив
задано массив целых числе М * Н найти элементы, которые делятся на 7 и образовать из них одномерный массив

2
Эксперт Hardware
 Аватар для Linoge
3205 / 1915 / 324
Регистрация: 25.10.2011
Сообщений: 5,564
24.05.2012, 10:01
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub Command1_Click()
Dim mas(11)
mult# = 1
For i = 0 To 11
    'ñëó÷àéíûìè ÷èñëàìè
    mas(i) = Int(Rnd() * 101 - 50)
    'ââîä ñ êëàâû
    'Do
    '    mas(i) = InputBox("Ââåäèòå " & i & " ýëåìåíò [-50;50]")
    'Loop Until mas(i) >= -50 And mas(i) <= 50
    '------------------
    If mas(i) >= 5 And mas(i) <= 10 Then mult = mult * mas(i)
Next
MsgBox mult
End Sub
1
0 / 0 / 0
Регистрация: 24.05.2012
Сообщений: 3
24.05.2012, 10:18  [ТС]
Реально помог, благодарю.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
24.05.2012, 10:18
Помогаю со студенческими работами здесь

Ввести 10 чисел , найти среди них минимальное максимальное и сумму этих 10 чисел
Ввести 10 чисел , найти среди них минимальное максимальное и сумму этих 10 чисел . Нужно использовать функцию to ... do .

Дана последовательность чисел А(20) в диапазоне от -10 до 10. Найти произведение всех нечетных чисел
Дана последовательность чисел А(20) в диапазоне от -10 до 10. Найти произведение всех нечетных чисел.

Сгенерировать 10 натуральных чисел в диапазоне от -50 до 50. Найти сумму четных и произведение положительных чисел
1. Сгенерировать 10 натуральных чисел в диапазоне от -50 до 50. Найти сумму четных и произведение положительных чисел.

Одномерный массив из 11 целых чисел. Найти сколько среди них отличных от последнего числа
Составить программу. Одномерный массив из 11 целых чисел. Найти сколько среди них отличных от последнего числа

Ввести одномерный массив из 10 целых чисел. Найти и напечатать сумму элементов, кратных 2.
Ввести одномерный массив из 10 целых чисел. Найти и напечатать сумму элементов, кратных 2.


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT
bedvit 28.01.2026
Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .
Киев стоит - украинская песня
zorxor 28.01.2026
wfWdiRqdTxc О Господи, Вечный, Ты . . . Я помоги, Бесконечный. . . Я прошу Ты. . . Я погибаю, спаси. . . Я прошу Тебя Вечный. . .
Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 28.01.2026
Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .
Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL3_image
8Observer8 27.01.2026
Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .
влияние грибов на сукцессию
anaschu 26.01.2026
Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android
8Observer8 26.01.2026
Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .
Установка Android SDK, NDK, JDK, CMake и т.д.
8Observer8 25.01.2026
Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf
8Observer8 25.01.2026
Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru