Syntaxe
de défintion/déclaration
A la place de Action, on peut mettre Procedure.
Exemples de
procedures :
1.
Action
Additionner (E / X,Y : Entier ; S /
Som : Entier) ;
Début
Som ← X + Y ;
Fin ;
Algorithme
Addition ;{algorithme principal}
Var
A,B,somme : Entier ;
Début
Lire(A,B) ;
Additionner(A,B,somme) ;{appel de l’action paramétrée
Addition}
Ecrire(somme) ;
Fin.
2.
Action
Addit (E /
N : Entier ;
S /
Som : Entier) ;
Var
I :
Entier ;
Début
Som ← 0 ;
Pour
i ← 1 à N Faire
Som ← Som + i ;
Fait ;
Fin ;
Algorithme
Addition ;{algorithme principal}
Var
N,somme :
Entier ;
Début
Lire(n) ;
Addit(n,somme) ;{appel de l’action paramétrée Addit}
Ecrire(somme) ;
Fin.
Exemples de
fonctions :
1. Somme de
deux nombres :
Fonction Somme(E/
a,b : Entier) : Entier ;
Début
retourner a+b ;
Fin ;
Algorithme
sommation ;{algorithme principal}
Var
A,B,Som :
Entier ;
Début
Lire(A,B) ;
Som ←
Somme(A,B) ;
Ecrire(Som) ;
Fin.
2.
Algorithme déterminant la valeur de la formule 2Min(A,B)+1 :
Fonction Minimum(E/
a,b : Entier) : Entier ;
Var Min : Entier ;
Début
Si a<b
Alors Min ← a ;
Sinon Min ← b ;
Fsi ;
retourner Min ;
Fin ;
Algorithme Formule ;
Var A,B,form :
Entier ;
Début
Lire(A,B) ;
form ←
2Min(A,B)+1 ;
Ecrire(form) ;
Fin.
Modes
de transmission
3+1 modes : E, S, ES et REF.
Visibilité
Exemple :
Action suivant(ES/
z:entier) ;
debut z ←
z+1 ; fin ;
Action
addit(E/x,y:entier ; S/som :entier) ;
var val:entier ;
debut
som ← x ;
val ← 0 ;
Tant que
val<y faire
suivant(som) ;
suivant(val) ;
ftq ;
fin ;
Algorithme
Additionner ;
var
A,B,somme:entier ;
debut
lire(A,B) ;
addit(A,B,somme);
ecrire(somme) ;
fin.
-
Objets déclarés dans
Portée
A : Additionner
A, SA1, SA2
SA1 : Addit
SA1, SA2
SA2 : suivant
SA2
No comments:
Post a Comment
Note: only a member of this blog may post a comment.