Programme Pascal fait une equation 1er Deg.

houssem97621 -  
 delpozo -
Bonjour,

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

A voir également:

1 réponse

delpozo
 
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