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

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

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

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

Ecrire un algorithme 2

0 votes

Ecrire un algorithme qui calcule et affiche le périmètre d'un Trapèze et d'un Parallélogramme.

نشر على 20:55, السبت 28 أكت 2017 By Aida BOUZID
In Algorithmique et structure de données 1


أجوبة (43)




جواب (1)

0 votes

Algorithme périmètre parallélogramme;

var: x,y : réel;

début

écrire (' donnez le longeur de la cote ');

lire (x);

y:= x*4;

ecrire (' le périmètre parallélogramme est', y:4;2);

fin.

Algorithme périmètre Trapèze:

var: gr,rm,h,Z: réel;

début

écrire (' donnez la grande règle ');

lire (gr);

écrire (' donnez la règle minuteur '(;

lire (rm);

écrire (' donnez l'hauteur '),

lire (h);

Z:= (gr+rm)*h/2 ;

écrire (' le périmètre Trapèze est',Z:4:2);

fin.

 G4 n2

نشر على 21:28, السبت 28 أكت 2017 by safia benadid (12 points)
In Algorithmique et structure de données 1



جواب (2)

1 votes

Algorithme  trapeze ; 

Var a,b,c,d : reél ; 

Debut 

Ecrire('donnez les longeurs svp ' ) ; 

Lire(a,b,c,d); 

Ecrire('le périmétre de votre trapéze est : '  ,  a+b+c+d  ) ; 

 

Fin. 

 

Algorithme Parallelogramme ; 

Var x, y : reél ; 

Debut 

Ecrire ('donnez les longeurs  svp ' ); 

Lire(x,y) ; 

Ecrire ('le périmétre de votre parallélogramme est : '  ,  2*x + 2*y  ) ; 

 

Fin. 

 

نشر على 21:53, السبت 28 أكت 2017 by Fateh HESSAINIA (61 points)
In Algorithmique et structure de données 1



جواب (3)

1 votes

ALGORITHME traparra;

VAR xC,xB,a,b,c,d:réel;

DEBUT 

     ECRIRE ('Introduisez la valeur en cm du côté du parallélogramme:');

     LIRE (xC);

     ECRIRE ('Introduisez la valeur en cm de la base du parallélogramme:');

     LIRE (xB);

     ECRIRE ('Introduisez en cm les valeurs des quatre longueurs du trapèze'); 

     LIRE (a,b,c,d);

          ECRIRE ('le périmètre du parallélogramme est de:',xC*2+xB*2,'cm');

          ECRIRE ('le périmètre du trapèze est de:',a+b+c+d,'cm');

FIN.

______

_G4, n1.

نشر على 23:39, السبت 28 أكت 2017 by Adlène Beddiar (18 points)
In Algorithmique et structure de données 1



جواب (4)

1 votes

;algorithme traduize;

;Var s,d,f,g:reél

Debut

 ;(Lire(s,d,f,g

;(Ecrire('le perimetre d'un trapeze est',s+d+f+g

.Fin

;Algorithme paralelograme

;Var a,b: entier

Debut

Lire(a,b);

;(Ecrire('le perimetre d'un paralelogramme est',2*(a+b)

.fin

نشر على 07:30, الأحد 29 أكت 2017 by amina monebbah (61 points)
In Algorithmique et structure de données 1



جواب (5)

0 votes

Algorithme traduize;

Var a,b,c,d:réel;

Début

Écrire('donnez les longueurs ');

Lire(a,b,c,d) ;

Écrire('le périmètre d'un trapèze est:',a+b+c+d); 

Fin.   

Algorithme parallélogramme;

Var x,y:réel;

Début

Écrire('donnez les longeurs');

Lire (x,y);

Écrire('le périmètre de votre parallélogramme est :',2*x+2*y);

Fin. 

G: 3,   n :23  

 

نشر على 16:37, الأحد 29 أكت 2017 by MAROUA GHODBANE (54 points)
In Algorithmique et structure de données 1



جواب (6)

0 votes

algorithme trapez;

var a,b,c,d:reel;

debut

ecrire('donnez les longeurs');

lire(a,b,c,d);

ecrire('le perimetre de trapeze est :' , a+b+c+d);

fin.

 

algorithme parallelogramme;

var a,b,c :reel;

debut

ecrire('donnez les longrur);

lire(a,b);

c:=(2*x)+(2*y);

ecrire('le perimetre de parallélogmme est:' , c);

fin.

نشر على 17:24, الأحد 29 أكت 2017 by بثينة شرايطية (50 points)
In Algorithmique et structure de données 1



جواب (7)

0 votes

l'algorithme :

Algorithme perem_tr_pa;

var x,y,a,b,c,d:reél;

Debut

lire (a,b,c,d);

écrire('le perimetre de trapeze est: ',a+b+c+d:4:2);

lire (x,y);

écrire('le perimetre de parallelogramme est: ',(x+y)*2:4:2);

Fin.

Le programme :

La resultat :

Groupe 3 numéro 30

نشر على 17:31, الأحد 29 أكت 2017 by هيثم سفيان معاوة (21 points)
In Algorithmique et structure de données 1



جواب (8)

0 votes

Algorithme P  TRAPEZE;

VAR a,b,c,d:reel;

debut

ecrire('donnez les longeurs svp');

lire(a,b,c,d);

ecrire(le perimetre de trapeze est:' a+b+c+d);

FIN.

 

Algorithme P PARALLELOGRAMME; 

VAR x,y:reel;

Debut

ecrire('donnez les longeurs svp');

lire(x,y);

ecrire('le perimetre de parallelogramme est:' 2*x+2*y);

fin.

 

G 4.

نشر على 17:40, الأحد 29 أكت 2017 by ساسية بولعراس (20 points)
In Algorithmique et structure de données 1



جواب (9)

0 votes

نشر على 19:09, الأحد 29 أكت 2017 by خولة نصيبي (52 points)
In Algorithmique et structure de données 1



جواب (10)

0 votes

algorithme trapez;

var a,b,c,d :reél;

debut

écrire ('donnez les longueur');

lire(a,b,c,d);

écrire('le perimetre de trapeze est :'a+b+c+d);

fin.

algorithme parallelogramme;

var x,y,c:réel;

debut

écrire ('donnez les longueur');

lire(x,y);

c:=(x+y)*2

écrire ('le perimetre de parallélogmme est:',c);

fin.

Gr:3 N:12

 

نشر على 19:35, الأحد 29 أكت 2017 by hadjer haou (22 points)
In Algorithmique et structure de données 1



جواب (11)

0 votes

Algorithme  perimetre-pata;

Var  a,b,c,d,h,m : reél ;

Debut

Ecrire (' donnez les longueur de  ') ;

Lire ( a,b,c,d );

Ecrire (' le perimetre de parallèlogmme est  : ' ,  a+b+c+d  );

Ecrire ( ' donnez les longueur de trapeze ') ; 

Lire(h,m); 

 Ecrire ( ' lez perimetre de trapeze est : '  ,  2*h+2*m  );

Fin.

نشر على 21:19, الأحد 29 أكت 2017 by Amani Haraoubia (47 points)
In Algorithmique et structure de données 1



جواب (12)

0 votes

algorithme trapeze;

var a,b,c,d:reel;

debut

ecrire('donnez les longeurs');

lire(a,b,c,d);

ecrire('le perimetre d''un trapeze est:',a+b+c+d);

fin.

 

algorithme parallelogramme;

var x,y:reel;

debut

ecrire('donnez les longeurs');

lire(x,y);

ecrire('le perimetre de votre parallelogramme est:',2*x+2*y);

fin.

 

g:3

نشر على 23:06, الأحد 29 أكت 2017 by يسرى بويس (5 points)
In Algorithmique et structure de données 1



جواب (13)

0 votes

Algorithme perimetre;

Var a,b,c,d:reel;

Debut

Ecrire('donnez les longeers');

Lire(a,b,c,d);

Ecrire('le perimetre de trapaze:',a+b+c+d); 

Fin.

Algorithme parallelogramme;

Var a,b:reel;

Debut

Ecrire('donnz les longeurs ');

Lire(a,b);

Ecrire(le perimetre parallelogramme est:',2*a+2*b);

Fin.

 G3 n4

 

 

نشر على 17:35, الاثنين 30 أكت 2017 by MAROUA BEN AOUDI (8 points)
In Algorithmique et structure de données 1



جواب (14)

0 votes

Algorithme perimetre;

Var c1,c2,c3,c4,b1,b2,P1,p2:reel;

debut

Ecrire ('donnez les longeurs du cotes');

lire(c1,c2,c3,c4);

P1:=c1+c2+c3+c4;

Ecrire('le perimetre de trapeze est:',P1)

ecrire('donnez les longeurs des petit et grand bases de paralellogramme');

lire(b1,b2);

p2:=(b1+b2)*2;

ecrire('le perimetre de paralellogramme est:',p2);

fin.

 

نشر على 19:16, الاثنين 30 أكت 2017 by tassnime ladjailia (6 points)
In Algorithmique et structure de données 1



جواب (15)

0 votes

Algorithme trapeze;

Var W,X,Y,Z : réel; 

Debut

Lire (W,X,Y,Z);

Ecrire (' Le périmètre d''un trapeze est', W+X+Y+Z);

FIN.

Algorithme parallelogramme; 

Var A,B : Réel; 

Début 

Lire (A,B);

Ecrire (' le périmètre d''un parallélogramme est', 2*(A+B);

FIN.

نشر على 21:32, الاثنين 30 أكت 2017 by Abir Bouzenada (12 points)
In Algorithmique et structure de données 1



جواب (16)

0 votes

Algorithme trapéze;

Var a,b,c,d:réel;

Debut

Écrire('donnez les longeurs');

Lire(à,b,c,d);

Écrire('le périmètre d'un trapéze est',a+b+c+d);

Fin.

Algorithme parallélogramme;

Var a,b:réel;

Début

Écrire('donnez les longeurs');

Lire(a,b);

Écrire('le périmètre d'un parallélogramme est',2*(a+b);

Fin.

 

نشر على 22:07, الاثنين 30 أكت 2017 by Khaoula Mokrane (50 points)
In Algorithmique et structure de données 1



جواب (17)

0 votes

Algorithme perimetre;

Var x,y,a,b,c,d,P,Z : reel ;

Debut 

Ecrire  ('donnez le longueur et le côte du parallelogramme en cm' );

Lire  (x,y) ;

Z:=2*x + 2*y ;

Ecrire  (' donnez les quatres longueur du trapeze en cm ');

Lire  (a,b,c,d);

P:= a+b+c+d ;

Ecrire  (' Le perimetre du parallelogramme est : ', Z:4:2, 'cm' , 'et du trapeze est: ', P:4:2 , 'cm');

Fin.

Gr: 4

نشر على 11:17, الثلاثاء 31 أكت 2017 by manel chiah (12 points)
In Algorithmique et structure de données 1



جواب (18)

-1 votes

algorithme parallelogramme;

var x,y:réel;

debut

écrire('donnez les longeurs');

lire(x,y);

écrire('le périmètre de votre parallélogrammeest:'2*x+2*y);

fin.

 

algorithme trapéze;

var a,b,c,d:réel;

debut

écrire('donnez les longeurs a,b,c,dè);

lire(a,b,c,d);

écrire('la trapèze est:'a+b+c+d);

fin.

 

نشر على 18:33, الثلاثاء 31 أكت 2017 by ريان ريدان (227 points)
In Algorithmique et structure de données 1



جواب (19)

0 votes

Algorithme Trapèze ;

var a,b,c,d,p:réel ;

début

écrire ('donnez les longueurs');

lire(a,b,c,d);

p:=a+b+c+d;

écrire ('le périmètre de trapèze',p);

fin.

Algorithme parlelograme;

var x,y,p:réel ;

début

écrire ('donnez les longueurs');

lire(x,y);

p:=2*(x+y);

écrire ('le périmètre parallélogramme est :',p);

fin.

 G3

نشر على 20:34, الثلاثاء 31 أكت 2017 by tourghi marwa (22 points)
In Algorithmique et structure de données 1



جواب (20)

0 votes

Algorithme perimetre;

Var x,y,a,b,c,d,pt,pp:reel;

Debut

ecrire('donnez les longeurs');

Lire(a,b,c,d,x,y);

pt:=a+b+c+d;

pp:=2*x+2*y;

ecrire('le pèrimètre d'un trapèze est:',pt,'et le pèrimètre d'un parallèlogramme est:',pp);

Fin.

G3

نشر على 10:33, الأربعاء 1 نوف 2017 by nabila lahmar (7 points)
In Algorithmique et structure de données 1



جواب (21)

0 votes

Algorithme trapèze ;

Var a,b,c,d:réel;

Début

Écrire ('donnez les longueurs ');

Lire (a,b,c,d);

Écrire ('le périmètre d''un trapèze est:',a+b+c+d);

Fin.

 

Algorithme parallélogramme ;

Var x,y:réel;

Début

Écrire ('donnez les longueurs ');

Lire (x,y);

Écrire ('le périmètre d'un parallélogramme est :',2*(a+b));

Fin.

G3

 

نشر على 14:40, الأربعاء 1 نوف 2017 by عائشة عزاق (14 points)
In Algorithmique et structure de données 1



جواب (22)

0 votes

Algorithme trapèze ;

Var a,b,c,d: réel ;

Début

Écrire ('donnez les longueurs')

Lire (a,b,c,d);

Écrire ('le périmètre d'un trapèze est:', a+b+c+d);

Fin.

Algorithme parallélogramme ;

Var x,y: réel ;

Début

Écrire ('donnez les longueurs ');

Lire (x,y);

Écrire ('le périmètre d'un parallélogramme est :', 2*x+2*y);

Fin.

نشر على 21:13, الأربعاء 1 نوف 2017 by Aitkaki kahina Aitkaki kahina (27 points)
In Algorithmique et structure de données 1



جواب (23)

0 votes

Algorithme P Trapeze;

var a,b,c,d:reel;

debut

ecrire('donnez les longeurs svp');

lire (a,b,c,d);

ecrire('le perimetre de trapeze est:'a+b+c+d);

fin.

Algorithme P parallelogramme;

var x,y:reel;

debut

ecrire('donnez les longeurs svp');

lire('x,y);

ecrire('le parallelogramme est :'2*x+2*y);

fin.

 

G:04

نشر على 16:59, الأحد 5 نوف 2017 by وفاء زروقي (8 points)
In Algorithmique et structure de données 1



جواب (24)

0 votes

Algorithme  Traparra;

var x,y,a,b,c,d:reel;

debut

ecrire('donnez la valeur du cote du parallelogramme');

lire(x);

ecrire('donnez la valeur de la base du parallelogramme:');

lire(y);

ecrire('donnez les valeurs des 4 longeurs du trapeze');

lire(a,b,c,d);

ecrire('le perimetre du parallelogramme est de:'x*2+y*2');

ecrire('le perimetre du trapeze est de :'a+b+c+d');

fin.

G:04

نشر على 17:14, الأحد 5 نوف 2017 by chourouk bouakaz (7 points)
In Algorithmique et structure de données 1



جواب (25)

0 votes

algorithme trapèze;

var a,b,c,d : réel;

debut

écrire('donnez moi les longeurs a,b,c,d');

lire(a,b,c,d);

écrire('la trapèze est',a+b+c+d);

fin.

نشر على 17:48, الاثنين 6 نوف 2017 by Haifa Benlassowd (76 points)
In Algorithmique et structure de données 1



جواب (26)

0 votes

algorithme parallelogramme;

var a,b :réel;

debut

écrire('donnez les longeurs');

lire(a,b);

écrire('le périmetre de votre parallelogramme est'2*a+2*b);

fin.

نشر على 18:29, الاثنين 6 نوف 2017 by Haifa Benlassowd (76 points)
In Algorithmique et structure de données 1



جواب (27)

0 votes

algorithem perimetre-pata;

VAR a,b,c,d,h,m:réel;

debut

ecrire('donnez les longeur de');

lire(a,b,c,d);

ecrire('le perimetre de parallélogmme est;',a+B+C+D);

ecrire('donnez les longeur de trapeze');

lire(h,m);

ecrire('les perimetre de trapeze est :',2*h+2*m);

fin.

نشر على 20:42, الاثنين 6 نوف 2017 by ويصال لعلايبية (11 points)
In Algorithmique et structure de données 1



جواب (28)

0 votes

Algorithme  Traparra;

var x,y,a,b,c,d:reel;

debut

ecrire('donnez la valeur du cote du parallelogramme');

lire(x);

ecrire('donnez la valeur de la base du parallelogramme:');

lire(y);

ecrire('donnez les valeurs des 4 longeurs du trapeze');

lire(a,b,c,d);

ecrire('le perimetre du parallelogramme est de:'x*2+y*2');

ecrire('le perimetre du trapeze est de :'a+b+c+d');

fin.

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



جواب (29)

0 votes

Algorithme  trapeze ; 

Var a,b,c,d : reél ; 

Debut 

Ecrire('donnez les longeurs svp ' ) ; 

Lire(a,b,c,d); 

Ecrire('le périmétre de votre trapéze est : '  ,  a+b+c+d  ) ; 

 

Fin. 

 

Algorithme Parallelogramme ; 

Var x, y : reél ; 

Debut 

Ecrire ('donnez les longeurs  svp ' ); 

Lire(x,y) ; 

Ecrire ('le périmétre de votre parallélogramme est : '  ,  2*x + 2*y  ) ;

Fin.

نشر على 23:36, الخميس 9 نوف 2017 by عبد الرحمان برينيس (136 points)
In Algorithmique et structure de données 1



جواب (30)

-1 votes

Algorithme  trapeze ; 

Var a,b,c,d : reél ; 

Debut 

Ecrire('donnez les longeurs svp ' ) ; 

Lire(a,b,c,d); 

Ecrire('le périmétre de votre trapéze est : '  ,  a+b+c+d  ) ; 

 

Fin. 

 

Algorithme Parallelogramme ; 

Var x, y : reél ; 

Debut 

Ecrire ('donnez les longeurs  svp ' ); 

Lire(x,y) ; 

Ecrire ('le périmétre de votre parallélogramme est : '  ,  2*x + 2*y  ) ; 

 

Fin. 

 

نشر على 16:01, الجمعة 10 نوف 2017 by oussama baha eddine farhi (257 points)
In Algorithmique et structure de données 1



جواب (31)

0 votes

Algorithme perimetre;

Var a,b,c,d,x,y,ptr,ppr:réel;

Debut

ecrire('donnez les longeurs de trapeze ');

lire (a,b,c,d);

ecrire('donnez les longeurs de parallélogramme');

lire(x,y);

ptr:=a+b+c+d;

ppr:=2*(x+y);

ecrire('le primetre de trapeze est :',ptr);

ecrire(' le perimetre de parallélogramme est:',ppr);

fin.

نشر على 17:39, الجمعة 10 نوف 2017 by نريمان قشايشية (14 points)
In Algorithmique et structure de données 1



جواب (32)

0 votes

algorithme trapez;

var a,b,c,d:reel;

debut

ecrire('donnez les longeurs');

lire(a,b,c,d);

ecrire('le perimetre de trapeze est :' , a+b+c+d);

fin.

 

algorithme parallelogramme;

var a,b,c :reel;

debut

ecrire('donnez les longrur);

lire(a,b);

c:=(2*x)+(2*y);

ecrire('le perimetre de parallélogmme est:' , c);

fin.

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



جواب (33)

0 votes

Algorithme tapez;

Var a,b,c,d,reel;

Debut

Lire(a,b,c,d);

Ecrire('a+b+ c+d');

Fin.

 

نشر على 14:51, الجمعة 1 ديس 2017 by fardous bouhama (60 points)
In Algorithmique et structure de données 1



جواب (34)

0 votes

Algorithme tapez;

Var a,b,c,d,reel;

Debut

Lire(a,b,c,d);

Ecrire('a+b+ c+d');

Fin.

 

نشر على 14:51, الجمعة 1 ديس 2017 by fardous bouhama (60 points)
In Algorithmique et structure de données 1



جواب (35)

0 votes

Algorithme Parrallellograme;

Var x,y:reel ;

Debut

Lire(x,y);

Ecrire( laprimetre de votre parrallellograme east:',2*x+2*y);

Fin.

;

نشر على 14:55, الجمعة 1 ديس 2017 by fardous bouhama (60 points)
In Algorithmique et structure de données 1



جواب (36)

-1 votes

program parrallelograme;

var x,y:integer;

begin

readln(x,y);

writeln('la perrimetre est:'2*x+2*y);

end.

نشر على 15:03, الجمعة 1 ديس 2017 by ريان ريدان (227 points)
In Algorithmique et structure de données 1



جواب (37)

0 votes

Algorithme  trapeze ; 

Var a,b,c,d : reél ; 

Debut 

Ecrire('donnez les longeurs svp ' ) ; 

Lire(a,b,c,d); 

Ecrire('le périmétre de votre trapéze est : '  ,  a+b+c+d  ) ; 

 

Fin. 

 

Algorithme Parallelogramme ; 

Var x, y : reél ; 

Debut 

Ecrire ('donnez les longeurs  svp ' ); 

Lire(x,y) ; 

Ecrire ('le périmétre de votre parallélogramme est : '  ,  2*x + 2*y  ) ; 

 

Fin. 

نشر على 17:10, الجمعة 1 ديس 2017 by oussama baha eddine farhi (257 points)
In Algorithmique et structure de données 1



جواب (38)

0 votes

Algorithme  trapeze ; 

Var a,b,c,d : reél ; 

Debut 

Ecrire('donnez les longeurs svp ' ) ; 

Lire(a,b,c,d); 

Ecrire('le périmétre de votre trapéze est : '  ,  a+b+c+d  ) ; 

 

Fin. 

 

نشر على 21:10, الأحد 3 ديس 2017 by seif eddine touati (166 points)
In Algorithmique et structure de données 1



جواب (39)

0 votes

Algorithme Parallelogramme ; 

Var x, y : reél ; 

Debut 

Ecrire ('donnez les longeurs  svp ' ); 

Lire(x,y) ; 

Ecrire ('le périmétre de votre parallélogramme est : '  ,  2*x + 2*y  ) ; 

 

Fin. 

نشر على 21:10, الأحد 3 ديس 2017 by seif eddine touati (166 points)
In Algorithmique et structure de données 1



جواب (40)

0 votes

Algorithme perem_tr_pa;

var x,y,a,b,c,d:reél;

Debut

lire (a,b,c,d);

écrire('le perimetre de trapeze est: ',a+b+c+d:4:2);

lire (x,y);

écrire('le perimetre de parallelogramme est: ',(x+y)*2:4:2);

Fin.

نشر على 18:15, الثلاثاء 19 ديس 2017 by Cadi Mohamed riadh (14 points)
In Algorithmique et structure de données 1



جواب (41)

0 votes

Algorithme périmètre ;

Var x,y,a,b,c,d :réel; PT,pp:réel ;

Début

Écrire ('donnez les longeurs');

Lire(a,b,c,d,x,y);

PT :=a+b+c+d ;

Pp:=2*x+2*y;

Écrire ('le périmètre d'une trapèze est',PT,'et le périmètre d'un parallélogramme est',pp );

Fin.

نشر على 20:51, الخميس 21 ديس 2017 by أميرة زمال (84 points)
In Algorithmique et structure de données 1



جواب (42)

1 votes

algorithme  périmétre;

var x,y,a,b,c,d:reel;pt,pp,:reel;

debut 

ecrire ('donnez les longeurs ');

lire (a,b,c,,d,x,y);

pt:=a+b+c+d;

pp:=2*x+2*y;

ecrire ('le perimetre d'une trapeze est ',pt,'et le perimetre dune parallelogrammme est ',pp);

fin.

نشر على 20:31, الجمعة 29 ديس 2017 by بوشارب شيماء (77 points)
In Algorithmique et structure de données 1



جواب (43)

0 votes

algorithme traparra;

var xa,xb,a,b,c,d:reel;

debut

ecrire ('introduisez la valeur en cm du cote du parallelogramme');

lire (xa);

ecrire ('introduisez  la vaieur en cm la base du paralleogramme');

lire (xb);

ecrire ('introduisez en cm les vaieurs des quatre iongueurs du trapeze');

lire (a,b,c,d);

 

نشر على 13:51, السبت 30 ديس 2017 by أميرة زمال (84 points)
In Algorithmique et structure de données 1



هل لديك جواب ?