local real array x
local real array y
local real a = GetRandomReal( 0.00, 1.00 )
local real b = GetRandomReal( 0.00, 1.00 )
if a + b > 1.00 then
set a = 1.00 - a
set b = 1.00 - b
endif
set x[0] = x[1] + ( x[2] - x[1] ) * a + ( x[3] - x[1] ) * b
set y[0] = y[1] + ( y[2] - y[1] ) * a + ( y[3] - y[1] ) * b
x[0], y[0] - искомая точка, остальное - вершины треугольника
Ред. ScorpioT1000