Programme Pascal fait une equation 1er Deg.

houssem97621 -  
 delpozo -
Bonjour,

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

1 réponse

  1. 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