Program GIAI_PHUONG_TRINH_BAC_NHAT;
Var a,b,x:real;

Begin
Clrscr;
Writeln(‘GIAI PHUONG TRINH BAC NHAT: AX + B=0’);
Writeln(‘————————————————————‘);
Write (‘Nhap a: ‘);   readln(a);
Write (‘Nhap b: ‘);   readln(b);
If(a=0) and (b=0) then Writeln(‘ Phuong trinh co vo so nghiem’)

Else
writeln(‘ Phuong trinh vo nghiem’)
Else
Writeln(‘Phuong trinh co nghiem x=’,-b/a:4:2);

Readln;

End.

import math
#Hệ số 
a = float(input("Nhập Hệ Số a: "))
b = float(input("Nhập Hệ Số b: "))
delta = b*b - 4*a
#giải phương trình
if delta < 0:
    print("\nPhương Trình Vô Nghiệm !")
elif delta == 0:
    print("\nPhương Trình Có Nghiệm Kep x1 = x2", -b/(2*a))
else:
    x1 = (-b - math.sqrt(delta))/(2*a)
    x2 = -b/a - x1
    print("\nPhương Trình Có 2 Nghiệm Phân Biệt ")
    print("x1 = ",x1, "x2 = ", x2)