Lời giải:
Var a,b,x:real;
begin
write('Nhap so a = ');readln(a);
write('Nhap so b = ');readln(b);
if a = 0 then write('Khong phai phuong trinh bac nhat')
else
begin
x:=-b/a;
write('Phuong trinh co nghiem x = ',x:10:2);
end;
readln;
end.
Gói VIP thi online tại VietJack (chỉ 400k/1 năm học), luyện tập gần 1 triệu câu hỏi có đáp án chi tiết