BÀI TẬP PASCAL SỬ DỤNG CẤU TRÚC RẼ NHÁNH Bài toán: Cho phương trình đường tròn (C) / ((x - a) ^ 2) + (y - b) ^ 2 = R ^ 2 , với tâm của đường tròn I(a;b) và bán kính R được nhập từ bàn phím. Hãy viết chương trình kiểm tra xem điểm M(x; y) có thuộc đường tròn hay không?
1 câu trả lời
uses crt;
var x, y, a, b, R : integer;
begin
clrscr;
write('Nhap toa do tam I : '); readln(a, b);
write('Nhap toa do diem M : '); readln(x, y);
write('Nhap ban kinhh R : '); readln(r);
if sqrt(sqr(x - a) + sqr(y - b)) = R then
writeln('Diem M thuoc duong tron')
else writeln('Diem M khong thuoc duong tron');
readln
end.
Câu hỏi trong lớp
Xem thêm
