Chào các bạn! Vì nhiều lý do từ nay Truyen2U chính thức đổi tên là Truyen247.Pro. Mong các bạn tiếp tục ủng hộ truy cập tên miền mới này nhé! Mãi yêu... ♥

hoang bai 1 - pascal

program giaihept;

uses crt;

var a,b,c,d,e,f,dx,dy, dt: real;

begin

clrscr;

write('nhap vao so a,b,c'); readln(a,b,c);

write('nhap vao so d,e,f'); readln(d,e,f);

dt:= a*e - d*b;

dx:=c*e- b*f;

dy:=a*f-c*d;

if dt= 0 then write('he phuong trinh da cho vo nghiem')

else

begin

writeln('x= ',dx/dt:7:2);

writeln('y= ', dy/dt:7:2);

end;

readln;

end.

Bạn đang đọc truyện trên: Truyen247.Pro

Tags: