Giải pt bậc nhất

[duyandmichael]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

Nhập vào chương trình Pascal để giải phương trình bậc nhất! Viết giùm mình chương trình luôn nhé!

 

[kool_boy_98]

Program Pt1; 
Var a, b, x: integer; 
Begin 
Write(‘Nhap he so a,b: ‘);readln(a,b); 
If a<>0 then write(‘Phuong trinh co mot nghiem x = ‘,-b/a) else 
b<>0 then write(‘Phuong trinh vo dinh.’) else 
write(‘Phuong trinh co vo so nghiem.’); 
readln 
end.

_____________
Chúc bạn học tốt!