Mình cần nộp gấp lắm . Chiều nay là mình cần rồi (4-10-07).Giúp mình đi huhu

**huyenvt** · 04-11-2007 06:20

Giải và biện luận hệ phương trình tuyến tính
{ax+by=m
cx+dy=n
Với các hệ số a,b,c,d,m,n là các số nguyên được nhập từ bàn phím.
Nhớ giải luôn . Giải theo cánh lớp 9 đó nha.Mình mới học lớp 9 thôi

**m2mpro** · 04-11-2007 07:20

Vậy là bạn cũng đang hcoj bồi dưỡng à. Tui cũng vậy, có gì giúp đỡ hén, mà bạn ở đâu vậy, tui ở trên quận 12.

**m2mpro** · 04-11-2007 07:22

Nó bắt nhập cả x và y thế hai cái x,y có cần nhập từ bàn phìm không. Cái này bạn dùng mấy cái dòng readln thôi mà.

**doremon_No1** · 04-11-2007 07:36

Các bạn định thi vào chuyên tin à?
Theo tui thì :
y:=(n-c*m)/(a*d-b);
x:=(m-b*y)/a;

**huyenvt** · 04-11-2007 07:40

Các bạn hãy viết chương trình và biện luận dề như trên . MÌnh cũng chả biết nữa các bạn có ai biết thì giải ngay luôn cho mình .Nếu mình ko hiểu chỗ nào mình sẽ hỏi lại các bạn

**doremon_No1** · 04-11-2007 07:42

Thử chương trình này coi nó chạy được ko nha.
Mình viết chứ chưa text. Pascal bị hư rồi.
var a,b,c,d,n,m:integer;
x,y:real;
begin write('nhap a,b,c,d,m,n'); readln(a,b,c,d,m,n);
if (a*d-b)=0 then writeln('pt vo nghiem')
else begin y:=(n-c*m)/(a*d-b);
x:=(m-b*y)/a;
end;
writeln('x= 'x:10:2);
writeln('y= 'y:10:2);
readln;
end.

**huyenvt** · 04-11-2007 07:47

cô mình giảng thế này này
DD=ad-cb
DX-md-nb
DY-an-cm
x=DX/DY
y=DY/DD
If DD=0 then
If(DX=o)and(DY=o)then write('VSN');
Else
Else
Nhưng mà mình chả hiểu gì cả