Programme Pascal fait une equation 1er Deg.

Fermé
houssem97621 - Modifié par houssem97621 le 4/04/2011 à 14:04
 delpozo - 4 avril 2011 à 16:40
Bonjour,

Comment faire un Programme Pascal qui calcule une equation du 1er Degrée
Merci

A voir également:

1 réponse

Program equa1;
uses wincrt;
var
a,b,x:real;
Begin
Write('A=');
Readln(a);
Write('B=');
Readln(b);
If a<>0 then
Begin
x:=-b/a;
Write('X=',x:0:2);
End
Else If b=0 then
Write('Ensemble IR')
Else
Write('Impossible');
End.
0