Опубликовано: 2020-04-21 08:00:00
Фракталы STARS и MARTIN
Для начала определимся с термином.
Фрактал (лат. fractus — дроблёный, сломанный, разбитый) — множество, обладающее свойством самоподобия (объект, в точности или приближённо совпадающий с частью себя самого, то есть целое имеет ту же форму, что и одна или более частей). В математике под фракталами понимают множества точек в евклидовом пространстве, имеющие дробную метрическую размерность (в смысле Минковского или Хаусдорфа), либо метрическую размерность, отличную от топологической, поэтому их следует отличать от прочих геометрических фигур, ограниченных конечным числом звеньев
Исходный текст программы построения фрактала STARS:
- SCREEN 12
- CLS
- RANDOMIZE TIMER
- CONST PI = 3.14159265358#
- WHILE INKEY$ = ""
- A = 2 * (0.5 - RND): B = 2 * (0.5 - RND)
- C = 2 * (0.5 - RND): D = 2 * (0.5 - RND)
- X = RND: Y = RND
- WHILE INKEY$ = ""
- SX = PI * 2 * X: SY = PI * 2 * Y
- SX4 = PI * 4 * X: SY4 = PI * 4 * Y
- X1 = A * SIN(SX) + B * SIN(SX) * COS(SY) + C * SIN(SX4) + D * SIN(PI * 6 * X) * COS(SY4)
- Y1 = A * SIN(SY) + B * SIN(SY) * COS(SX) + C * SIN(SY4) + D * SIN(PI * 6 * Y) * COS(SX4)
- NX = FIX(100 * X1 + 320): NY = FIX(100 * Y1 + 240)
- PSET (NX, NY), POINT(NX, NY) + 1
- X = X1: Y = Y1
- WEND
- CLS
- WEND
- END
Рисунок 1 – Исходный текст фрактала STARS
Рисунок 2 – Результат построения фрактала STARS
Исходный текст программы построения фрактала MARTIN:
- SCREEN 12
- WHILE INKEY$ = ""
- T = X
- X = Y - SIN(X)
- Y = 3.14 - T
- PSET (2 * X + 320, 2 * Y + 240), 4
- WEND
Рисунок 3 – Исходный текст фрактала MARTIN
Рисунок 4 – Результат построения фрактала MARTIN
Спасибо за прочтение этой статьи.