Programmation
Résolu/Fermé
loujaine
-
11 août 2009 à 14:56
loujaine221 Messages postés 6 Date d'inscription mardi 11 août 2009 Statut Membre Dernière intervention 12 août 2009 - 12 août 2009 à 15:49
loujaine221 Messages postés 6 Date d'inscription mardi 11 août 2009 Statut Membre Dernière intervention 12 août 2009 - 12 août 2009 à 15:49
A voir également:
- Programmation
- Programmation - Guide
- Application de programmation - Guide
- Programmation logo tortue télécharger - Télécharger - Études & Formations
- Programmation binaire - Guide
- Logiciel algorithme programmation - Télécharger - Édition & Programmation
4 réponses
Mthematiquement la resolution de l equation est comme suit:
Ax+C=0
Ax=-C
x=-C/A
une condition necessaire c est A devrait etre different de zéro
donc l algoritme pour ce programme :
-------------------------------------------------------
NomProgramme: equation1deg;
les variables sont A,C:reelles à lire
la solution x :reelle à déduire
debut
ecrire("donner la valeur de A");
lire la valeur et stockez la dans (A);
ecrire("donner la valeur de C");
lire la valeur et stockez la dans (C);
si a=0 alors
ecrire(impossible)
sinon
ecrire ("la solution est :",(-C/A));
fin
---------------------------------------------------------
en pascal c est comme ca
program equat1deg;
var
A,C:real;
begin
writeln('donner la valeur de A');
readln(A);
writeln('donner la valeur de C');
readln(C);
if A=0 then
writeln('impossible')
Else
writeln('la solution est :',(-C/A));
end.
Ax+C=0
Ax=-C
x=-C/A
une condition necessaire c est A devrait etre different de zéro
donc l algoritme pour ce programme :
-------------------------------------------------------
NomProgramme: equation1deg;
les variables sont A,C:reelles à lire
la solution x :reelle à déduire
debut
ecrire("donner la valeur de A");
lire la valeur et stockez la dans (A);
ecrire("donner la valeur de C");
lire la valeur et stockez la dans (C);
si a=0 alors
ecrire(impossible)
sinon
ecrire ("la solution est :",(-C/A));
fin
---------------------------------------------------------
en pascal c est comme ca
program equat1deg;
var
A,C:real;
begin
writeln('donner la valeur de A');
readln(A);
writeln('donner la valeur de C');
readln(C);
if A=0 then
writeln('impossible')
Else
writeln('la solution est :',(-C/A));
end.
le_phoenix
Messages postés
2
Date d'inscription
lundi 10 août 2009
Statut
Membre
Dernière intervention
12 août 2009
1
11 août 2009 à 23:56
11 août 2009 à 23:56
la solution proposée par Neyzak est interessante. cependant, je prendrais en considération le cas ou A = 0 et C = 0; dans ce cas, X = un nombre qu'on veux dan C.
Char Snipeur
Messages postés
9696
Date d'inscription
vendredi 23 avril 2004
Statut
Contributeur
Dernière intervention
3 octobre 2023
1 297
11 août 2009 à 15:04
11 août 2009 à 15:04
Toi tu es du genre à tué une mouche à la DCA ?
Pas besoin de faire un programme pour si peu ! Il suffit de savoir diviser C par A !
Un truc que tu peux faire en shell...
Pas besoin de faire un programme pour si peu ! Il suffit de savoir diviser C par A !
Un truc que tu peux faire en shell...
12 août 2009 à 15:49