f(x) = If[0 ≤ x ≤ 17, ((1.6263 * x^(2))) / 2, If[17 < x ≤ 20, (27.778 * x) - 237.226]]
a = 0 (slider from 0 to 19, step 0.01)
A: (a, f(a))
b = 20 (slider from 1 to 20, step 0.01)
B: (b, f(b))
g = Segment(A, B)
m = Slope(g)
n: (3.6 * m)
Text1: "A" + (LaTeX[A]) + " \\ \\B" + (LaTeX[B]) + " \\ \\m=" + (LaTeX[m]) + "\frac{m}{s}\approx " + (LaTeX[n]) + "\cdot\frac{km}{h}"
S: (17, f(17))