Страница: 1 |
Страница: 1 |
Вопрос: Помогите пожалуйста с лабой
Добавлено: 13.05.08 18:22
Автор вопроса: Roller_90
Необходимо написать программу составления латинского квадрата. Латинский квадрат - матрица размерностью NxN, элементы которой выбраны от 1 до N так, что каждое число встречается только один раз в каждой строке и в каждом столбце. (N вводится по запросу программы. Все строки матрицы формируются подпрограммой).
Ответы
Всего ответов: 10
Номер ответа: 1
Автор ответа:
shuffle
Администратор
ICQ: 201502381
Вопросов: 15
Ответов: 737
Профиль | | #1
Добавлено: 13.05.08 21:16
dim m%(), n%, i%, j%
n = inputbox("number"
redim m(n, n)
for i = 1 to n
for j = 0 to n
m(i, j) = (i + j - 1) mod n + 1
next
next
end sub
Номер ответа: 2
Автор ответа:
AgentFire
ICQ: 192496851
Вопросов: 75
Ответов: 3178
Профиль | | #2
Добавлено: 14.05.08 23:45
Ой, а че это за одмин такой новый тут? :D
Номер ответа: 3
Автор ответа:
Администратор
ICQ: 278109632
Вопросов: 42
Ответов: 3949
Web-сайт:
Профиль | | #3
Добавлено: 15.05.08 00:35
Он старый К тому же питерский) Питерских не обижать!
Номер ответа: 4
Автор ответа:
Sharp
Лидер форума
ICQ: 216865379
Вопросов: 106
Ответов: 9979
Web-сайт:
Профиль | | #4
Добавлено: 15.05.08 06:39
Фигасе, новый, 2002-го года выпуска
Номер ответа: 5
Автор ответа:
User Unknown
Вечный Юзер!
ICQ: uu@jabber.cz
Вопросов: 120
Ответов: 3302
Профиль | | #5
Добавлено: 15.05.08 10:12
Ну не такой уж и старый...
Ехечютёнер, а каких можно/разрешаешь обижать?
Номер ответа: 6
Автор ответа:
J. Smith
ICQ: ненавижу
Вопросов: 40
Ответов: 477
Web-сайт:
Профиль | | #6
Добавлено: 15.05.08 10:33
Всем стоять, пойманы на месте преступления!
А новичка уже распялибы за офтоп, флуд, флейм.
Номер ответа: 7
Автор ответа:
Администратор
ICQ: 278109632
Вопросов: 42
Ответов: 3949
Web-сайт:
Профиль | | #7
Добавлено: 15.05.08 11:38
Еще раз так напишешь мой ник и можно будет обижать тебя! Футка.
Просто мы с shuffle лично знакомы немного. Как и с Sharp, в принципе.
Номер ответа: 8
Автор ответа:
HACKER
Разработчик Offline Client
Вопросов: 236
Ответов: 8362
Профиль | | #8
Добавлено: 15.05.08 14:56
Номер ответа: 9
Автор ответа:
shuffle
Администратор
ICQ: 201502381
Вопросов: 15
Ответов: 737
Профиль | | #9
Добавлено: 15.05.08 18:24
Олбанскех
Номер ответа: 10
Автор ответа:
AgentFire
ICQ: 192496851
Вопросов: 75
Ответов: 3178
Профиль | | #10
Добавлено: 16.05.08 23:56