Viết chương trình Pascal giải phương trình bậc nhất bx+c=0 Help me
2 câu trả lời
program pt;
Uses crt;
Var
b,c:integer;
Begin
Clrscr;
write('Nhap b: '); readln(b);
write('Nhap c: '); readln(c);
if (b=0) and (c=0) then write('Phuong trinh co vo so nghiem');
If (b=0) and (c<>0) then write('Phuong trinh vo nghiem');
If b<>0 then write('Phuong trinh co nghiem la: ',-c/b:5:2);
Readln;
End.
#HNgoc
#Chuc_em_hoc_tot
Câu hỏi trong lớp
Xem thêm
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
