équation ax+b=0

Aller en bas

équation ax+b=0

Message  Admin le Lun 7 Mar - 0:51

ÉNONCÉ
Ecrire un algorithme du programme intitulé DEGRE_1, qui résout dans R une équation du premier degré à une inconnue x réelle de la forme :
ax+b=0

PASCAL

program degre1;
uses wincrt;
var a,b,x:INTEGER;
begin
write('entrer la valeur de a:');
readln(a);
write('entrer la valeur de b:');
readln(b);
if a=0 then if b=0 then write('solution=R')
else write('la solution est le vide')
else write('solution=',-b/a)
end.

Admin
Admin

Messages : 137
Date d'inscription : 29/12/2010

Voir le profil de l'utilisateur http://aidescolaire.yoo7.com

Revenir en haut Aller en bas

Revenir en haut

- Sujets similaires

 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum