Department of Mathematics and Computer Science

algorithme noms;

var a,b,c :caractère;

debut

écrire('donnez moi trois noms');

lire(a,b,c);

si a<b et b<c alors

écrire('ces noms sont classés dans ordre alphabétiques')

sinon

écrire('ces noms ne sont pas classé dans ordre alphabétiques')

fsi

fin.

algorithme troisnoms;

var x,y,z : caractère;

debut

écrire('donnez moi les trois noms svp');

lire(x,y,z);

si x<y et y<z alors

écrire('les trois noms sont classé dans un ordre alphabétique')

sinon

écrire('les trois noms ne sont pas classés dons un ordre alphabétiques')

finsi

fin.

algorithme nom;

var n1,n2,n3;:chaine de caractere ;

debut 

ecrire('donnez trois noms');

lire(n1,n2,n3);

si n1<n2  et n2<n3 alors

ecrire('les trois noms sont ordonnés)

sinon

ecrire('les trois noms non oreonnés');

fin.

Algorithm noms

Var f,g,h:caractere;

Debut

Ecrire('donnez moi troit noms svp');,

Lire(f,g,h);

Si f>g et g>h alors

Ecrire('le troit noms sont classé s dans ordre alphabétique')

Si non

Ecrire( 'le troit nombre ne soit pas dans ordre alphabétique')

Fsi;

Fin.

algorithme ordre;

var a,b,c:chaine de caractere;

debut 

ecrire('donnez 3 noms');

lire(a,b,c)

si ((a<b) et (b<c)) alors

ecrire ('les noms sont rangé par ordre alphabetique');

sinon ecrire ('les noms sont pas oordonnés');

fin.

Algorithme order;

Var n1,n2,n3 : chaine de caractere;

Debut

Ecrire('donnez les noms');

Lire(n1,n2,n3);

Si( ( n1>n2)et (n2>n3))alors

Ecrire('les noms sony ranges par order alphabitique');

Sinon 

Ecrire( 'les noms ne sont pas classe dans order alphabitique');

Fin.

Algorithme nom ;

Var a,b,c : chaîne de caractère ;

Début

Écrire ('donnez trois noms ');

Lire(a,b,c);

Si ((a<b) et (b<c)) alors

Écrire ('ces noms sont classés dans ordre alphabétiques ')

Sinon

Écrire ('ces noms ne sont pas classés dans ordre alphabétiques ');

Fin.

Algorithme ordre;

Var A1,A2,A3: caractere;

Debut 

Ecrire('donnez trois noms');

Lire (A1,A2,A3);

Si  (A1 <A2) et (A2 <A3) alors

Ecrire  ('les noms sont ordre alphabetique')

Sinon

Ecrire  (' les noms ne sont pas ordre alphabetique');

Fin.

algorithme nom;

var nom1,nom2,nom3;

debut

écrire ('donnez trois nom');

lire (nom1,nom2,nom3);

si ((nom1<nom2) et (nom2<nom3))alors

écrire ('les trois nom son ordnnés')

sinon

écrire ('les trois nom non ordonnés');

fin.

algorithme  noms;

var  n1,n2,n3;

debut

ecrire('donnez trois noms');

lire(n1,n2,n3);

si(n1<n2 et n2<n3)alors

ecrire('les trois noms son ordonnés')

sinon

ecrire('les trois noms non ordonnés');

fin.

g3

 Algorithme nom;

var a,x,y:chaine de caractere;

debut

ecrire('donnez les 3 noms');

lire(a,x,y);

si((a<x) et (x<y)) alors

ecrire('les noms sont range par ordre alphabetique')

sinon

ecrire('les noms pas oredonnes');

fin.

Algorithme alphabetique;

Var a,b,c : chaines des caracteres;

Debut 

Ecrire  ('donnez les trois noms ');

Si ((a <b) et (b <c)) alors 

Ecrire  ('les noms sont rangés par ordre alphabetique')

Sinon

Ecrire  ('les noms sont pas ordonnes');

Fin.

Algorithm noms

Var f,g,h:caractere;

Debut

Ecrire('donnez moi troit noms svp');,

Lire(f,g,h);

Si f>g et g>h alors

Ecrire('le troit noms sont classé s dans ordre alphabétique')

Si non

Ecrire( 'le troit nombre ne soit pas dans ordre alphabétique')

Fsi;

Fin.

Algorithme noms;

Var  x,y,z:caractere;

Debut

ECrire ('donnez moi trois noms');

Life(x,y,z);

Si x<y et y<z alors;

Ecrire('les trois nombres sont classer dans order alphabrtique')

Sinom 

Ecrire('les troisnon

algorithme noms;

var a,b,c :caractère;

debut

écrire('donnez moi trois noms');

lire(a,b,c);

si a<b et b<c alors

écrire('ces noms sont classés dans ordre alphabétiques')

sinon

écrire('ces noms ne sont pas classé dans ordre alphabétiques');

fsi;

fin.

Algorithme nom ;

Var x,y,z : chaîne de caractère ;

Début

Écrire ('donnez trois noms ');

Lire(x,y,z);

Si ((x<y) et (y<z)) alors

Écrire ('ces noms sont classés dans ordre alphabétiques ')

Sinon

Écrire ('ces noms ne sont pas classés dans ordre alphabétiques ');

Fin.

Algorithme noms;

Var  a,b,c:entier;

Debut

Ecrire ('donnez moi trois noms');

Lire(a,b,c);

Si a<b et b<c alors 

Ecrire ('les toirs noms sont al'ordre alphabetique');

Sinon

Ecrire ('les trois noms ne sont pas al'ordre alphabetique')

Fsi;

Fin. 

algorithme noms;

var a,b,c :caractère;

debut

écrire('donnez moi trois noms');

lire(a,b,c);

si a<b et b<c alors

écrire('ces noms sont classés dans ordre alphabétiques')

sinon

écrire('ces noms ne sont pas classé dans ordre alphabétiques')

fsi;

fin.

Algorithme noms;

Var a,b,c : character;

Debut

Lire(a,b,c);

Si a<b et b<c alors

Ecrire ('les noms sont a lordre ')

Simon

Ecrire ('led noms ne sont pas a lordre');

FSI;

Fin.

Algorithme nom ;

Var x,y,z : chaîne de caractère ;

Début

Écrire ('donnez trois noms ');

Lire(x,y,z);

Si ((x<y) et (y<z)) alors

Écrire ('ces noms sont classés dans ordre alphabétiques ')

Sinon

Écrire ('ces noms ne sont pas classés dans ordre alphabétiques ');

Fin.

algorithme troisnoms;

var x,y,z : caractère;

debut

écrire('donnez moi les trois noms svp');

lire(x,y,z);

si x<y et y<z alors

écrire('les trois noms sont classé dans un ordre alphabétique')

sinon

écrire('les trois noms ne sont pas classés dons un ordre alphabétiques')

finsi

fin.

Algorithme noms;                        var A,B,C : caractere;                debut                                      ecrire ('donnez trois noms');        lire (A,B,C);                                     si a<b et b<c alors                    ecrire('ces noms classe dans ordre alphabitique ');                   finsi;                                               fin;

Algorithme noms;                        var A,B,C : caractere;                debut                                      ecrire ('donnez trois noms');        lire (A,B,C);                                     si a<b et b<c alors                    ecrire('ces noms classe dans ordre alphabitique ');                   finsi;                                               fin;