Question

Viết chương trình giải phương trình ax+b=0 (các hệ số a,b đc nhận từ bàn phím)?

Answer 1

http://ambn.vn/faq/3653-Viet-chuong-trinh-giai-phuong-trinh-ax-+-b-=-0.-Cac-he-so-a,-b-duoc-nhap-tu-ban-phim.html

bn vào đây tham khảo nhé

Answer 2

uses crt;

var a,b:real;

begin clrscr;

write('a=');readln(a);

write('b=');readln(b);

if b<>0 then begin

if a<>0 then write(-b/a:8:2) else write('vo nghiem');end

else begin

if a<>0 then write('0') else write('vo so nghiem');end;

readln;

end.

Answer 3

var a,b:real;

begin

write(' Giai phuong trinh ax+b=0 ');

write('a=');readln(a);

write('b=');readln(b);

if a<>0 then writeln(' Phuong trinh ',a:0:0,'x +',b:0:0,'=0',' co nghiem x= ',-b/a:0:3);

if (a=0) and (b=0) then writeln(' Phuong trinh vo so nghiem ');

if (a=0) and (b><0) then writeln(' Phuong trinh vo nghiem ');

readln;

end.

mik làm theo cách cùi nhé