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

@Juli2106 · Регистрация: 11.01.2012

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

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

3 0
10 100 1000
Ограничения
Количество отрезков -не менее 3 и не более 20. Длина каждого отрезка-натуральное число,не превосходящее 1000.Все отрезки имеют разную длину.

Программу надо решить в QBasic.
Заранее спасибо.

@кот Бегемот · 18.01.2012, 20:28

А в курсе, что олимпиадные задачи здесь не решают? Нехорошо чужими мозгами преимущества завоёвывать

Добавлено через 55 секунд
PS

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

Программу надо решить в QBasic.

Решить программу? Это круто.

@Juli2106 · 18.01.2012, 20:41 **[ТС]**

Я не знала,что это олимпиадная задача.Нам задали её решить в классе

Добавлено через 1 минуту
Quick Basic

Добавлено через 11 минут
описалась,решить задачу

@кот Бегемот · 18.01.2012, 20:53

PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
OPEN "input.txt" FOR INPUT AS #1
INPUT #1, n
DIM a(n)
FOR i = 1 TO n
INPUT #1,a(i)
NEXT
CLOSE
FOR i = 1 TO n
FOR j = i + 1 TO n
FOR k = j + 1 TO n
IF a(i) + a(j) > a(k) AND a(i) + a(k) > a(j) AND a(j) + a(k) > a(i) THEN m = m + 1
NEXT
NEXT
NEXT
OPEN "output.txt" FOR OUTPUT AS #2
PRINT #2, m
CLOSE

@Juli2106 · 18.01.2012, 21:05 **[ТС]**

спасибо,но я ещё такого не проходила
и поэтому не могу понять,что Вы написали

@кот Бегемот · 18.01.2012, 21:08

Хорошо. Тогда так. Или массивы тоже не проходили?

PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
INPUT n
DIM a(n)
FOR i = 1 TO n
INPUT a(i)
NEXT
FOR i = 1 TO n
FOR j = i + 1 TO n
FOR k = j + 1 TO n
IF a(i) + a(j) > a(k) AND a(i) + a(k) > a(j) AND a(j) + a(k) > a(i) THEN m = m + 1
NEXT
NEXT
NEXT
PRINT  m

@Juli2106 · 18.01.2012, 21:12 **[ТС]**

массивы сейчас проходим
а что такое DIM?

@кот Бегемот · 18.01.2012, 21:18

Хороший вопрос, особенно от того, кто проходит массивы. С этого начинается изучение массивов.
DIM - от английского Dimension (размер)
Оператор, выделяющий место в памяти под массив. Применяется вместе с именем и размером массива.

@Juli2106 · 18.01.2012, 21:22 **[ТС]**

первый раз слышу
то есть его обязательно использовать?

@кот Бегемот · 18.01.2012, 21:31

Если массив более 10 элементов, то обязательно, потому что самостоятельно Бейсик выделяет место только под массив из 10 элементов

@Juli2106 · 18.01.2012, 21:45 **[ТС]**

а что значит a(i)?

@кот Бегемот · 18.01.2012, 21:48

а это значит элемент массива с именем а и номером i

Ужас какой-то. Чему вас там вообще учат, если ты примитивных вещей не знаешь?

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .

@Juli2106 0 / 0 / 0 Регистрация: 11.01.2012 Сообщений: 15

	Дан набор из N отрезков различной длины.Сколькими способами можно выбрать из этих отрезков три,из которых можно составить треугольник? 18.01.2012, 20:17. Показов 7961. Ответов 11 Метки нет (Все метки) Дан набор из N отрезков различной длины.Сколькими способами можно выбрать из этих отрезков три,из которых можно составить треугольник? Входные данные Сначала вводится количество отрезков,затем длины этих отрезков(ещё N чисел). Выходные данные Программа должна вывести одно число-искомое количество способов. Примеры Входные данные Выходные данные 4 1 1 2 3 4 3 0 10 100 1000 Ограничения Количество отрезков -не менее 3 и не более 20. Длина каждого отрезка-натуральное число,не превосходящее 1000.Все отрезки имеют разную длину. Программу надо решить в QBasic. Заранее спасибо. 0

@Juli2106 0 / 0 / 0 Регистрация: 11.01.2012 Сообщений: 15
	18.01.2012, 20:41 [ТС]
	Я не знала,что это олимпиадная задача.Нам задали её решить в классе Добавлено через 1 минуту Quick Basic Добавлено через 11 минут описалась,решить задачу 0

@Juli2106 0 / 0 / 0 Регистрация: 11.01.2012 Сообщений: 15
	18.01.2012, 21:05 [ТС]
	спасибо,но я ещё такого не проходила и поэтому не могу понять,что Вы написали 0

@Juli2106 0 / 0 / 0 Регистрация: 11.01.2012 Сообщений: 15
	18.01.2012, 21:12 [ТС]
	массивы сейчас проходим а что такое DIM? 0

@кот Бегемот Платежеспособный зверь 8966 / 4389 / 1655 Регистрация: 28.10.2009 Сообщений: 11,647
	18.01.2012, 21:18
	Хороший вопрос, особенно от того, кто проходит массивы. С этого начинается изучение массивов. DIM - от английского Dimension (размер) Оператор, выделяющий место в памяти под массив. Применяется вместе с именем и размером массива. 0

@Juli2106 0 / 0 / 0 Регистрация: 11.01.2012 Сообщений: 15
	18.01.2012, 21:22 [ТС]
	первый раз слышу то есть его обязательно использовать? 0

@кот Бегемот Платежеспособный зверь 8966 / 4389 / 1655 Регистрация: 28.10.2009 Сообщений: 11,647
	18.01.2012, 21:31
	Если массив более 10 элементов, то обязательно, потому что самостоятельно Бейсик выделяет место только под массив из 10 элементов 0

@Juli2106 0 / 0 / 0 Регистрация: 11.01.2012 Сообщений: 15
	18.01.2012, 21:45 [ТС]
	а что значит a(i)? 0

@кот Бегемот Платежеспособный зверь 8966 / 4389 / 1655 Регистрация: 28.10.2009 Сообщений: 11,647
	18.01.2012, 21:48
	а это значит элемент массива с именем а и номером i Ужас какой-то. Чему вас там вообще учат, если ты примитивных вещей не знаешь? 0