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

Сравнить все элементы в массиве между собой

09.04.2018, 18:58. Показов 2625. Ответов 9
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Даны 3 массива.
Для каждого массива вывести индексы тех элементов, значения которых имеют разные знаки.
Немного не понимаю суть самого задания. Нужно сравнить все элементы в массиве между собой и выводить разнознаковые номера?
Кто может написать код для этого задания?
Я пробовал как-то сравнивать через if..then, но чето не получается
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
09.04.2018, 18:58
Ответы с готовыми решениями:

В одномерном массиве найти два максимальных элемента и удалить все элементы между ними
Есть задача: В одномерном массиве найти два максимальных элемента и удалить все элементы между ними. Массив у меня задается случайным...

В массиве из 10 пол./отриц. чисел отобрать всё четные и умножить их между собой
Сам не могу... Не хватает мозгов. Прошу помощи Sub LastLab() Dim m(1 To 10) As Integer Randomize Timer For i = 1 To 10 m(i) =...

Найти номера строк, элементы в каждой из которых одинаковы между собой.
Дан двумерный квадратный массив. Найти номера строк, элементы в каждой из которых одинаковы между собой.

9
 Аватар для Alex77755
11525 / 3812 / 683
Регистрация: 13.02.2009
Сообщений: 11,229
09.04.2018, 19:07
Я пробовал
покажи попытки
Массивы. Обьявление массивов. Сортировка массивов
0
es geht mir gut
 Аватар для SoftIce
11274 / 4760 / 1183
Регистрация: 27.07.2011
Сообщений: 11,439
09.04.2018, 19:09
Цитата Сообщение от Eerok228 Посмотреть сообщение
Даны 3 массива.
Для каждого массива вывести индексы тех элементов, значения которых имеют разные знаки.
Вы точно переписали задание? Ошибки нет?
0
0 / 0 / 0
Регистрация: 06.04.2018
Сообщений: 8
09.04.2018, 19:13  [ТС]
Точно
Миниатюры
Сравнить все элементы в массиве между собой  
0
0 / 0 / 0
Регистрация: 06.04.2018
Сообщений: 8
09.04.2018, 19:16  [ТС]
Ну типо так
Миниатюры
Сравнить все элементы в массиве между собой  
0
 Аватар для Alex77755
11525 / 3812 / 683
Регистрация: 13.02.2009
Сообщений: 11,229
09.04.2018, 21:41
Ну типо так
это было бы так если бы в условии было: знаки соседних элементов одного массива
этого в условии нет
1
0 / 0 / 0
Регистрация: 06.04.2018
Сообщений: 8
10.04.2018, 12:04  [ТС]
А какие есть тогда предположения?
0
es geht mir gut
 Аватар для SoftIce
11274 / 4760 / 1183
Регистрация: 27.07.2011
Сообщений: 11,439
10.04.2018, 14:28
Цитата Сообщение от Eerok228 Посмотреть сообщение
А какие есть тогда предположения?
Индексы положительных элементов в одну кучу, индексы отрицательных - в другую.

А вообще лучше уточнить у преподавателя, а не гадать на кофейной гуще
0
 Аватар для Alex77755
11525 / 3812 / 683
Регистрация: 13.02.2009
Сообщений: 11,229
10.04.2018, 14:50
Лучший ответ Сообщение было отмечено Eerok228 как решение

Решение

опередили...
0
Супер-модератор
Эксперт функциональных языков программированияЭксперт Python
 Аватар для Catstail
38173 / 21108 / 4307
Регистрация: 12.02.2012
Сообщений: 34,704
Записей в блоге: 14
10.04.2018, 15:14
Я бы понял это задание так: перечислить все пары элементов массива, имеющих разные знаки. И решение очевидно:

Visual Basic
1
2
3
4
5
6
7
8
9
10
Sub Task(A() as integer)
      n%=Ubound(A)
      for i%=1 to n%-1
          for j%=i%+1 to n%
              if (A(i%)<0 and A(j%)>0)  Or (A(i%)>0 and A(j%)<0) then
                 debug.print "A(";i%;")=";A(i%);" A(";j%;")=";A(j%)
              end if
          Next j%
      Next i%
End Sub
2
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
10.04.2018, 15:14
Помогаю со студенческими работами здесь

Проверить, является ли равными между собой по сумме все строки матрицы
вобщем код написал, осталось сравнить все sumStr(i) and sumStolb(i) and subDiag подскажите как, а то тупняк :-| условие задачи было:...

В первом массиве собрать все четные элементы исходного, а во втором – все нечетные
Дан массив из N чисел. Сформировать из него два массива: в первом собрать все четные элементы массива, а во втором – все нечетные.

Сравнить элементы ассоциативного массива между собой
Приветствую! Есть массив следующего вида: $response = array( &quot;A1F1&quot; =&gt; '2', &quot;A1F2&quot; =&gt; '3', ...

Сдвинуть все отрицательные элементы с в начало массива,сохраняя их порядок между собой, а все положительные элементы
Дан целочисленный список с количеством элементов 2n, не содержащий нулей. Сдвинуть все отрицательные элементы с в начало массива,сохраняя...

Переставить все элементы k-ой строки матрицы (между собой) и все элементы побочной диагонали
Ребята, помогите пожалуйста решить задачу. переставить все элементы k-ой строки(между собой) и все элементы побочной диагонали. размер...


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

Или воспользуйтесь поиском по форуму:
10
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств
8Observer8 07.02.2026
Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве
8Observer8 02.02.2026
Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .
Философия технологии
iceja 01.02.2026
На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf
8Observer8 01.02.2026
Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли
8Observer8 30.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm
8Observer8 30.01.2026
Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .
SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 29.01.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT
bedvit 28.01.2026
Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru