Двухмерный массив, вывести строки, в которых элементы не повторяются - VB

Узнай цену своей работы

Формулировка задачи:

Нужня помощь в Visual Basic. Задача: Создать матрицу (например 5х5) и выписать те строчки, в которых цифры не повторяются.

Решение задачи: «Двухмерный массив, вывести строки, в которых элементы не повторяются»

textual
Листинг программы
For j = 1 To rida
    For i = 1 To rida
        Cells(i, j) = Int(Rnd() * 100)
    Next i
    Next j
 For i = 1 To rida
    For j = 1 To rida - 1
      For k = j + 1 To rida
        If Cells(i, j) = Cells(i, k) Then GoTo 1
   Next k
        Cells(i, j) = Int(Rnd() * 100)
   Next j
     For j = 1 To rida
        Cells(i + 7, j) = Cells(i, j)
   Next j
1
   Next i

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

10   голосов , оценка 4.3 из 5
Похожие ответы