Integer

adresses ; { Fichier à accès direct } type individu = record nom, prenom : string [20]; adresse : string [80]; telephone: string [12] end; fichier = file of individu; {On définit deux types d'objets, les individus et les fichiers} var G : fichier; X : integer ; procedure creation (var F : fichier); { ne servira qu'une seule fois } begin rewrite (F); close (F) end; procedure ecriture (var F : fichier); { Ecrit une ou plusieurs nouvelles fiches dans F } var A : individu ; C : char; begin reset (F); C :=

programme bonjour . . . . . . . 1.2 Commentaires dans un programme 1.3 Utilisation d’une variable enti`ere . . 1.4 Trace et tableau de sortie . . . . . . 1.5 Lecture au clavier d’une valeur . . . 2 Identificateur 3 Types pr´ ed´ efinis 3.1 Type entier : integer . . . . . . . 3.2 Type r´eel : real . . . . . . . . . . . 3.3 Type caract`ere : char . . . . . . . . 3.4 Type bool´een : boolean . . . . . . 4 D´ eclarations 4.1 Constantes . . . . . . . . . . . . . . 4.2 Variables et affectation . . . . . . . 5 Expressions

a magna augue. Integer aliquet diam vel magna malesuada auctor. Ut dignissim dapibus arcu, eu euismod nulla rhoncus in. Lorem ipsum dolor sit amet, consectetur adipiscing elit. In rutrum turpis nec mattis rhoncus. Ut nulla odio, elementum elementum nulla vestibulum, rhoncus sollicitudin risus. Curabitur varius lorem nec ante tincidunt, a tempus mi bibendum. Proin luctus erat ut ipsum mattis lacinia. Integer feugiat nulla eget enim eleifend, eget vestibulum nisi ultricies. Integer tortor tellus, volutpat

8 1 program subroutine function ( 2 5 / type var1, var2, var3, ..... 5 / D 3 D " 5 4 integer i,j,k real alpha, beta double precision x,y complex z ' 0 . • # 0 o o o o / $ & • • • $ >&& $ */ + *G+ * D ! ! /&" & & : ! ! * 9 ! &! 6 && )& '& $ + * + epsilon2 *! epsilon1 2 D / 5 i,j,k,l,m,n / & / $ 3 integer / z % ; IMPLICIT H 3 real a h o ' / & 0 3 & H D 2 & " : & / & ! . implicit type

dans un état d’attente. S tock avant Acheminement Nbre d'ordres en attente SAchem : integer Nom : string Capacité : integer Déstockage() Stockage() 1 1 Consommation Client Durée : Nbre d'ordres en Conso : Id : Consommation_Op() 1 1 Nom : string 1 Ordre RECOR Nom : string Temps : real Espace : string Forme : string 1..* 1 1 Stock avant Affectation Nbre d'ordres en attente SAffec : integer Capacité : integer Nom : string Stockage() Déstockage() 1 Fournisseur Nom : string 1 1 1 Affectation

lblBonjour, … Form TextBox Button frm txt btn Label GroupBox CheckBox ComboBox lbl grp chk cbo • Dans la forme ou dans une procédure • Mot-clé Dim Dim nom_variable As Type Dim x As Integer Dim i,j,k As Integer, m As Long • Inférence de type Dim n = 3 • Niveau d’accès [Private|Public|Protected] Dim p As Integer • Constantes Const nom_const As Type = val RadioButton opt ListBox lst PictureBox pic [PIG] Cours IV Prog. Evt Procédures 21 [PIG] Cours IV Prog. Evt Exemple

EXEMPLE : Sub Essai() MsgBox "Bonjour" End Sub Melle. Chérif Amina Page COURS VBA MTIP/2014 Une fonction est une procédure qui renvoie une valeur. Elle se déclare de la même façon qu’une procédure. EXEMPLE : Function Calcul(Nbre1 As Integer, Nbre2 As Integer) Calcul = Nbre1 + Nbre2 End Function En général, on écrit une instruction par ligne. Il est possible d’ajouter des lignes de commentaire entre les lignes d’instruction ou au bout de celles-ci. Les commentaires sont précédés d’une apostrophe

Integer libero augue, feugiat non felis sed, tempor hendrerit ante. Vestibulum sit amet imperdiet sapien. Maecenas lectus dolor, varius ac consectetur vitae, vulputate vitae quam. Donec gravida semper mauris sed eleifend. Aliquam dignissim lobortis ex quis vestibulum. Cras non urna faucibus, sodales odio eget, condimentum tellus. Praesent eleifend nisi sapien, non dictum sapien pharetra sed. Sed egestas justo consectetur, tristique libero ac, sagittis enim. Quisque ut felis vel nunc hendrerit aliquam

de Procédure nommée Essai : Sub Essai() MsgBox "Bonjour" End Sub Une fonction est une procédure qui renvoie une valeur. Elle se déclare de la même façon qu'une procédure. Exemple de fonction nommée Calcul : Function Calcul(Nbre1 As Integer, Nbre2 As Integer) Calcul = Nbre1 + Nbre2 End Function En général, on écrit une instruction par ligne. Il est possible d'ajouter des lignes de commentaire entre les lignes d'instruction ou au bout de celles-ci. Les commentaires sont précédés d'une apostrophe

séparer deux instructions. Il est à noter que le compilateur du langage pascal ne fait pas la différence entre les minuscules et les majuscules. 3.2 Types de données élémentaires en pascal Le type INTEGER (nombres entiers) a 5 variantes : Type Domaine Taille ShortInt -128 .. 127 1 octet Integer -32 768 .. 32 767 2 octets Longint -2147483648 .. 2147483647 4 octets Byte 0 .. 255 1 octet Word 0 .. 65 535 2 octets Le type REAL (nombres réels) a 5 variantes : Type Domaine Taille