La solution d'un algorithme
katia
-
sofiane-dix -
sofiane-dix -
Bonjour,
le probleme
nous disposons d'une matrice entiere composée de N lingne et de 3 colonees chaque lingne de la matrice ce presente les notes d'un etudiant (cous avons trois notes) les coefficients de chaque matiere se trouve dans le vecteur COEF.
la maniere es de calculer comme suit:
moyenne =tous(notes I *coleffitient I)/colefficient.
les condition ;
moyenne>=14:mention tres bien
12<=moyenne<14;mention bien
10<=moyenne<12;mention passable
moyenne<7;insufissant
question:
on vous demande le programe pascal
es merci beaucoup
le probleme
nous disposons d'une matrice entiere composée de N lingne et de 3 colonees chaque lingne de la matrice ce presente les notes d'un etudiant (cous avons trois notes) les coefficients de chaque matiere se trouve dans le vecteur COEF.
la maniere es de calculer comme suit:
moyenne =tous(notes I *coleffitient I)/colefficient.
les condition ;
moyenne>=14:mention tres bien
12<=moyenne<14;mention bien
10<=moyenne<12;mention passable
moyenne<7;insufissant
question:
on vous demande le programe pascal
es merci beaucoup
A voir également:
- La solution d'un algorithme
- Solution de sauvegarde - Guide
- Algorithme euromillion excel gratuit - Forum Logiciels
- Solution prs chronopost - Forum Mobile
- Ou est charlie le livre magique solution - Forum Loisirs / Divertissements
- Algorithme : toutes les combinaisons possibles dans un tableau de 2 par 7 ✓ - Forum VB / VBA
1 réponse
bonsoir pour ton prebleme tu veux avoir l'algo
j'ai oublié un la programmation en pascal néamoins j'ai quelque chose pour toi
Var n,i:integer;
x :real
coef[1..3] of integer ;
mat[1..3,1..n];
begin
write('saisie de la valeur de n :nbre d'elements');
read (n);
x:=0;
for i:=1 to n do
begin
for j:=1 to 3 do
T[j]:=mat[1..i,i..j];
end
x:=x+T[j];
z:=0;
for i:=1 to 3 do q[i]:= q[i]+z;
moy :=.... faite la suite j'espére que je vous ai un peut aider bonne continuation set puis si t'as un probleme encore detaille un peux plus stp
j'ai oublié un la programmation en pascal néamoins j'ai quelque chose pour toi
Var n,i:integer;
x :real
coef[1..3] of integer ;
mat[1..3,1..n];
begin
write('saisie de la valeur de n :nbre d'elements');
read (n);
x:=0;
for i:=1 to n do
begin
for j:=1 to 3 do
T[j]:=mat[1..i,i..j];
end
x:=x+T[j];
z:=0;
for i:=1 to 3 do q[i]:= q[i]+z;
moy :=.... faite la suite j'espére que je vous ai un peut aider bonne continuation set puis si t'as un probleme encore detaille un peux plus stp
