[code]l1=Séquence(Segment((i / n, 0), (i / n, l)), i, 0, n)[br]lf=lf = {x^(1 / 6), x^(1 / 5), x^(1 / 4), x^(1 / 3), sqrt(x), x, x², x³, x⁴, x⁵, x⁶, x (2 - x), x² (3 - 2x), x³ (4 - 3x), x⁴ (5 - 4x), x⁵ (6 - 5x), sin²(π / 2 x)}[br]f(x)=Elément(lf, m)[br]g(x)=Si(0 ≤ x ≤ 1, f(x))[br][br]#SCRIPT:[br][br]Exécute(Séquence("S"+i+"=Element(l1,"+(i)+")", i, 1, n))[br]Exécute(Séquence("SetDynamicColor(S"+i+",f("+i+"/n), f("+i+"/n),f("+i+"/n),1)", i, 1, n))[br][br][/code]