Напишите программу в пайтон, для следующей задачи. На плоскости заданы три точки со своими координатами.
Найти длины сторон треугольника,которые они образовали.

260

296

Посмотреть ответы 2

Ответы на вопрос:

578fyvhjj

Информатика

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

Объяснение:

x1, y1, x2, y2, x3, y3 = map(int, input().split())

print(((x1 - x2) ** 2 + (y1 - y2) ** 2) ** 0.5)

print(((x1 - x3) ** 2 + (y1 - y3) ** 2) ** 0.5)

print(((x3 - x2) ** 2 + (y3 - y2) ** 2) ** 0.5)

manokhaangel

Информатика

4,8(29 оценок)

Const n = 10; var a, b, c: array[1..n] of integer; i, j, kb, kc, t: integer; begin randomize; writeln('исходный массив'); kb : = 0; kc : = 0; for i : = 1 to n do begin a[i] : = random(101) - 50; write(a[i]: 4); if a[i] < 0 then begin inc(kb); b[kb] : = a[i] end else begin inc(kc); c[kc] : = a[i] end end; writeln; { теперь массив b содержит элементы, с - остальные } for i : = 1 to kb - 1 do for j : = 1 to kb - 1 do if b[j] > b[j + 1] then begin t : = b[j]; b[j] : = b[j + 1]; b[j + 1] : = t end; { сливаем массивы b и c в массив а} i : = 0; for j : = 1 to kb do begin i : = i + 1; a[i] : = b[j] end; for j : = 1 to kc do begin i : = i + 1; a[i] : = c[j] end; writeln('результирующий массив'); for i : = 1 to n do write(a[i]: 4); writeln end. тестовое решение: исходный массив -32 -8 43 -24 8 -45 -13 40 17 46 результирующий массив -45 -32 -24 -13 -8 43 8 40 17 46