Probleme pascal analyse algorithem pascal

mohmed ben medzerfgsdbhdrtdhjr -  
 x-2216 -
Bonjour,
JE CHERCHE une solution par pascal d equation ax+b=0
Configuration: Windows XP / Internet Explorer 7.0

1 réponse

  1. x-2216
     
    essayez ça:

    program pascal;
    uses wincrt;
    var
    a,b,x:real;

    begin
    write('a=');
    readln(a);
    write('b=');
    readln(b);
    if (a=0) then
    write ('impossible')
    else
    begin
    x:= (-b)/a;
    write('la solution est ',x);
    end;
    end.

    j'espère que ça vous aide;;
    0