
Предмет: Информатика
ГДЗ Учебник по Информатике 9 класс БосоваНапишите функцию, вычисляющую длину отрезка по координатам его концов
ЧАТ-БОТ: ГДЗ с нейронкой
§ 1.2 Запись вспомогательных алгоритмов на языке Паскаль
Задание 9. Напишите функцию, вычисляющую длину отрезка по координатам его концов. Напишите программу, вычисляющую периметр треугольника по координатам его вершин с помощью этой функции.
Вот пример программы на Паскале, которая вычисляет длину отрезка по координатам его концов, а затем использует эту функцию для вычисления периметра треугольника по координатам его вершин:
program Zadacha9;
function Distance(x1, y1, x2, y2: Real): Real;
begin
Distance := Sqrt(Sqr(x2 - x1) + Sqr(y2 - y1));
end;
var
x1, y1, x2, y2, x3, y3: Real;
side1, side2, side3, perimeter: Real;
begin
Write('Введите координаты первой вершины (x1, y1): ');
ReadLn(x1, y1);
Write('Введите координаты второй вершины (x2, y2): ');
ReadLn(x2, y2);
Write('Введите координаты третьей вершины (x3, y3): ');
ReadLn(x3, y3);
side1 := Distance(x1, y1, x2, y2);
side2 := Distance(x2, y2, x3, y3);
side3 := Distance(x3, y3, x1, y1);
perimeter := side1 + side2 + side3;
WriteLn('Периметр треугольника равен ', perimeter:0:2);
end.
Пример программы на языке Python:
import math
def distance(x1: float, y1: float, x2: float, y2: float) -> float:
return math.sqrt((x2 - x1) ** 2 + (y2 - y1) ** 2)
# Основная часть программы
x1, y1 = map(float, input('Введите координаты первой вершины (x1, y1): ').split())
x2, y2 = map(float, input('Введите координаты второй вершины (x2, y2): ').split())
x3, y3 = map(float, input('Введите координаты третьей вершины (x3, y3): ').split())
side1 = distance(x1, y1, x2, y2)
side2 = distance(x2, y2, x3, y3)
side3 = distance(x3, y3, x1, y1)
perimeter = side1 + side2 + side3
print(f'Периметр треугольника равен {perimeter:.2f}')