8класс
Страница 154 §3.4 номер 7, ГДЗ по информатике за 8 класс к учебнику Босовой
Номер 7. Даны две точки в плоской прямоугольной системе координат. Напишите программу, определяющую, которая из точек находится ближе к началу координат.
program z7;
var
xa, ya, xb, yb: integer;
La, Lb: real;
begin
write('Координаты точки А >');
readln(xa, ya);
write('Координаты точки В>');
readln(xb, yb);
La := sqrt(sqr(xa) + sqr(ya));
Lb := sqrt(sqr(xb) + sqr(yb));
if La > Lb then writeln('В ближе')
else if La < Lb then writeln('А ближе')
else writeln('Точки равноудалены');
end.
