procedure ColArc(x, y: integer; r: integer; nc: byte); begin SetPenColor(rgb(c[nc, 1], c[nc, 2], c[nc, 3])); Arc(x, y, r + 10, 0, 180); Arc(x, y, r - 10, 0, 180); line(x - r - 11, y - 2, x - r + 11, y - 2); line(x + r - 11, y - 2, x + r + 11, y - 2); floodfill(x, y - r, rgb(c[nc, 1], c[nc, 2], c[nc, 3])); end;
begin setwindowsize(500, 300); for i := 1 to 7 do ColArc(250, 300, 100 + (i * 20), i); end.
Переводим оба числа в десятичную, делим. Получаем дробь меньше нуля, переводим в 16-ю. Получаем бесконечную периодическую дробь 0.(С8253)16 Первая цифра после запятой С. Думаю так.
<span>X=2 - в Х будет помещено значение 2
Y=4 - в Y будет помещено значение 4
Y=X*X+X - будет вычислено 2×2+2 = 4+2 = 6 и помещено в Y
X=Y*Y-X*X</span> - будет вычислено 6×6-2×2 = 36-4 = 32 и помещено в Y
256 = 2⁸, следовательно 8 бит = 1 байт понадобится для хранения информации о цвете одной точки. Для всего экрана понадобится 1×1024×768 = 768×1024 байт = 768 Кбайт
Если нужно вычисление какого-то конкретного, то ставим комментарии перед другими и выводим только то, что нам нужно. Если Вам необходима конкретно формула, а не программа, вот: