Статья Автор: Лебедев Дмитрий Алексеевич

Черепашка-bobik. Часть 2.1 - Практика использования - Копия

Разберем треугольник и все, что связано с вписанной окружностью
ABC = (A,B,C) - кортеж вершин
ST = (sa, sb, sc) тороны треугольника
I - центр вписанной окружности
IK = (Ka,Kb,Kc) - точки касания вписанной окружности
IO = (Oa,Ob,Oc) - основания биссектрис
Программа biser получает вершины и стороны и возвращает, I,IK,IO

def tc(A):
  if type(A) == complex : return (A.real,A.imag)
  return A
def start(ABC):
  A, B, C = ABC['v'] #вершины треугольника (КЧ)
  ABC['st'] = (abs(B -C), abs(C - A), abs(A - B)) # стороны треугольника (ВЧ)
  sa, sb, sc = ABC['st']
  p =sa + sb + sc
  ABC['p'] = p # перимерт треугольника (ВЧ)
  ABC['M'] = (A + B + C) * (1 / 3) # точка пересечения медиан
  ABC['I'] = (A * sa + B * sb + C * sc) * (1 / p)
  sq =(B - A) * (C - A).conjugate()
  ABC['sq'] = abs(sq.imag) # площадь параллелограмма (удв. площадь) 
  ABC['r'] = ABC['sq'] / ABC['p'] # радиус вписанной окружности
  ABC['R'] = sa * sb * sc / 2 / ABC['sq'] # радиус описанной окружности  
  la = (B * sb + C * sc) *(1 / (sb + sc))
  lb = (A * sa + C * sc) *(1 / (sa + sc))
  lc = (A * sa + B * sb) *(1 / (sa + sb))
  ABC['Ol'] =(la,lb,lc) # основания биссектрис (КЧ)
  I, r = ABC['I'], ABC['r']
  x =(I-B)*(C-B).conjugate()
  ka = B + (C - B) * (x.real / sa**2)
  x =(I-A)*(C-A).conjugate()
  kb = A + (C - A) * (x.real / sb**2)
  x =(I-B)*(A-B).conjugate()
  kc = B + (A - B) * (x.real / sc**2)
  ABC['KI'] =(ka, kb, kc) # точки касания вписанной окружности (КЧ)
  ABC['Om'] =((B + C) * 0.5, (A + C) * 0.5, (A + B) * 0.5) # основания медиан (КЧ)
  G   = (ka * abs(kb - kc) ** 2 + kb * abs(ka - kc) ** 2 +kc * abs(kb - ka) ** 2)*(1/(abs(kb - kc) ** 2 + abs(ka - kc) ** 2 + abs(kb - ka) ** 2))
  ABC['G'] = G # точка Жергонна
  sma = (B * sb ** 2 + C * sc ** 2) *(1 / (sb ** 2 + sc ** 2))
  smb = (A * sa ** 2 + C * sc ** 2) *(1 / (sa ** 2 + sc ** 2))
  smc = (A * sa ** 2 + B * sb ** 2) *(1 / (sa ** 2 + sb ** 2))
  ABC['Osm'] =(sma,smb,smc) # основания биссектрис (КЧ)
  L = (A * sa ** 2 + B * sb ** 2 +C * sc ** 2)*(1/(sa ** 2 + sb ** 2 + sc ** 2))
  ABC['L'] = L # точка Лемуана
  
  
  
                           
  return 
# Пример использования
import turtle as tt
tt = turtle.Pen()
tt.speed(10)
rk = 50 # размер клетки
setka(rk)
ABC = {'v':(-3+1j, 1+3j, 7-4j)}
start(ABC)
#print(Har)
sf0 =f"t.dot(3) U V{tc(ABC['v'][0])} t.dot(10) D G{tc(ABC['v'][1])} t.dot(10) G{tc(ABC['v'][2])} t.dot(10) G{tc(ABC['v'][0])} t.dot(10)" 
bobik(sf0, tt, rk)
sf2 = f" t.color('green') "
for i in range(3):
    sf2 += f"U G{tc(ABC['v'][i])} D G{tc(ABC['Ol'][i])} t.dot(5) "
sf2 += f"U G{tc(ABC['I'])} t.dot(10) "    
bobik(sf2, tt, rk)
sf3 = f"U G{tc(ABC['I'])} D t.color('red') D C{ABC['r']}"
bobik(sf3, tt, rk)
sf4 = f"U G{tc(ABC['KI'][0])} t.dot(5) G{tc(ABC['KI'][1])} t.dot(5) G{tc(ABC['KI'][2])} t.dot(5)"
bobik(sf4, tt, rk)
sf5 = f" t.color('brown') "
for i in range(3):
    sf5 += f"U G{tc(ABC['v'][i])} D G{tc(ABC['KI'][i])} "
sf5 += f"U G{tc(ABC['G'])} t.dot(10) "    
bobik(sf5, tt, rk)
sf6 = f" t.color('blue') "
for i in range(3):
    sf6 += f"U G{tc(ABC['v'][i])} D G{tc(ABC['Om'][i])} "
sf6 += f"U G{tc(ABC['M'])} t.dot(10) "    
bobik(sf6, tt, rk)
sf7 = f" t.color('orange') "
for i in range(3):
    sf7 += f"U G{tc(ABC['v'][i])} D G{tc(ABC['Osm'][i])} t.dot(5) "
sf7 += f"U G{tc(ABC['L'])} t.dot(10) "    
bobik(sf7, tt, rk)


s = "t.hideturtle() "
bobik(s, tt, rk)

Задание 1.

Повторите данный рисунок - напишите программу, которая закрасит данного орла в коричневый цвет.

Доступен модуль turtle, подпрограммы bobik, setka с вызовом исполнителя под именем t

# Подходящий размер клетки 16 пикселей
import turtle
tt = turtle.Pen()
tt.width(3); tt.color('blue'); tt.speed(10)
rk = 50

bobik('U V-5,5 D ' + 'F10 R120 '*3,tt,rk) 
setka(rk)

# Подходящий размер клетки 16 пикселей
import turtle
tt = turtle.Pen()
tt.width(3); tt.color('blue'); tt.speed(10)
rk = 50
n = 1
for i in range (5):
  s = f'F{2*n} R120 F{-n} R60'
  bobik (s,tt,rk)
  n +=1

#bobik('U V-5,5 D ' + 'F10 R120 '*3,tt,rk) 
setka(rk)

Печать