Заполнение матрицы и печать столбца этой матрицы - VB

  1. Подскажите пожалуйста код программы для задания: Заполнить в памяти ЭВМ матрицу: 0 1 1 1 -1 0 1 1 -1 -1 0 1 -1 -1 -1 0 Для контроля напечатать третий столбец. Заранее спасибо.


textual

Код к задаче: «Заполнение матрицы и печать столбца этой матрицы - VB»

Private Sub Command1_Click()
Dim A(1 To 4, 1 To 4) As Integer, i As Integer, j As Integer
Cls       'Очищаем форму
For i = 1 To 4
   For j = 1 To 4
       A(i, j) = Sgn(j - i)
       Print A(i, j); vbTab; 'Печатаем всю матрицу. Если не надо - удалите эту строку
   Next j
   Print
Next i
Print
For i = 1 To 4
      Print A(i, 3); vbTab 'Печатаем 3-й столбец
Next i
End Sub

СДЕЛАЙТЕ РЕПОСТ

12   голосов, оценка 4.167 из 5



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

  1. Дана матрица 3х3 Найти сумму элементов первой строки и первого столбца?

  1. Дана матрица размера M х N. Преобразовать матрицу, поменяв местами минимальный и максимальный элемент в каждом столбце.

  1. Дана матрица размера M x N. Преобразовать матрицу, поменяв местами минимальный и максимальный элемент в каждом столбце.

  1. Дана матрица размера M x N. Для каждого столбца матрицы найти произведение его элементов.

  1. Народ, знаю, что вас бесят подобные темы, но прошу помогите. Начали преподавать VB6, но раньше я его не встречал. Задача такова: Дан двумерный массив размерностью N x M элементов. Определить количество элементов, значения которых больше заданного числа F. Если не сложно, пожалуйста напишите полный код с пояснениями. Массив рандомный. Заранее спасибо.

  1. нужно найти наименьший элемент в каждом столбце матрицы E(M,N) и еще,если не сложно,это уже другая,найти элемент(и номер) ближайший к следующему числу в массиве E(N)Добавлено через 2 часа 17 минут во второй задаче неправильно написала,нужно найти элемент (и номер) ближайший к заданному числу в массиве E(N) Помогите пожалуйста,очень нужно......

  1. дан массив С(6,10) 1.надо найти номер столбца минимального элемента в процедуре 2. процедуру вызвать в подпрограмме, чтобы найти номер столбца минимального элемента в каждой строке 3. написать код длля вызова процедур ввода массива, поска номера столбца минимального элемента в каждой строке и вывод результатов спасибо за помощь.Добавлено через 15 часов 10 минут взял из параллельной ветки задачу семилетней давности. она сравнивает числа с заданным. а нужно найти минимальное и выделить номер столбца в котором она есто

  1. Прошу помощи. Задача: "Дана действительная матрица размером n x m. Найти сумму наибольших значений её строк. Написал код для ввода матрицы, что делать дальше ума не приложу. Заранее благодарен

  1. Пиксели рисунка закодированы числами (обозначающими цвет) в виде матрицы, содержащей N строк и M столбцов. Выполните поворот рисунка вправо на 90 градусов. пример: исходный массив: 1 2 3 4 5 6 7 8 9 результат: 7 4 1 8 5 2 9 6 3