Câu hỏi:
Giúp em bài tập về nhà Tổng hợp lớp 11 câu hỏi như sau: Viet chuong trinh pascal giai phuong trinh ax+b=0
Trả lời 2:
Gia Sư Hoàng Khang gữi câu trả lời dành cho bạn:
uses crt;
var a, b : integer;
begin
clrscr;
write(‘Nhap he so a, b = ‘); readln(a, b);
if (a = 0) and (b = 0) then write(‘PT vo so nghiem’);
if (a = 0) and (b <> 0) then write(‘PT vo nghiem’);
if a <> 0 then write(‘Nghiem x = ‘, -b / a : 2 : 2);
readln
end.
Trả lời 1:
Gia Sư Hoàng Khang gữi câu trả lời dành cho bạn:
Program GIAI_PHUONG_TRINH_BAC_NHAT;
Uses crt;
Var a,b,x: real;
BEGIN
Clrscr;
Writeln(‘GIAI PHUONG TRINH BAC NHAT: AX + B=0’);
Writeln(‘Nhap a = ‘); readln(a);
Writeln(‘Nhap b= ‘); readln(b);
If a=0 then If(b=0) then Writeln(‘ Phuong trinh co vo so nghiem’)
Else writeln(‘ Phuong tring vo nghiem’)
Else Writeln(‘Phuong trinh co nghiem x=’,-b/a: 4: 2);
Readln;
END.
