Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/4: Рейтинг темы: голосов - 4, средняя оценка - 4.50
0 / 0 / 1
Регистрация: 15.09.2016
Сообщений: 36
1

В массиве поменять местами соседние элементы

15.09.2016, 11:31. Просмотров 717. Ответов 1
Метки нет (Все метки)

В заданном одномерном массиве поменять местами соседние
элементы, стоящие на четных местах, с элементами, стоящими на нечетных местах.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
15.09.2016, 11:31
Ответы с готовыми решениями:

В заданном одномерном массиве поменять местами соседние элементы, стоящие на четных местах, с элементами, стоящими на нечетных
В заданном одномерном массиве поменять местами соседние элементы, стоящие на четных местах, с...

Переставить элементы массива в обратном порядке; поменять местами соседние пары
В общем, в чём суть проблемы, по первой задачи у меня вроде всё работает, но последний элемент...

Поменять местами соседние элементы массива и вывести произведение элементов, стоящих на чётных местах
1. Создать одномерный массив из 10 элементов. Поменять местами соседние элементы массива и вывести...

В массиве поменять местами наименьшие и наибольшие элементы
в массиве поменять местами наименьшие и наибольшие элементы

1
3257 / 1995 / 643
Регистрация: 02.11.2012
Сообщений: 5,174
15.09.2016, 13:29 2
вариант
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
Sub vvv()
Dim A(), B(), i%
A = Array(1, 2, 3, 4, 5, 6, 7, 8)
ReDim B(UBound(A))
For i = 0 To UBound(A) - 1 Step 2
 B(i) = A(i + 1): B(i + 1) = A(i)
Next
If (UBound(A) Mod 2) = 0 Then B(UBound(A)) = A(UBound(A))
Debug.Print Join(A(), ",")
Debug.Print Join(B(), ",")
End Sub
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
15.09.2016, 13:29

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

Поменять местами элементы главной и побочной диагонали в массиве
Дана матрица A. Поменять местами элементы главной и побочной диагонали. Private Sub...

В массиве из 10 целых чисел наибольший и наименьший элементы поменять местами
В массиве из 10 целых чисел наибольший и наименьший элементы поменять местами. Помогите...

Как в выделенном диапазоне из двух столбцов поменять соседние значения местами.
помогите пожалуйста

Поменять местами столбец и строку в двумерном массиве
Доброго времени суток! Очень нужна помощь с задачей. При запуске программы выдает subscript out of...


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

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

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