Принадлежит ли точка с координатами ( Х,У) области треугольника АВС, где(X1,Y1),(X2,Y2),(X3,Y3) . Нужно написать программу для кубэсика..
Помогите, пожалуйста. мне очень нужно(

qBASIC:DECLARE FUNCTION L# (x1#, y1#, x2#, y2#)DECLARE FUNCTION s3# (x1#, y1#, x2#, y2#, x3#, y3#)CLSINPUT "Координаты точки А через запятую: ", ax#, ay#INPUT "Координаты точки B через запятую: ", bx#, by#INPUT "Координаты точки C через запятую: ", cx#, cy#INPUT "Координаты точки m через запятую: ", mx#, my#s# = s3#(ax#, ay#, bx#, by#, cx#, cy#)sab# = s3#(ax#, ay#, bx#, by#, mx#, my#)sbc# = s3#(bx#, by#, cx#, cy#, mx#, my#)sca# = s3#(cx#, cy#, ax#, ay#, mx#, my#)eps# = s# - (sab# + sbc# + sca#)eps% = INT(eps# * 10000) / 10000IF eps% = 0 THEN PRINT "Внутри" ELSE PRINT "Не внутри"ENDFUNCTION L# (x1#, y1#, x2#, y2#)   L# = SQR((x2# - x1#) ^ 2 + (y2# - y1#) ^ 2)END FUNCTIONFUNCTION s3# (x1#, y1#, x2#, y2#, x3#, y3#)   a# = L#(x1#, y1#, x2#, y2#)   b# = L#(x2#, y2#, x3#, y3#)   c# = L#(x3#, y3#, x1#, y1#)   p# = (a# + b# + c#) / 2   s3# = SQR(p# * (p# - a#) * (p# - b#) * (p# - c#))END FUNCTIONТестовое решение:Координаты точки А через запятую: 2,1Координаты точки B через запятую: 15,10Координаты точки C через запятую: 12,4Координаты точки m через запятую: 9,5Внутри