Задание 4 Параграф 4.4 ГДЗ Босова 8 класс 2023 (Информатика)
4. Две точки на плоскости заданы своими координатами. Разработайте, отладьте и протестируйте программу, определяющую, которая из точек находится ближе к началу координат.

Ниже вариант решения задания из учебника Босова, Босова 8 класс, Бином:
4. Две точки на плоскости заданы своими координатами. Разработайте, отладьте и протестируйте программу, определяющую, которая из точек находится ближе к началу координат. Для проверки правильности программы используйте тест:
Входные данные
Координаты 1-й точки»1 2 Координаты 2-й точки > > 3 4
Координаты 1-й точки»1 2 Координаты 2-й точки > > 1
Координаты 1-й точки»2 4 Координаты 2-й точки > > 2 2
Выходные данные
1-я точка ближе
Точки равноудалены
2-я точка ближе
var
xa, ya, xb, yb: integer;
d1, d2: real;
begin
write(taskКоординаты 1-ой точки > > task);
readln(xa, ya);
write(taskКоординаты 2-ой точки > > task);
readln(xb, yb);
d1 := sqrt(sqr(xa) + sqr(ya));
d2 := sqrt(sqr(xb) + sqr(yb));
if d1 = d2 then writeln(taskТочки равноудаленыtask)
else if d1
else writeln(task2-я точка ближеtask);
end.
Окно вывода
Координаты 1-ой точки > > 1 2
Координаты 2-ой точки > > 3 4
1-я точка ближе
Координаты 1-ой точки > > 1 2
Координаты 2-ой точки > > 2 1
Точки равноудалены
Координаты 1-ой точки > > 2 4
Координаты 2-ой точки > > 2 2
2-я точка ближе
