قسم الرياضيات و الإعلام الإلي

www.univ-soukahras.dz/ar/dept/mi

المقياس: Algorithmique et structure de données 1

  1. معلومات
  2. الأسئلة
  3. التعليم عن بعد

Écrire un programme

0 votes

Écrire un programme qui permet de trouver  le maximum entre deux nombres entiers 

نشر على 22:46, السبت 11 نوف 2017 By Aitkaki kahina Aitkaki kahina (27 points)
In Algorithmique et structure de données 1


أجوبة (13)




جواب (1)

0 votes

Algorithme max;

Var a,b:entier

Debut

Lire(a,b);

Si a>=b alors ecrire(' le max est ',a)

Sinon ecrire( 'le max est ', b)
Fsi

Fin.

 

نشر على 17:10, الأحد 12 نوف 2017 by abderrahmane brinis (136 points)
In Algorithmique et structure de données 1



جواب (2)

0 votes

algorithme max;

var a,b:entier;

debut

écrire('tapez les deux nombres',a,b);

lire(a,b);

si a>=b alors

  écrire('le max est',a)

sinon

   écrire('le max est',b)

fsi;

fin.

نشر على 17:43, الأحد 12 نوف 2017 by rayene ridane (228 points)
In Algorithmique et structure de données 1



جواب (3)

0 votes

program max;

var x,y:integer;

begin

write('tapez',a,b);

readln(a,b);

if a>=b then

   writeln('le max est',a)

else

  écrire('le max est',b)

fin.

نشر على 18:36, الأحد 12 نوف 2017 by Haifa Benlassowd (76 points)
In Algorithmique et structure de données 1



جواب (4)

0 votes

program MAX;

var x,y:integer;

begin

write('tapez',x,y);

readln(x,y)

if X>=y the

write('le max et',x);

else

write('le max est',b);

end.

نشر على 19:49, الأحد 12 نوف 2017 by Mohamed idriss Gouasmia (31 points)
In Algorithmique et structure de données 1



جواب (5)

0 votes

;Algorithme 

;Var a,b:entier

Debut

;('Ecrire(donnez moi le deux nombre

Si a>b alors

('Ecrire('a est maximum 

Si non

('Ecrire('b est maximum

Fsi

.fin

 

نشر على 21:20, الأحد 12 نوف 2017 by Amina Monebbah (56 points)
In Algorithmique et structure de données 1



جواب (6)

0 votes

program maximum;

Var a,b:integer;

begin

write('donner la valeur de a :');readln(a);

write('donner la valeur de b :');readln(b);

if a>=b then 

   writeln('la valeur maximum est a=',a)

else

   writeln('la valeur maximum est b=',b);

end.

نشر على 21:37, الأحد 12 نوف 2017 by محمد الناصر ايت اوبي (104 points)
In Algorithmique et structure de données 1



جواب (7)

0 votes

Algorithme max;

Var a,b:entier

Debut

Lire(a,b);

Si a>=b alors ecrire(' le max est ',a)

Sinon

ecrire( 'le max est ', b);

Fin.

 

نشر على 16:14, الثلاثاء 14 نوف 2017 by Khaoula Mokrane (50 points)
In Algorithmique et structure de données 1



جواب (8)

0 votes

algorithme max;

var x,y:entier;

deBut 

ecrire('donnez les deux nombres');

lire(x,y);

si a>=b alors 

    ecrire('le max est',a) 

sinon

     ecrire ('le max est',b);

fin.

نشر على 18:19, الثلاثاء 14 نوف 2017 by narimene kechaichia (14 points)
In Algorithmique et structure de données 1



جواب (9)

0 votes

program max;

Var a,b:integer;

begin

read(a,b);

if a>=b then

write(' le max est ',a)

else 

write( 'le max est ', b)

end.

 

نشر على 20:56, الخميس 16 نوف 2017 by نسرين ولهي (106 points)
In Algorithmique et structure de données 1



جواب (10)

1 votes

program exo;

var n1, n2 : entier ;

debut

ecrire( ' donnes les 2 nombre') ;

lire( n1 , n2 ) ;

si n1 > n2 alors

ecrire( ' le max est ', n1 ) 

sinon

si n1<n2 alors

ecrire ( ' le max est ' , n2)

sinon

ecrire( ' les 2 nombre sont egaux ' ) ; 

fin .

نشر على 01:41, الجمعة 17 نوف 2017 by Amani Haraoubia (47 points)
In Algorithmique et structure de données 1



جواب (11)

0 votes

Algorithme  max ; 

Var n1 , n2 : entier ; 

Debut 

Lire(n1, n2 ) ; 

Si n1>n2      alors 

Ecrire( 'le max est : ' ,  n1 ) 

Sinon 

Si n2 >n1     alors 

Ecrire(' le max est : '  ,  n2 )  

Sinon 

Ecrire('sont egaux '  ) 

Fsi 

Fsi 

 

Fin .

نشر على 08:48, الجمعة 17 نوف 2017 by Feteh HESSAINIA (61 points)
In Algorithmique et structure de données 1



جواب (12)

0 votes

Algorithme  exo; 

Var n1,n2: entier; 

Debut 

Lire(n1, n2); 

Si n1>n2      alors 

debut

Ecrire( 'le max est : ' ,  n1 ) 

Sinon 

Si n2 >n1     alors 

debut

Ecrire(' le max est : '  ,  n2 )  

Sinon 

Ecrire('sont egaux '  ) 

fin;

fin;

Fin .

نشر على 19:01, السبت 18 نوف 2017 by oussama baha eddine farhi (257 points)
In Algorithmique et structure de données 1



جواب (13)

0 votes

Algorithme max;

Var a,b:entier

Debut

Lire(a,b);

Si a>=b alors ecrire(' le max est ',a)

Sinon ecrire( 'le max est ', b)
Fsi

Fin.

نشر على 13:09, الجمعة 1 ديس 2017 by sara younsi (127 points)
In Algorithmique et structure de données 1



هل لديك جواب ?