Tin học cấu trúc rẽ nhánh

[Lê Anh Đức 11c4]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

XÉT 3 ĐIỂM P,Q,R NẰM TRÊN TRỤC HOÀNH CỦA MỘT HỆ TRỤC TỌA ĐỘ VUÔNG GÓC, CÓ HOÀNH ĐỘ TƯƠNG ỨNG LẦN LƯỢT LÀ X,Y,Z . GIẢ SỬ Y<Z. VIẾT CÂU LỆNH RẼ NHÁNH ĐỂ ĐIỂM Q NẰM GIỮA 2 ĐIỂM P VÀ R THÌ THÔNG BÁO RA MÀN HÌNH
AI GIÚP MÌNH VỚI Ạ, MÌNH XIN CẢM ƠN.
MAI MÌNH KIỂM TRA RỒI
HELP ME <3

 

[Tạ Đặng Vĩnh Phúc]

Bạn viết một hàm tính khoảng cách giữa 2 điểm A (x, y, z) và B (x,y,z)
function distance (xA, yA, zA, xB, yB, zB : double): double;
begin
exit (sqrt (sqr (xA - xB) + sqr (yA - yB) + sqr (zA - zB)));
end;

bạn cần đi kiểm tra: QP + QR = PR thì tự nhiên Q sẽ nằm giữa P, R
code chính:
if abs (distance (xP, yP, zP, xQ, yQ, zQ) + (xR, yR,zR,xQ,yQ,zQ) - distance(xR,yR,zR,xP,yP,zB)) < 1E-6 then
write ('Q nam giua P va R') else write ('Q KHONG nam giua P va R');