座標平面での内分点

座標平面で内分点の座標を求めてください。

内分点の公式を思い出しましょう。

,

(

)

である。

正解

dd: (Random[1, 3] * 2) + 1
p = Random(1, dd - 1)
q: dd - p
ax = Random(-5, -2)
ay = Random(3, 7)
bx: ax + (dd * Random[1, 3]) + 1
by: ay - (dd * Random[1, 3]) + 1
cx: (ax * q) + (bx * p)
cy: (ay * q) + (by * p)
dd0 = 0
cx0 = 0
cy0 = 0
text1: "点A(" + ax + "," + ay + ")と点(" + bx + "," + by + ")を" + p + ":" + q + "に内分する点は"
dd1 = 0
入力ボックス1 = Textfield(dd0)
入力ボックス2 = Textfield(cx0)
入力ボックス3 = Textfield(cy0)
入力ボックス4 = Textfield(dd1)
A = (-3, 4)
B = (-2, 4)
a = Segment(A, B)
C = (-1, 4)
D = (0, 4)
b = Segment(C, D)