Информатика: Напишите,,программу на питоне. буду

Напишите,,программу на питоне. буду

👇

Увидеть ответ

Открыть все ответы

Ответ:

aleksandrovaolp08qrl

17.06.2022

1 Для удобство содержания

2 Гиперссылка— часть гипертекстового документа, ссылающаяся на элемент в этом документе

3-4 Чтобы сделать гиперссылку на страницу или файл в интернете, выделяете текст или картинку, которые потом станут кликабельны, и в верхнем меню выбираете последовательно Вставка - Ссылки - Гиперссылка (или нажимаете на выделенный текст или картинку правой кнопкой мыши, и в выпадающем меню выбираете пункт Гиперссылка).

Далее в окошке "Вставка гиперссылки" заполняете поля:

"Связать с" - выбираете Файл, Веб-страница

"Адрес" - вставляете ссылку на страницу или файл.

Нажимаете ОК и готово!

5 Итак, чтобы сделать оглавление в ворде автоматически, нужно сначала разбить документ на разделы с заголовками, а потом перейти во вкладку "Главная" - "Стили". К названиям разделов, которые требуется внести в содержание, примените соответствующие стили. Например, для названий разделов можно применить «Заголовок 1», а для подразделов «Заголовок 2».

6 А́вторское пра́во — институт гражданского права, регулирующий правоотношения, связанные с созданием и использованием

7 Плагиа́т — умышленно совершаемое физическим лицом незаконное использование или распоряжение охраняемыми результатами чужого творческого труда

Объяснение:

4,7(95 оценок)

Ответ:

sksool0360figf

17.06.2022

Function Otr(Ax, Ay, Bx, By: real): real;
begin
Otr := sqrt(sqr(Ax - Bx) + sqr(Ay - By))
end;

function Perim(Ax, Ay, Bx, By, Cx, Cy: real): real;
begin
Perim := Otr(Ax, Ay, Bx, By) + Otr(Bx, By, Cx, Cy) + Otr(aX, aY, Cx, Cy);
end;

function Area(Ax, Ay, Bx, By, Cx, Cy: real): real;
var
pp: real;
begin
pp := Perim(Ax, Ay, Bx, By, Cx, Cy) / 2;
Area := sqrt(pp * (pp - Otr(Ax, Ay, Bx, By)) * (pp - Otr(Bx, By, Cx, Cy)) *
(pp - Otr(Ax, Ay, Cx, Cy)))
end;

procedure Dist(Px, Py, Ax, Ay, Bx, By: real; var D: real);
begin
D := 2 * Area(Px, Py, Ax, Ay, Bx, By) / Otr(Ax, Ay, Bx, By)
end;

var
Px, Py, Ax, Ay, Bx, By, Cx, Cy: real;
d: real;

begin
writeln('Вводите координаты точкек парами чисел: ');
write('P-> ');
readln(Px, Py);
write('A-> ');
readln(Ax, Ay);
write('B-> ');
readln(Bx, By);
write('C-> ');
readln(Cx, Cy);
writeln;
Dist(Px, Py, Ax, Ay, Bx, By, d);
writeln('Расстояние от Р до АВ равно ', d);
Dist(Px, Py, Cx, Cy, Bx, By, d);
writeln('Расстояние от Р до ВC равно ', d);
Dist(Px, Py, Ax, Ay, Cx, Cy, d);
writeln('Расстояние от Р до АC равно ', d)
end.

Тестовое решение:
Вводите координаты точкек парами чисел:
P-> -3 6
A-> 5 8
B-> 9 -4
C-> 8 -2.5

Расстояние от Р до АВ равно 8.22192191643778
Расстояние от Р до ВC равно 4.43760156980184
Расстояние от Р до АC равно 8.24163383692135

4,5(74 оценок)

Это интересно:

04.05.2023

Как выглядеть как Ария Монтгомери...

Компьютеры-и-электроника

17.02.2021

Как начать читать и писать на Leet: история, основы и особенности языка...

Хобби-и-рукоделие

19.01.2023

Как сделать клубнику оригами: подробный гайд с шаг за шагом...

Мир-работы

18.12.2022