|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
31.03.2008, 18:54 | #11 |
Пользователь
Регистрация: 30.10.2007
Сообщений: 30
|
да,нужно в каждый билет сунуть по вопросу из разных тем.
|
31.03.2008, 19:41 | #12 |
Участник клуба
Регистрация: 26.10.2007
Сообщений: 1,244
|
Мне приходит в голову только хранить номера в определённых диапазонах.
И брать их от туда при выводе. Напимер: Vop[1] := '1 Tema 1 vopros'; Vop[2] := '1 Tema 2 vopros'; Vop[3] := '1 Tema 3 vopros'; Vop[4] := '1 Tema 4 vopros'; Vop[5] := '1 Tema 5 vopros'; Vop[6] := '2 Tema 1 vopros'; Vop[7] := '2 Tema 2 vopros'; Vop[8] := '2 Tema 3 vopros'; Vop[9] := '2 Tema 4 vopros'; Vop[10] := '2 Tema 5 vopros'; Vop[11] := '3 Tema 1 vopros'; Vop[12] := '3 Tema 2 vopros'; Vop[13] := '3 Tema 3 vopros'; Vop[14] := '3 Tema 4 vopros'; Vop[15] := '3 Tema 5 vopros'; Массив рандомных неповторяющихся чисел будет иметь тогда такой вид: 1..5 - вопросы 1 темы (дапазон массива Vop[1..5]) 6..10 - второй темы. (дапазон массива Vop[6..10]) 11..15 - 3 темы. (дапазон массива Vop[11..15])
Умом Россию не понять, пока не выпито ноль пять,
А если выпито ноль пять всё делом кажется не хитрым, Попытка глубже понимать уже попахивает литром... |
31.03.2008, 20:00 | #13 |
Пользователь
Регистрация: 30.10.2007
Сообщений: 30
|
Т.е. нужно сначала отдельно прорандомить 3 диапозона, а потом циклом выводить билеты?я правильно понимаю?
|
31.03.2008, 20:14 | #14 |
Участник клуба
Регистрация: 26.10.2007
Сообщений: 1,244
|
Я к тому, чтонадо разбить массив на части где будем хранить рандомные значения вопросов тем.
Массив вопросов: 1 2 3 4 5 - 1 тема 6 7 8 9 10 - 2 тема 11 12 13 14 15 - 3 тема Массив "мешалки" должен создать вот такой например массив. 3 2 1 5 4 - перемешанные вопросы 1 темы 9 10 6 8 7 - 2 темы 13 11 14 12 15 - 3 темы. Теперь надо выводить вопросы с смещением на 5. 1, 6, 11 - 1 билет. 2, 7, 12 - 2 билет. ....... 5, 10, 15 - 5 билет. В результате 5 билетов в которых нет одинаковых вопросов и в каждом билете по вопросу из одной темы.
Умом Россию не понять, пока не выпито ноль пять,
А если выпито ноль пять всё делом кажется не хитрым, Попытка глубже понимать уже попахивает литром... |
31.03.2008, 20:58 | #15 |
Пользователь
Регистрация: 30.10.2007
Сообщений: 30
|
такс...это получилось))спасибки большое)
|
31.03.2008, 22:31 | #16 |
Участник клуба
Регистрация: 26.10.2007
Сообщений: 1,244
|
Вариант кода который:
1. Перемешивает вопросы. (по 10 на каждую тему) 2. Создаёт 10 билетов. В котором по 3 вопроса, по одному из каждой темы. Код:
Умом Россию не понять, пока не выпито ноль пять,
А если выпито ноль пять всё делом кажется не хитрым, Попытка глубже понимать уже попахивает литром... |
31.03.2008, 22:41 | #17 |
Пользователь
Регистрация: 30.10.2007
Сообщений: 30
|
это все получилось.
Вопрос таков, по этому случаю, например,я хочу, чтобы у меня в билете было 2 вопроса,какое мне условие нужно поставить? |
31.03.2008, 22:45 | #18 |
Участник клуба
Регистрация: 26.10.2007
Сообщений: 1,244
|
Просто удалить строку вывода третьего вопроса.
Или в этом куске вклиниваешь блоки If Then Else Код:
Умом Россию не понять, пока не выпито ноль пять,
А если выпито ноль пять всё делом кажется не хитрым, Попытка глубже понимать уже попахивает литром... |
31.03.2008, 22:48 | #19 |
Пользователь
Регистрация: 30.10.2007
Сообщений: 30
|
удалять нельзя,я тогда вопросы из третьей темы потеряю, мне нужно чтобы после вывода двух вопросов допустим печаталась надпись, что это следующий билет.
(я делаю что если i mod 2 =0 then writeln ('bilet#') но мне эта надпись печатается не после двух вопросов, а в самом верху почему-то. Вот в этом проблема так сказать... Последний раз редактировалось Jodu; 31.03.2008 в 22:52. |
31.03.2008, 23:17 | #20 |
Участник клуба
Регистрация: 26.10.2007
Сообщений: 1,244
|
Напиши один в один что ты хочешь увидеть на экране...
Чтото неочень понятно зачем писать два вопроса а потом "Билет №"?!?
Умом Россию не понять, пока не выпито ноль пять,
А если выпито ноль пять всё делом кажется не хитрым, Попытка глубже понимать уже попахивает литром... |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Составление слова | Cawboy | Общие вопросы Delphi | 2 | 03.06.2008 13:21 |
Составление диаграммы | Иля | Microsoft Office Excel | 1 | 06.04.2008 18:08 |