Форум программистов, компьютерный форум, киберфорум
Наши страницы
Visual Basic
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.86/14: Рейтинг темы: голосов - 14, средняя оценка - 4.86
chandler
0 / 0 / 0
Регистрация: 13.05.2009
Сообщений: 4
#1

Поменять местами первый и последний, второй и предпоследний... и тд столбцы массива А

04.06.2009, 19:58. Просмотров 2449. Ответов 1
Метки нет (Все метки)

Поменять местами первый и последний, второй и предпоследний... и тд столбцы массива А. Расставить в полученной матрице побочную диагональ в порядке возрастания n=m=6
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
04.06.2009, 19:58
Ответы с готовыми решениями:

Поменять местами первый и последний столбцы(двумерный массив)
Поменять местами первый и последний столбцы в двумерном массиве прошу помочь...

Поменять местами первый и последний символы строки, а так же третий и десятый символы
Завтра экзамен по информатике, для допуска нужно сдать последнюю задачу,...

Пересчитать матрицу К размерности m * n так, чтобы поменялись местами первый и последний столбец
Пересчитать матрицу К размерности m * n так, чтобы поменялись местами первый...

Поменять местами 1 и 4 столбцы матрицы, а затем 2 и 3 строку
Здравствуйте, подскажите ещё пожалусто, как составить код программы для...

Массивы: поменять местами второй элемент с минимальным
на одной форме должны решаться одновременно. 1.напечатать индексы элементов...

1
Toxa33rus
3814 / 878 / 120
Регистрация: 16.04.2009
Сообщений: 1,767
09.06.2009, 14:59 #2
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
Sub exchangeArray(ByRef Arr, ByVal n1 As Integer, ByVal n2 As Integer, ByVal RowCol As Boolean)
'процедура меняет местами строки или столбцы в двумерном массиве
 
'Arr - двумерный массив значений
'n1 и n2 - номера строк(столбцов) которые поменяем местами
'RowCol - если истина, то меняем строки, иначе столбцы
 
Dim tmpArr() 'временный массив
If RowCol Then
  ReDim tmpArr(UBound(Arr, 2))
  For i = 0 To UBound(Arr, 2)
    tmpArr(i) = Arr(n1, i)
  Next i
  
  For i = 0 To UBound(Arr, 2)
    Arr(n1, i) = Arr(n2, i)
    Arr(n2, i) = tmpArr(i)
  Next i
Else
  ReDim tmpArr(UBound(Arr, 1))
  For i = 0 To UBound(Arr, 1)
    tmpArr(i) = Arr(i, n1)
  Next i
  
  For i = 0 To UBound(Arr, 1)
    Arr(i, n1) = Arr(i, n2)
    Arr(i, n2) = tmpArr(i)
  Next i
 
End If
End Sub
взято с Перенести первые k строк в конец массива, соблюдая порядок их следования.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
09.06.2009, 14:59

Поменять местами минимальный и первый элемент столбца матрицы
1.Через диалоговое окно запросить у пользователя трехзначное число.Найти сумму...

Поменять местами первый положительный элемент с первым отрицательным элементом
1)Массив из 9 элементов. Поменять местами первый положительный элемент с первым...

Заменить последний положительный элемент массива на второй элемент массива
Заменить последний положительный элемент массива на второй элемент массива.


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

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

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