Циклы в графике. Построение случайных процессов
Для того, чтобы картинки не были монотонными и регулярными, можно задавать фигурам случайные размеры, цвет, координаты. Для этого имеется специальная функция Random. Она генерирует случайные числа из [0, 1). Для расширения первоначального промежутка используется функция Random(I: word), которая выдает число из диапазона 0… I. На самом деле эти функции генерируют некоторую последовательность псевдослучайных чисел, и чтобы добиться иллюзии полной «случайности» используют команду Randomize, которая изменяет базу датчика случайных чисел.
Пример. Нарисовать в случайном месте экрана точку случайного цвета
Фрагмент программы:
Randomize
x:=random(640); y:=Random(480); c:=Random(15);
PutPixel(x, y, c);
Пример. Нарисовать 5000 точек случайного цвета в случайном месте.
Фрагмент программы:
For i:=1 to 5000 do
begin
x:=Random(640); y:=Random(480); c:=Random(15);
PutPixel(x, y, c);
end;
