Генератор случайных чисел

@Сергей123456 · Регистрация: 06.02.2012

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

Я на СBuilder "работаю" не давно, я только учюсь за задания задают ну его ...
Помогите студенту, ведь вы сами когдато были студентами и знаете каково это*)
Требуется разработать приложение, которое генерирует случайные числа. Исходным числом для генерации может служить текущее время в компьютере, или число, заданное пользователем. По команде пользователя система должна генерировать последовательность из 100 случайных чисел и отобразить их.
Случайные числа генерировать следующим образом. Берется предыдущее число, возводится в квадрат. Из этого числа берутся его средние 4 цифры. Это и есть случайное число. Затем это полученное число снова возводится в квадрат и из него берутся 4 средних цифры. Это следующее случайное число. И так далее...
Для вас это детский лепет, а для меня даже страшно подумать... Студент
Понимаю что работа должна оплачиваться, но существуют же добрые программисты**)

Добавлено через 7 минут
Дорогие программисты форума! Ответьте на мое задание *) Я очень в вас нуждаюсь*(

@nick42 · 08.05.2012, 10:22

Сообщение от Сергей123456

2 варианта выбора они оба работают?

Да. Но когда выбирается "текущее время", поле эдита замещается произведением значений минут, секунд и миллисекунд на момент нажатия (хорошая псевдослучайная величина...). Несколько слов по поводу: я сознательно не прибегал к использованию функций рэндомайз языка, так как, следуя логике задания, псевдослучайная последовательность генерируется по достаточно ясному алгоритму получения очередного числа. Вот только эта логика имеет одно уязвимое место: очень часто возведение в квадрат некоего четырехзначного числа ведет к появлению нулей в последних цифрах числа. А нули для такого алгоритма - это тупик (ноль - он хоть в квадрате, хоть в Африке ноль). Поэтому следует в цикле сделать анализ на обнуление "выделяемого" числа и своевременную подмену его хотя бы значением миллисекунд на тот момент.

@QVO · 09.05.2012, 00:07

что-то писал.

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
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
//---------------------------------------------------------------------------
 
#include <vcl.h>
#include <math>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
 
__int64 *CP;
int *a;
int *b;
 
__int64 GetCPUClock(void)
      {
      unsigned long a,b;
      asm     {
              rdtsc;
              mov a,eax;
              mov b,edx;
              };
      __int64 ret;
      ((unsigned long*)&ret)[0]=a;
      ((unsigned long*)&ret)[1]=b;
      return ret;
      };
 
const int normal_rnd(const int max, const int rnd, const int size)
{
        int ret_val = 0;
        for (int i = 0; i < size; i++)
        {
                ret_val += rnd;
        }
        return (ret_val / size)/2 - 12;
}
 
float sort(float *a)
{
float temp =0;
 for(int i = 0; i < 10000; i++)
  for(int j = 0; j < 10000; j++)
   if(a[i]< a[i+1])
   {
        temp = a[i];
        a[i] = a[i+1];
        a[i]=temp;
   }
}
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Memo1->Clear();
Memo2->Clear();
Chart1->SeriesList->Series[0]->Clear();
 
__int64 temp;
 
AnsiString s = "";
AnsiString s1 = "";
int h = 0, k=0;
  CP = new __int64[10000];
  a = new int[10000];
  b = new int[40000];
  float j,t;
  CP[0] = 0;
        for (int i = 1; i < 10000; i++)
        {
                CP[i] = GetCPUClock();
                s += IntToStr(CP[i]) + "    ";
                temp = CP[i] - CP[i-1];
                h = temp / 256;
                a[i] = temp - (h*256);
                if(i > 2)
                {
                        j=((float)a[i-1])/255;
 
                        //ShowMessage(j) ;
                             if(j>0)
                             {
                               j=sqrt(-2*log(j));
                               t=cos(2*M_PI*((float)a[i]/255));
                               b[k]=(int)(128+t*j*20);
                               k++;
                               b[k]=(int)(128+sqrt(1-t*t)*j*20);
                               k++;
                            }
                }
                s1 += IntToStr(a[i]) + "    ";
        }
        Memo1->Text = s;
        Memo2->Text = s1;
        //sort(b);
        for (int i = 1; i < k; i++)
        {
                Chart1->Series[0]->AddXY(b[i], i, String(b[i]), clBlack);
        }
  delete[] CP;
  delete[] a;
  delete[] b;
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button2Click(TObject *Sender)
{
      /*  for (int i = 0; i < 100; i++)
        {
 
                Memo2->Text = Memo2->Text + String(CP[i]) + "\n";
        }
        delete[] CP;
      */
}
//---------------------------------------------------------------------------

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
48
49
50
51
52
53
54
55
56
57
58
59
60
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
 
int *a;  // массив
int size; // кол-во значений
 
// функция нормального распределения
//или распределением методом Гаусса
const int normal_rnd(const int max, const int size)
{
        // возвращающее значение
        int ret_val = 0;
        // суммируем 12 рандомных значений от 0 до 255
        for (int i = 0; i < size; i++)
        {
                ret_val += max - (rand() % max);
        }
        // возвращаем полученое число
        // при этом разделив его на 12
        // и сделав смещение на -6
        return (ret_val / size) - 6;
}
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  randomize();
  // Очищаем чарт
  Chart1->SeriesList->Series[0]->Clear();
  // задаем размер массиваа
  size = 1000;
  // выделяем память под массив
  a = new int[size];
  // заполняем массив нормальным распределением
        for(int i = 0; i < size; i++)
        {
                a[i] = normal_rnd(255,12);
        }
  // выводим данные с массива в график
        for(int i = 0; i < size; i++)
        {
                Chart1->Series[0]->AddXY(a[i], i, String(a[i]), clBlack);
        }
  // освобождаем память
        delete a;
}
//---------------------------------------------------------------------------

@Сергей123456 · 09.05.2012, 00:21 **[ТС]**

QVO, а можно исходниками*)

Новые блоги и статьи Все статьи Все блоги /
Генератор паролей (вариант №4) Maks 01.11.2026 После публикации 3-го варианта генератора паролей, разослал его своим коллегам (с целью оценки), в итоге были получены следующие рекомендации: 1. Вернуть возможность использования знаков \| 1 l I;. . .	Генератор паролей (вариант №3) Maks 30.10.2026 Финальная версия генератора паролей 1С. Доработка решения в этот раз коснулась только визуальной части, а именно, добавлен реквизит ДопПараметры (тип Булево), который скрывает/ отображает реквизиты:. . .	Магическое мышление и магия, современная наука не отличима от магии (говорит ИИ Джемени) zorxor 30.10.2026 Джемени, расскажи, пожалуйста, что такое магическое мышление, что такое магия, почему современная наука чем-то напоминает магию? Фраза «Любая достаточно развитая технология неотличима от магии». . .	За какое время ИИ может подобрать пароль по хешу (рассказывает Джемени ИИ) zorxor 30.10.2026 Расскажи, Джемени, если известен хэш МД5, например, за сколько ИИ сможет подобрать соответствующий пароль? Искусственный интеллект (ИИ) может подобрать простой или средний по сложности пароль по. . .
Кто убил Suno? Почему наше солнышко погасло? (диалог с ИИ Джемени) zorxor 30.10.2026 Как убивали Suno. Хронология. «Убийство» музыкальной нейросети Suno — это затяжной процесс, в котором технологический хайп стартапа разбился о жесткую реальность судебных исков от гигантов. . .	Генератор паролей (вариант №2) Maks 30.10.2026 Обновленная версия ранее созданной обработки. Добавлены следующие реквизиты типа Булево: - Буквы; - Цифры; - Символы. Изменена логика команды "Сгенерировать" и процедуры "ПриОткрытии":. . .	Генератор паролей (вариант №1) Maks 29.10.2026 Реализация из решения ниже выполнена исключительно по моей инициативе, дабы облегчить себе работу в создании паролей для администрируемых мною сервисов и пользователей. Самым главным критерием для. . .	Установка ChatGPT (Codex) на Windows без использования Microsoft Store Fabien159 28.10.2026 Здравствуйте всем читающим! Опишу процесс установки ChatGPT (Codex) на Windows, если по каким-то причинам у вас не получается устанавить его через Microsoft Store. И так: 1. Скачиваем с. . .

@Сергей123456 4 / 4 / 0 Регистрация: 06.02.2012 Сообщений: 62

	Генератор случайных чисел 07.05.2012, 15:58. Показов 7637. Ответов 22 Метки нет (Все метки) Я на СBuilder "работаю" не давно, я только учюсь за задания задают ну его ... Помогите студенту, ведь вы сами когдато были студентами и знаете каково это) Требуется разработать приложение, которое генерирует случайные числа. Исходным числом для генерации может служить текущее время в компьютере, или число, заданное пользователем. По команде пользователя система должна генерировать последовательность из 100 случайных чисел и отобразить их. Случайные числа генерировать следующим образом. Берется предыдущее число, возводится в квадрат. Из этого числа берутся его средние 4 цифры. Это и есть случайное число. Затем это полученное число снова возводится в квадрат и из него берутся 4 средних цифры. Это следующее случайное число. И так далее... Для вас это детский лепет, а для меня даже страшно подумать... Студент Понимаю что работа должна оплачиваться, но существуют же добрые программисты) Добавлено через 7 минут* Дорогие программисты форума! Ответьте на мое задание ) Я очень в вас нуждаюсь( 0

@Сергей123456 4 / 4 / 0 Регистрация: 06.02.2012 Сообщений: 62
	09.05.2012, 00:21 [ТС]
	QVO, а можно исходниками*) 0

Опции темы