И про компьютеры немного
Добавлено: 13 июн 2018, 11:49
ну не Тесла же в конце-концовturtle писал(а): Болт
Код: Выделить всё
#if 0
rseed = rseed * 1103515245 + 12345;
return ((unsigned int)((rseed >> 16) & 32767)); /* was % 32768 */
#else
long h, l;
if (rseed == 0)
seedrand ();
h = rseed / 127773;
l = rseed % 127773;
rseed = 16807 * l - 2836 * h;
#if 0
if (rseed < 0)
rseed += 0x7fffffff;
#endif
return ((unsigned int)(rseed & 32767)); /* was % 32768 */
#endif