Viết chương trình tính khoảng cách giữa hai điểm A(A1;a2) ,B(b1;b2) với A1,,a2,b1,b2 là các số nguyên
1 câu trả lời
program kaito;
uses crt;
var a1, a2, b1, b2, d: integer;
begin
clrscr;
write('Nhap a1: '); readln(a1);
write('Nhap a2: '); readln(a2);
write('Nhap b1: '); readln(b1);
write('Nhap b2: '); readln(b2);
d:=sqrt(sqr(a1-a2)+sqr(b1-b2));
writeln('Khoang cach giua hai diem A va B la: ',d);
readln
end.
Câu hỏi trong lớp
Xem thêm
