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