Пожаааалуйста, помогите(только не из интернета брать, там не правильно).
Даны две точки А(х1,у1) и В(х2,у2). Составить алгоритм, определяющий, которая из точек находится ближе к точке (2,5).(Паскаль).
More Questions From This User See All
Пожаааалуйста, помогите(только не из интернета брать, там не правильно).
Даны две точки А(х1,у1) и В(х2,у2). Составить алгоритм, определяющий, которая из точек находится ближе к точке (2,5).(Паскаль).
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Verified answer
const
y = 5;
x = 2;
var
x1,x2,y1,y2:integer;
begin
write('x1 = '); readln(x1);
write('y1 = '); readln(y1);
write('x2 = '); readln(x2);
write('y2 = '); readln(y2);
if sqrt( (x1-x) * (x1-x) + (y1 - y) * (y1 - y)) < sqrt( (x2-x) * (x2-x) + (y2 - y) * (y2 - y)) then
writeln('A ближе')
else
if sqrt( (x1-x) * (x1-x) + (y1 - y) * (y1 - y)) > sqrt( (x2-x) * (x2-x) + (y2 - y) * (y2 - y)) then
writeln('B ближе')
else
writeln('Они на одинковом расстоянии');
readln;
end.