Juin 2005

et2) Complétez la macro écrite au 1) en y insérant une partie permettant de calculer les variablesintermédiaires E_X, E_Y, E_XY, EX2 et EY2, puis les coefficients a et b de la droite derégression linéaire qui seront inscrits dans les cellules D2 et E2.Exercice 2 (8 points)a) La valeur de eX est définie par une relation de récurrence: Sn = Sn_1 + Un avecUn=Un_I*(x/n) et uo=l et so=\. Sur une feuille de calcul, donner les cinq commandes permettant d'avoirles valeurs de la suite Sn sur C4:C24 puis celles de la suite Un sur B4:B24 et enfin celles de n (prenantles valeurs de 0 à 20) sur A4:A24, la valeur de x est fixée dans la cellule BI de la feuille de calcul.b) Ecrire en basic-openoffice la fonction exponen(x; n) qui donne la valeur de eX avec pourparamètres x et n. Faire une itération en utilisant la formule de récurrence donnée en question a).c) Ecrire en basic-openoffice une procédure procl qui demande dans une boîte de saisie lavaleur de x puis celle de n et qui, en utilisant la fonction écrite en b), afficbe dans une fenêtre demessage la valeur de e",Remarque: dans cette question ne pas utiliser la feuille de calcul réalisée dans a) et ne pasutiliser la fonction exponentielle du tableur.d) Ecrire en basic-openoffice une procédure proc2 qui demande dans une boîte de saisie lavaleur de x puis celle de n, qui utilise la fonction écrite en b) et qui met dans la feuille de calcul activela valeur de x en B30, celle de n en B3l et celle de eX en B32. (même remarque que dans la questionprécédente)Exercice 3 (4 points)Quel est le résultat de l'exécution de la procédure essai quand a=4 puis a= 16 et enfin a=3 ?Quelle est à votre avis la valeur de la variable inter en fonction de a après l'exécution de la procédure?Sub essaidim d as integerdim c as stringdim vr as integerdim inter as singlec=inputbox("tapez la donnée")d=val(c)inter=lvr=Owhile vr