ds=0.01; fonction unSurR(x) { return 1/(1+x*x); } pour i allant de 0 à 1000 { dM=ds*unSurR(PrendreValeurExpression("s")); av(ds); td(dM); }