Correction algorithme de passage 2012 v2

par tamrinsty Mar Juil 03, 2012 1:23 am

salam lkhoot chofo had la solution wach s7i7a wla nn
Exclamation

*************algoo v2*************
variable : Nc,i=0,i2=1,pg=0,mg=0,var,c1,c2 :entier
tableau : M[50],P[50] :entier

Debtu

afficher ("entrer le nombre de clients")
saisir(Nc)

tantque (i=<nc)
afficher("donner le poid de bagage de client " i2)
saisir(p[i])
si (p[i]=<20)
M[i]<--0
sinon si (p[i]>20) ET (p[i]=<100)
M[i]<--((P[i]-20)/10)*5
sinon
M[i]<--(((P[i]-100)/10)*10)+40
finsi
finsi
i <-- i+1
i2 <-- i2+1
pg <-- pg+p[i]
mg<-- mg+M[i]
fintanque
------------trier les deux tableaux------------
pour c1=0 à Nc-1
pour c2=(c1+1) à Nc
si P[c2]<[pc1]
var <-- P[c1]
P[c1] <-- P[c2]
P[c2] <-- var
finsi
finpour
finpour

pour c1=0 à Nc-1
pour c2=(c1+1) à Nc
si M[c2]<[Mc1]
var <-- M[c1]
M[c1] <-- M[c2]
M[c2] <-- var
finsi
finpour
finpour
---------------affichage---------------
aficher ("client poids montant")
pour i=0 à nc
afficher(i P[i] M[i])
finpour
afficher("total" Pg mg)

Fin