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

@DimaGG · Регистрация: 23.04.2013

Студворк — интернет-сервис помощи студентам

Дано множество A из N точек с координатами (x,y). Найти наименьший периметр треугольника, вершины которого принадлежат различным точкам множества A, и сами эти точки (точки выводятся в том же порядке, в котором они перечислены при задании множества A).

@Апострофф · 07.10.2013, 21:55

Сообщение от DimaGG

откуда это значение pm=1.79769313486231E308?

Это просто ну ооочень большое число (большее в тип DOUBLE не вмещается

)

@DimaGG · 08.10.2013, 09:39 **[ТС]**

Можно на qbasic? саму программу

echs · 24.06.2016, 19:45

проверено

QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
CLS
RANDOMIZE TIMER
INPUT "N = "; n
DIM x(1 TO n)
DIM y(1 TO n)
 
FOR i = 1 TO n
   x(i) = 90 * RND
   y(i) = 90 * RND
NEXT
 
pmin = 200
 
FOR i = 1 TO n - 2
FOR j = i + 1 TO n - 1
FOR k = j + 1 TO n
   d1 = SQR((x(i) - x(j)) ^ 2 + (y(i) - y(j)) ^ 2)
   d2 = SQR((x(j) - x(k)) ^ 2 + (y(j) - y(k)) ^ 2)
   d3 = SQR((x(k) - x(i)) ^ 2 + (y(k) - y(i)) ^ 2)
   p = d1 + d2 + d3
 
   IF pmin > p THEN
      pmin = p
      imin = i
      jmin = j
      kmin = k
   END IF
NEXT k, j, i
 
PRINT
PRINT x(imin); y(imin)
PRINT x(jmin); y(jmin)
PRINT x(kmin); y(kmin)
PRINT
PRINT "Pmin ="; pmin
END

Новые блоги и статьи Все статьи Все блоги /
Транслитерация текста с кириллицы на латиницу (вариант №2) Maks 13.11.2026 Обновленная версия ранее созданной обработки. Добавлено: - Проверка исходного текста на кириллицу, через обращение к стандартной функции "ТолькоКириллицаВСтроке" из общего модуля. . .	Часы с термометром и праздничным календарем yariko 12.11.2026 Сегодня мы рассмотрим как можно сделать отличные многофункциональные часы. Итак, поставим конкретную задачу: разработать часы с календарем, двумя термодатчиками, выводом поздравительных сообщений. . .	Транслитерация текста с кириллицы на латиницу (вариант №1) Maks 11.11.2026 Решил облегчить жизнь себе и коллегам админам при создании электронных почтовых ящиков для пользователей, в результате написал обработку "Транслитерация текста" с кириллицы на латиницу, а в ней. . .	Книги по геймдизайну, левел-дизайну, игровым механикам и проектированию игрового опыта 8Observer8 08.11.2026 Содержание блога \| English Version 1. 2003 - 06 - Designing Virtual Worlds (1st Edition) Автор: Richard A. Bartle \| Объем: 768 стр. Ссылки: Amazon . . .
Родители токсичные абьюзеры по отношению к своим детям ругают их оскорбляют не любят zorxor 08.11.2026 Жить в атмосфере постоянных оскорблений, критики и холодности со стороны родителей — это тяжелое и болезненное испытание, которое оставляет глубокие эмоциональные раны. Токсичное и абьюзивное. . .	Как только я захожу к себе в свою комнату я сразу же с себя снимаю свои трусы. Ответ от Джемени ИИ. zorxor 08.11.2026 Джемени, как только я захожу к себе в свою комнату я сразу же с себя снимаю свои трусы. Многие люди, возвращаясь домой, сразу переодеваются в максимально свободную одежду или вовсе предпочитают. . .	Паттерн очереди действий/команд (Action / Command Queue). Система очереди действий и кат-сцен с SDL3 Callbacks, cglm и OpenGL 8Observer8 07.11.2026 Содержание блога \| English Version Руководство для начинающих по реализации паттерна очереди действий/ команд (Action / Command Queue) на C++ (C++20) с использованием официального SDL3 Callbacks. . .	Проверка полного ФИО в типовом справочнике Maks 07.11.2026 Решение реализовано в конфигурации КА2, на примере справочника "КонтактныеЛицаПартнеров". Задача: Запрет инициалов. Не допускаеть использование сокращений вида "И. И. ", "И. И. ", "И И" и. . .

@DimaGG 0 / 0 / 1 Регистрация: 23.04.2013 Сообщений: 32

	Найти наименьший периметр треугольника, вершины которого принадлежат различным точкам множества 05.10.2013, 13:16. Показов 4189. Ответов 22 Метки нет (Все метки) Дано множество A из N точек с координатами (x,y). Найти наименьший периметр треугольника, вершины которого принадлежат различным точкам множества A, и сами эти точки (точки выводятся в том же порядке, в котором они перечислены при задании множества A). 0

@DimaGG 0 / 0 / 1 Регистрация: 23.04.2013 Сообщений: 32
	08.10.2013, 09:39 [ТС]
	Можно на qbasic? саму программу 0