Правила форума
Randomize (процедура)Язык:
Русский
English
Randomize (процедура)
Инициализирует встроенный генератор случайных чисел с произвольным значением (полученным из системных часов).
Объявление
Procedure Randomize;
Режим
Windows, Real, Protected
Смотри также
Пример
Язык:
Русский
English
uses Crt;
begin
Randomize;
repeat
{ Выводим текст случайными цветами }
TextAttr := Random(256);
Write('!');
until KeyPressed;
end.
begin
Randomize;
repeat
{ Выводим текст случайными цветами }
TextAttr := Random(256);
Write('!');
until KeyPressed;
end.
::
::
::
