đề: viết chương chình tính độ dài đoạn thẳng AB, biết tọa độ hai điểm A(xa,ya) và B(xb,yb). Em viết nhưng toàn kêu lỗi có ai giúp em đc k,thanks!
var AB,xa,xb,ya,yb,,C,x,y:real;
begin
read(xa,xb,ya,yb,x,y);
AB:=(xb-xa,yb-ya);
C:=(yb-ya,xa-xb);
0:=(x-xa)*(yb-ya)-(y-ya)*(xa-xb);
write(giúp em điền cái này)
END.
var AB,xa,xb,ya,yb,,C,x,y:real;
begin
read(xa,xb,ya,yb,x,y);
AB:=(xb-xa,yb-ya);
C:=(yb-ya,xa-xb);
0:=(x-xa)*(yb-ya)-(y-ya)*(xa-xb);
write(giúp em điền cái này)
END.