ÚKOLY:
1) Vytvořte model situace, ze které bude možné určit,
za jak dlouho klesne hodnota zařízení na polovinu 
původní ceny při zvolené hodnotě p%. 

2) Za jak dlouho klesne hodnota původní ceny při odpisu 4%?

3) Při jakém procentuálním ročním odpisu dosáhneme poloviny
 hodnoty původní ceny za 6 let?

K = 1320 (slider from 0 to 1500, step 10)
p = 7.5 (slider from 0 to 20, step 0.5)
f = Function((K * (1 - p / 100)^(x)), 0, 100)
g: y = K / 2
A = Intersect(f, g, (8.89088603980531, 659.99999991102))
b = OrthogonalLine(A, xAxis)
B = Intersect(xAxis, b)
c = Segment(A, B)