Hic sắp thi giữa học kỳ mà bà cô cho pt trùng phương =.= ai giúp tớ giải bài nài với ghi rõ còng6 thức cách giãi bài giãi giùm tớ nha hic hic cám ơn nhiều tớ đau đầu wá
p/s càng sớmcàng tốt chiều mai kt rùi :D dùng pascal nha
Printable View
Hic sắp thi giữa học kỳ mà bà cô cho pt trùng phương =.= ai giúp tớ giải bài nài với ghi rõ còng6 thức cách giãi bài giãi giùm tớ nha hic hic cám ơn nhiều tớ đau đầu wá
p/s càng sớmcàng tốt chiều mai kt rùi :D dùng pascal nha
Hehe, hình như cái này cũng hok khó lắm. Để lục lại đống sách cũ coi sao !
[=========> Bổ sung bài viết <=========]
À, theo như toán học suy ra thì đầu tiên là đặt 1 ẩn phụ
Sau đó giải bài toán trùnh phuơng với bậc x giảm đi 1 nữa (phương trình bậc II) rồi xét điều kiện nhận giá trị >=0 theo đúng đk.Code:k=x*x, đk k>=0
- Nếu là 2 nghiệm duơng phân biệt thì phương trình chính sẽ có 4 nghiệm đối xứng : chồng căn thêm +- trước 2 nghiệm duơng đó. Nếu có 2 nghiêm âm thì vô nghiệm, làm cái thông báo. Nếu có 1 nghiêm duơng, 1 nghiệm âm thì chỉ lấy nghiêm duơng, rồi chồng căn thêm +- thành ra 2 nghiêm cho phuơng trình chính. Nếu là nghiệm kép duơng thì chỉ cũng chỉ có 2 nghiệm, còn nghiêm kép âm thì xem như vô nghiệm.
Xong òy, giờ thì bác có thể tự viết ra bằng pascal rùi đó
thấtu75 thì như vậy tui hiễu rõ lắm rùi nhưng khi làm thì nó cứ báo lỗi từa lưa hoặc nó ra nghiệm sai be bét =.= ai làm lun bài giải cho mình đi =.=
nói chung bạn cws đưa ra cách giải của bạn để mọi người xem thử
--> nhân tiện luôn, ai có thể cho mình biết tin học ứng dụng vào những việc gì, mình chỉ biết một vài cái à, nhưng mà cô giáo bắt phải kể hơn 10 cái cơ, đau khổ quá. cảm ơn trước
Đây là chương trình Giải PT trùng phương.E tham khảo nhé.
Chúc e học tốt.Code:
program gpt_tp ;
uses crt ;
var a,b,c : integer ;
x,x1,x2,D : real ;
begin
clrscr;
writeln(' nhap vao he so cua phuong trinh ');
write('a = '); readln(a);
write('b = '); readln(b);
write('c = '); readln(c);
if a=0 then
if b = 0 then
begin
if c=0 then
writeln(' phuong trinh co vo so nghiem ')
else
writeln(' phuong trinh vo nghiem ');
end
else
begin
if c=0 then
writeln(' phuong trinh co nghiem x = 0')
else
x := -c/b ;
if (-c/b)>0 then
begin
writeln('nghiem thu nhat x = ', sqrt(-c/b):9:3);
writeln('nghiem thu hai x = ',-sqrt(-c/b):9:3);
end;
if (-c/b)<0 then
writeln('phuong trinh vo nghiem ');
end
else
begin
D := b*b - 4*a*c ;
if D<0 then
writeln('phuong trinh vo nghiem');
if D=0 then
begin
x:=(-b/2*a);
if (-b/2*a)>0 then
begin
writeln(' nghiem thu nhat x = ', sqrt(x):9:3);
writeln(' nghiem thu hai x = ',-sqrt(x):9:3);
end;
if (-b/2*a)<0 then
writeln(' phuong trinh vo nghiem ');
end;
if D>0 then
begin
x1 := (-b - sqrt(D))/2*a ;
x2 := (-b + sqrt(D))/2*a ;
if ( x1>0 ) and ( x2>0 ) then
begin
writeln(' nghiem thu nhat x = ', sqrt(x1):9:3);
writeln(' nghiem thu hai x = ',-sqrt(x1):9:3);
writeln(' nghiem thu ba x = ', sqrt(x2):9:3);
writeln(' nghiem thu tu x = ',-sqrt(x1):9:3);
end;
if (x1<0) and (x2<0 ) then
writeln('phuong trinh vo nghiem ');
if (x1>0) and (x2<0 ) then
begin
writeln(' nghiem thu nhat x = ', sqrt(x1):9:3);
writeln(' nghiem thu hai x = ',-sqrt(x1):9:3);
end;
if (x1<0) and (x2>0) then
begin
writeln(' nghiem thu nhat x = ', sqrt(x2):9:3);
writeln(' nghiem thu hai x = ',-sqrt(x2):9:3);
end;
end;
end;
readln;
end.
em mún biết làm sao để viết chương trình giải phương trình trùng phương bằng chương trình con?
cho cái đoạn:
vào chương trình conCode:if a = 0 then
...
end;
PHP Code:
procedure giaipt(var a:integer,var b:integer,var c:integer)
begin
//cho cái đoạn trên vào đây
end;