Двухмерный массив, вывести строки, в которых элементы не повторяются - 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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
