Dim

name") ’ Declare the variable Dim name As String name = Console . readLine () Console . writeLine (" Hello {0}", name) End Sub End Module Structures de ˆ controles Fonctions et modules Introduction au langage VB.NET G. Wisniewski Prise en main ´ ´ Element de la langage Structures de ˆ controles Fonctions et modules Les variables Les variables Introduction au langage VB.NET G. Wisniewski Prise en main ´ Declaration Dim As Const As ´ ´ Element

ALGORITHMIQUE 2009 1. Module Module1 Dim A, B As Integer Sub Main() A = 1 B = A + 3 A = 3 Console.WriteLine("La valeur des variables est : " & " A = " & A & " ; B = " & B) Console.ReadLine() End Sub End Module 2. Module Module1 Dim A, B, C As Integer Sub Main() A = 5 B = 3 C = A + B A = 2 C = B - A Console.WriteLine("La valeur des variables est : " & " A = " & A & " ; B = " & B & " ; C = " & C) Console.ReadLine() End Sub End Module 3. Module Module1 Dim A, B As Integer Sub Main() A = 5 B =

sauf dim et fériés lun sauf fériés TER TER Briançon SNCF Prelles Queyrières Sainte-Marguerite L'Argentière La Roche de Rame Saint-Crépin Montdauphin Guillestre Saint-Clément Chateauroux Embrun Les Crots Savines Chorges Montgardin La Bâtie Neuve Pont Sarrazin Gap SNCF Gap Gare routière Gap SNCF La Tourronde Châteauvieux Tallard centre ville Tallard Aéropole La Saulce Le Vivas Monetier Allemont Valenty Le Beynon Rourebeau Le Poët Sisteron Gare routière Sisteron SNCF Les Bons Enfants Peipin Volonne

Analyse : L’annonceur : La société DIM jouit d’une très forte notoriété. Son nom est intimement lié aux bas et collants qui firent leur apparition au moment de l’émancipation des femmes dans les années 68. La marque est référence à a féminité en général. Elle se place sur un double concept, celui de la liberté et celui de la séduction (encore plus audacieuse et sexy depuis les années 2000). Sa stratégie repose sur un élargissement de gamme (de moyenne à haut de gamme avec Chantal Thomass)

nieme() */ ////////////////////////////////////////////////////////////////////// #ifndef __Vecteur #define __Vecteur class Vecteur { protected: double * _tab; // le tableau des coordonnées int _dimension; // la taille du tableau public: Vecteur (int dim); // on donne la taille du vecteur void display(); // [ x1 ... xN ] double& nieme(int i); // accès à xi Vecteur somme(Vecteur v); // somme de deux vecteurs double scalaire(Vecteur v); // produit scalaire }; #endif /***************************

Soit E un espace vectoriel réel F et G sont deux sous-espaces vectoriels de E alors : F G  u  v / uF;vG      est un sous-espace vectoriel de E      Somme de sous-espaces vectoriels Théorème 2 : dim(F G)  dim(F)  dim(G) dim(FG) F1 F2 V  ( 1 , 0 , 2 )  F1  Vect(V1, V2) avec 1 V2  (0,1,1)       Comme V1 et V2 forment une famille génératrice de F1 , pour savoir s’ils forment une base de F1 ou non, il suffit de voir s’ils

y=y+x-i par y=quoi(y,x,i). Exercice 2 Question 1: sub tirage() Dim x as integer x=pileface() if x=1 then MsgBox(″face″) Else MsgBox(″Pile″) End If End Sub Question 2: sub centirage() Dim nbface As integer Dim i As integer Dim x As integer nbface=0 For i=1 to 100 nbface=nbface+pileface() Next MsgBox(″il y a eu ″& nbface&″ % de face″ ) End Sub Question 3 Function propface(n as integer) As double Dim nbface As integer Dim i As integer Dim x As integer nbface=0 For i=1 to n nbface=nbface+pileface() Next

12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 Jour Mar Mer Jeu Ven Sam Dim Lun Mar Mer Jeu Ven Sam Dim Lun Mar Mer Jeu Ven Sam Dim Lun Mar Mer Jeu Ven Sam Dim Lun Mar Mer HJ 7 8 7 7 HH Date 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 PREJAN Temps complet Jour Mar Mer Jeu Ven Sam Dim Lun Mar Mer Jeu Ven Sam Dim Lun Mar Mer Jeu Ven Sam Dim Lun Mar Mer Jeu Ven Sam Dim Lun Mar Mer HJ 7 7 7 7 HH Date 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20

(initialement), au bout de plusieurs répartitions et de nouvelle partie à l’aide de la fonction test, le programme bug car limité par l’intervalle de valeur que peuvent prendre les variables integer. Fonction de test : Private Sub test_Click() Dim i As Integer For i = 1 To 50 Call btjouer_Click Call repartir_Click Next i Call afficher End Sub Remplacé par un long, nous avons pu constater après un très grand nombre de parties et plusieurs répartitions que l’équité

une famille de vecteurs, et soit (w1 , . . . , wn+1 ) une famille de vecteurs combinaison lin´aire des vi . Alors la seconde famille est li´e. e e Soit F ⊂ E un sous-espace vectoriel de E. Alors, F est de dimension finie, et dim(F ) ≤ dim(E) De plus, on a dim(F ) = dim(E) ⇐⇒ F = E. D´finition 2.10. On appelle rang d’un syst`me de vecteurs d’un espace E la dimension e e du sous-espace vectoriel engendr´ par ce syst`me. e e Le rang est toujours inf´rieur au nombre de vecteurs du syst`me et