генератор псевдослучайных чисел без рандом....

@tromb.92 · Регистрация: 21.11.2009

Студворк — интернет-сервис помощи студентам

народ может кто знает как сделать такой генератор без использования функций rand,srand,URandom,randomize.....

@Nick Alte · 07.01.2010, 12:08

Существует много разных методов, в зависимости от того, что тебе надо. Один из простейших такой:

C++
1
2
3
4
5
6
7
8
const int MaxVal = 32767;
const int Factor = 41723;
 
int Random()
{
    static int seed = Factor%MaxValue;
    return seed = (seed*Factor)^MaxValue;
}

Так ты получишь псевдослучайные числа в диапазоне от 0 до MaxValue-1 включительно. Factor можно выбирать самостоятельно так, чтобы он был больше MaxValue и при этом был взаимно простым с MaxValue, при этом выдаваемая последовательность будет состоять из циклов по MaxValue неповторяющихся чисел (в данном случае получится цикл по 32767 неповторяющихся чисел от 0 до 32766). Эту последовательность потом можно обрезать по нужному модулю, например, Random()%1000 будет выдавать числа от 0 до 999 (цикл в 32767 элементов сохранится, но они уже не будут неповторяющимися).
Разумеется, это один из самых простейших генераторов, пригодный разве что для "игрушечных" целей. Если ты ищешь статистически хороший генератор, гляди в сторону Mercienne Twister. Если нужен ГСЧ, пригодный для криптографических целей, целься на что-нибудь ещё более серьёзное.

@tromb.92 · 07.01.2010, 12:30 **[ТС]**

Nick Alteк сожалению забыл указать что нужно на языке си
да и нужен он мне для не очень серьезных целей так что подайдет самый простой...

@Nick Alte · 07.01.2010, 18:51

Так это же Сишный код-то. C++ там только для объявления констант.

C
1
2
3
4
5
6
7
8
#define MaxVal 32767
#define Factor 41723
 
int Random()
{
    static int seed = Factor%MaxValue;
    return seed = (seed*Factor)%MaxValue;
}

В первое сообщение у меня всралась очепятка: надо, конечно, писать return seed = (seed*Factor)%MaxValue;

valeriikozlov · 07.01.2010, 19:10

Nick Alte, или в первой строке: MaxValue
или в 6 и 7 : MaxVal

@Nick Alte · 07.01.2010, 22:45

Главное - принцип!

valeriikozlov · 08.01.2010, 05:18

Сообщение от Nick Alte

Главное - принцип!

согласен. принцип - в основе

@tromb.92 · 08.01.2010, 13:30 **[ТС]**

спасибо но помоему я чтото не допонял поскольку при подстановке в следующую прогу (проверяющую генерацию случайности чисел) :

C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
#include <stdlib.h>
#include <stdio.h>
#include <time.h>
 unsigned Xi=5, m=0x5A97;
#define MaxVal 32767
#define Factor 41723
 unsigned Random(void)
 //int Random()
{
unsigned R;
asm     {
        mov     AX,Xi
        mov     DX,m
        mul     DX
        mov     Xi,AX
        shr     AX,1
        shr     AX,1
        mov     R,AX
        }
return R;
 
}
 
 
 void main(void) 
 
{ int i,Test[16];
unsigned j,r;
// obnulit schetchik
for(j=0;j<16;j++) Test[j]=0;
// podschet chisel
for(i=0;i<1000;i++)
  {
{
    static int seed = Factor%MaxVal;
    return seed = (seed*Factor)%MaxVal;
printf("%d\n", Random()% 100);
}
// sgenerirovat chislo
  r=Random();
j=r/1024; Test[j]++;
  }
printf(" nomer chislo\n");
printf("otezok popdeniy\n");
for(j=0;j<16;j++) printf("  %2u       %3d\n",j,Test[j]);
printf("\n");
}

компелятор ругается что не может чтоб main возвращался к value
и вот это строка r=Random(); выдает unreachable code
может подскажете что не так?

@Nick Alte · 08.01.2010, 13:41

Да всё не так. Тут совершенно тупо и бессмысленно спутаны две разные реализации ГСЧ (причём одна расчитана на встроенный ассемблер в 16-битном режиме). Налеплена невпопад какая-то чушь. Вот пример использования ГСЧ для вывода 5 случайных чисел в диапазоне от 0 до 99:

C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
#include <stdio.h>
#define MaxVal 32767
#define Factor 41723
 
int Random()
{
    static int seed = Factor%MaxValue;
    return seed = (seed*Factor)%MaxVal;
}
 
int main()
{
    int i;
    for(i=0; i<5; ++i)
        printf("%d\n", Random()%100);
}

@tromb.92 · 08.01.2010, 13:57 **[ТС]**

к сожалению я так и догадывался что это чушь но пытался делать по примеру который нам давал препод вот он :

C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
#include <stdio.h>
 unsigned Xi=5, m=0x5A97;
 
// generator
unsigned URandom(void)
{
unsigned R;
asm     {
    mov     AX,Xi
    mov     DX,m
    mul     DX
    mov     Xi,AX
    shr     AX,1
    shr     AX,1
    mov     R,AX
    }
return R;
}
 void main(void) { int i,Test[16];
unsigned j,r;
// obnulit schetchik
for(j=0;j<16;j++) Test[j]=0;
// podschet chisel
for(i=0;i<1000;i++)
  {
  // sgenerirovat chislo
  r=URandom();
  // opredelenie otreska
  j=r/1024; Test[j]++;
  }
printf(" nomer chislo\n");
printf("otezok popdeniy\n");
for(j=0;j<16;j++) printf("  %2u       %3d\n",j,Test[j]);
printf("\n");
}

уважаемый Nick Alte если вас не затруднит моглибы показать как их скрестить...

@Nick Alte · 08.01.2010, 14:23

А зачем их скрещивать-то? Для чего оно надо? Могу показать, как заменить один ГСЧ на другой. Заодно и как форматировать код по-человечески.

C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
#include <stdio.h>
#define MaxVal 32767
#define Factor 41723
 
int Random()
{
    static int seed = Factor%MaxValue;
    return seed = (seed*Factor)%MaxVal;
}
 
int main()
{
    int i, Test[32];
    unsigned int j, r;
/* Здесь вам не Спарта. Раз Си, так уж и комментарии будьте добры писать как в Си */
    for(j=0; j<32; j++)
        Test[j] = 0;
/* Подсчёт чисел (чего уж там стесняться-то, в комментариях можно и по-русски */
    for(i=0; i<1000; i++)
        Test[Random()/1024]++;
    for(j=0; j<32; j++) printf("  %02d       %03d\n", j, Test[j]);
}

@tromb.92 · 08.01.2010, 14:34 **[ТС]**

и еще не моглибы вы обьяснить по какому принцыпу это работает:

Сообщение от Nick Alte

static int seed = Factor%MaxValue; return seed = (seed*Factor)%MaxVal;

Добавлено через 10 минут
а коменты по английски т.к. компелятор русский вообще на отрез не воспринимает))

@Nick Alte · 08.01.2010, 14:38

% - это остаток от деления. Таким образом, мы просто последовательно возводим Factor в степени 1, 2, 3 и так далее и берём остаток от деления результата на MaxValue. Каковой остаток и возвращаем как очередное сгенерированное число. Свойства у такого возведения в степень (разумеется, при условии взаимной простоты MaxValue и Factor) таковы, что во-первых, оно перебирает все числа от 0 до MaxValue, а во-вторых, в неочевидном на первый взгляд порядке.
Статическая переменная сохраняет своё значение между вызовами, то есть, этот генератор можно написать и так:

C
1
2
3
4
5
6
7
8
9
#define MaxVal 32767
#define Factor 41723
 
int seed = 1; 
int Random()
{
    seed = (seed*Factor)%MaxVal;
    return seed;
}

@tromb.92 · 08.01.2010, 14:44 **[ТС]**

Nick Alte огромное спасибо даже не знаю как вас отблагодарить....

@Nick Alte · 08.01.2010, 14:49

Сударыня, с тех пор, как древние финикияне придумали деньги, этот вопрос отпал сам собой (с) Урусов, кажется.

Ну а вообще пожалуйста. На здоровье.

@odip · 08.01.2010, 23:19

Чего-то я сомневаюсь что деньги придумали именно древние финикияне.

Новые блоги и статьи Все статьи Все блоги /
Символьное дифференцирование igorrr37 13.02.2026 / * Логарифм записывается как: (x-2)log(x^2+2) - означает логарифм (x^2+2) по основанию (x-2). Унарный минус обозначается как ! */ #include <iostream> #include <stack> #include <cctype>. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .	И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.	«Знание-Сила» zbw 12.02.2026 «Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 12.02.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image 8Observer8 10.02.2026 Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .	Установка Qt-версии Lazarus IDE в Debian Trixie Xfce volvo 10.02.2026 В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .

@tromb.92 10 / 10 / 0 Регистрация: 21.11.2009 Сообщений: 34

	генератор псевдослучайных чисел без рандом.... 07.01.2010, 11:17. Показов 5376. Ответов 15 Метки нет (Все метки) народ может кто знает как сделать такой генератор без использования функций rand,srand,URandom,randomize..... 1

@tromb.92 10 / 10 / 0 Регистрация: 21.11.2009 Сообщений: 34
	07.01.2010, 12:30 [ТС]
	Nick Alteк сожалению забыл указать что нужно на языке си да и нужен он мне для не очень серьезных целей так что подайдет самый простой... 1

valeriikozlov 4728 / 2549 / 757 Регистрация: 18.08.2009 Сообщений: 4,568
	07.01.2010, 19:10
	Nick Alte, или в первой строке: MaxValue или в 6 и 7 : MaxVal 1

@Nick Alte 1675 / 1047 / 174 Регистрация: 27.09.2009 Сообщений: 1,945
	07.01.2010, 22:45
	Главное - принцип! 1

@tromb.92 10 / 10 / 0 Регистрация: 21.11.2009 Сообщений: 34
	08.01.2010, 14:44 [ТС]
	Nick Alte огромное спасибо даже не знаю как вас отблагодарить.... 1

@Nick Alte 1675 / 1047 / 174 Регистрация: 27.09.2009 Сообщений: 1,945
	08.01.2010, 14:49
	Сударыня, с тех пор, как древние финикияне придумали деньги, этот вопрос отпал сам собой (с) Урусов, кажется. Ну а вообще пожалуйста. На здоровье. 1

@odip 7176 / 3234 / 82 Регистрация: 17.06.2009 Сообщений: 14,164
	08.01.2010, 23:19
	Чего-то я сомневаюсь что деньги придумали именно древние финикияне. 1