Имя: Пароль:
1C
 
Генератор случайных чисел?
Ø
0 Бондаренко Анна
 
21.01.05
14:24
Есть в 1с 8 версии генератор случайных чисел и каким образом это можно сделать?
1 Smitt
 
21.01.05
14:28
Можно с текущим временем поиграться
2 Бондаренко Анна
 
21.01.05
14:30
а как? покажи на примере
3 OFF
 
21.01.05
14:30
http://www.sinor.ru/~my1c/knowhow/rand.html<br>перекладываем на 8ку и наслаждаемся результатом
4 GStiv
 
21.01.05
14:34
5464646464634654- вроде случайное
5 Климов Сергей
 
21.01.05
14:43
// Переменные, используемые для работы генератора случайных чисел
Перем next;
//******************************************************************************
// rand(RAND_MAX)
//
// Параметры:
// RAND_MAX - максимальное значение случайного числа
//
// Возвращаемое значение:
// число
//
// Описание:
// Возвращает случайное число в интервале от 0 до RAND_MAX
//
Функция rand(RAND_MAX)
  
 next = next * 1103515245 + 12345;
 return(цел(next / ( (RAND_MAX+1)*2)) % (RAND_MAX + 1));
  
КонецФункции // rand()
        
//******************************************************************************
// srand(seed)
//
// Параметры:
// seed - число
//
// Возвращаемое значение:
// Нет
//
// Описание:
// Инициализирует генератор случайных чисел
//
Функция srand(seed)
  
 next=seed;
  
КонецФункции // srand()
8 Климов Сергей
 
21.01.05
16:17
2(7) Вначале генератор инициализируется:
srand(СтартовоеЧисло);
Причем СтартовоеЧисло м.б. любым, можно брать его из таймера или задавать произвольно. Затем можно получать случайные числа:
СлЧисло = rand();
Все это щастье реально работает :-) у меня на нем построен простенький шифратор-дешифратор.
Оптимист верит, что мы живем в лучшем из миров. Пессимист боится, что так оно и есть.