Script (Work on time only)
a=-20
aa=-3.14
b=20
g=2.3
h=-0.1
n=10
s=1.54
l1=Retourner(Séquence(sin(2x i h + sin(x + aa) - aa) + i / g + s i, i, 0, n, 1))
l2=Séquence(IntégraleDomaine(Elément(l1, i), Elément(l1, i + 1), a, b), i, 1, n - 1, 1)
SoitVisibleDansVue(l1,1,false)
SoitVisibleDansVue(l2,1,false)
Exécute(Séquence("S"+i+"=Element(l2,"+i+")", i, 1, n-1))
Exécute(Séquence("SetDynamicColor(S"+i+",74/255,"+i+"/n,132/255,1)", i, 1, n-1))
Exécute(Séquence("SetLineThickness( S"+i+",0)", i, 1, n-1))
Exécute(Séquence("SetVisibleInView(S"+i+",1,true)", i, 1, n-1))
Exécute(Séquence("ShowLabel(S"+i+",false)", i, 1, n-1))