tìm nghiệm của phương trình bậc nhất dạng bx+c=0

tìm nghiệm của phương trình bậc nhất dạng bx+c=0

0 bình luận về “tìm nghiệm của phương trình bậc nhất dạng bx+c=0”

  1. uses crt;

    var b,c: integer;

    begin

    clrscr;

    write(‘Nhap b: ‘);readln(b);

    write(‘Nhap c: ‘);readln(c);

    If (b=0) and (c<>o) then writeln(‘Phuong trinh vo nghiem’);

    If (b=0) and (c=0) then writeln(‘Phuong trinh co vo so nghiem’);

    If (b<>0) and(c<>0) then writeln(‘Phuong trinh co nghiem x=’,(-b)/a);

    writeln(‘Vay nghiem cua phuong trinh la’,x);

    readln

    end.

    Bình luận

Viết một bình luận