Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.56/18: Рейтинг темы: голосов - 18, средняя оценка - 4.56
0 / 0 / 0
Регистрация: 26.10.2014
Сообщений: 22

Сколькими способами можно составить треугольник?

01.11.2014, 20:06. Показов 3907. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Дан набор из N отрезков различной длины. Сколькими способами можно выбрать из этих отрезков три, из которых можно составить (невырожденный) треугольник?
Входные данные

Сначала вводится количество отрезков, затем длины этих отрезков (еще N чисел).
Выходные данные

Программа должна вывести одно число - искомое количество способов.

Примеры
Входные данные:
4
1 3 2 4
Выходные данные:
1
(комментарий:Дано 4 отрезка с длинами 1, 2, 3 и 4. Из них можно составить единственный треугольник со сторонами 2, 3, 4. Другие тройки не удовлетворяют неравенству треугольника: 1+2=3, 1+3=4, 1+2<4)

Входные данные:
3
10 100 1000
Выходные данные:
0

Ограничения:
Количество отрезков - не менее 3 и не более 20. Длина каждого отрезка - натуральное число, не превосходящее 1000. Все отрезки имеют разную длину.
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
01.11.2014, 20:06
Ответы с готовыми решениями:

Сколькими способами можно разложить число на слагаемые
Лесенка Лесенкой называется набор кубиков, в котором каждый более верхний слой содержит кубиков меньше, чем предыдущий. Требуется...

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

Сколькими способами можно разложить число на простые множители?
Разложение на простые множители числа 12 можно записать тремя способами: 12=223=232=322 А сколькими способами можно записать...

1
Почетный модератор
 Аватар для Puporev
64314 / 47610 / 32743
Регистрация: 18.05.2008
Сообщений: 115,168
01.11.2014, 20:46
Лучший ответ Сообщение было отмечено nasutka15 как решение

Решение

Pascal
1
2
3
4
5
kol:=0;
for i:=1 to n-2 do
for j:=i+1 to n-1 do
for k:=j+1 to n do
if (abs(a[i]-a[j])<a[k])and(a[i]+a[j]>a[k]) then inc(kol)
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
01.11.2014, 20:46
Помогаю со студенческими работами здесь

Опиределить, сколькими способами можно разделить массив (объединение кодов)
Ребят, пожалуйста, помогите, нужно объеденить оба кода в одну задачу: 1)Массив из J элементов размещают по Z различным ячейкам....

Сколькими способами можно купить ровно N кг мастики, не вскрывая ящики
В магазине продается мастика в ящиках по a кг (тип 1), b кг (тип 2) и c кг (тип 3). Как купить ровно N кг мастики, не вскрывая ящики?...

Сколькими способами можно выдать один рубль, имея монеты разных номиналов
У Вас есть монеты номиналом 1, 2, 5, 10, 25 та 50 копеек в бесконечном количестве. Сколькими способами можно выдать один рубль?

Размещение. Сколькими способами можно разместить на двух местах двух из четырёх гостей
Сколькими способами можно выбрать и разместить на двух местах 1,2 двух из четырёх гостей А,Б,В,Г?

Как можно составить программу треугольник паскаля
составить программу треугольник Паскал


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
моя боль
iceja 24.01.2026
Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .
Модель сукцессии микоризы
anaschu 24.01.2026
Решили писать научную статью с неким РОманом
http://iceja.net/ математические сервисы
iceja 20.01.2026
Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .
http://iceja.net/ сервер решения полиномов
iceja 18.01.2026
Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .
Расчёт переходных процессов в цепи постоянного тока
igorrr37 16.01.2026
/ * Дана цепь(не выше 3-го порядка) постоянного тока с элементами R, L, C, k(ключ), U, E, J. Программа находит переходные токи и напряжения на элементах схемы классическим методом(1 и 2 з-ны. . .
Восстановить юзерскрипты Greasemonkey из бэкапа браузера
damix 15.01.2026
Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .
Сукцессия микоризы: основная теория в виде двух уравнений.
anaschu 11.01.2026
https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/
WordPad для Windows 11
Jel 10.01.2026
WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru