Где найти исходник ГСЧ

[Самоучка]

Подскажите где можно найти генератор случайных чисел выполненный на паскале. Заранее благодарю

[eoln]

Эт вы так пошутили?

begin
  randomize;
  write(random(100));
  readln
end.

ГСЧ в архиве

[Самоучка]

Это был не прикол просто самому влом было писать. Вспоминать что такое паскаль и т.д. и т.п. Спасибо конечно, но я уже готовую программку нашел.

[puporev]

Я так понял нужно не randomize, а код этой процедуры на Паскале.