Bước 1 : nhập a,b ;
Bước 2: xét a,nếu a<>0 thì đến bước 3
Nếu a= 0 xét b
Nếu b= 0 thì thì đi phương trình vô số nghiệm
Nếu b<>0 thì phương trình vô nghiệm
Bước 3 : nghiệm x=-b/a khi a<>0
Bước 4: kết luận
Bước 5: kết thúc chương trình
Bài làm
Program giaiohuongtrinh;
Uses crt;
Var a,b,x : integer ;
Begin
Write(' nhap haang so a',a);
Readln(a)
Write( ' nhap so b',b)
Readln(b)
If a<> 0 then
x:= -b/a;
Write( ' phuong trinh co nghiem la x =',x);
Readln(x)
If a=0 then
If b= 0 then
Write( ' phuobg trinh vo so nghiem')
Else writeln( ' phuong trinh vo nghiem');
Readln
End.
