T335

b = -4.24 (slider from -5 to 5, step 0.01)
f: y = (1 / 2 * x) + b
A = Intersect(f, yAxis)
B = Intersect(f, xAxis)
C = Intersect(yAxis, xAxis)
k1, c, a, b_1 = Polygon(A, B, C)
Tekstik1: " " + (Name[A]) + (Name[B]) + (Name[C]) + ":n pinta-ala = " + k1
Pistek1 = PointIn(k1)