Определить периметр и площадь треугольника по формуле Герона

@Petro29 · Регистрация: 30.04.2016

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

Даны три массива с одинаковым количеством элементов 5, в которых содержатся стороны треугольников
Aj, Bj и Q. Определить периметр Pj и площадь S каждого треугольника по формуле Герона. (А для треугольника необ-
ходимо определённое соотношение его сторон, поэтому лучше элементы задавать в операторе DATA).
Что значит стороны и периметр с индексами j:
Для трёх введённых сторон условие такое:

QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
 IF a + b > c AND b + c > a AND c + a > b THEN
    IF 7 + 11 > 9 AND 11 + 9 > 7 AND 9 + 7 > 11 THEN
CLS
DATA 5, 7, 15, 11, 9
DIM A(5)
   FOR I = 1 TO 5
     READ A(i)
       PRINT A(i);
IF A(2) + A(4) > A(5) THEN
    END IF
   NEXT i: PRINT
PRINT “ Треугольник возможен.”

На выходе имеем:

QBasic/QuickBASIC
1
2
5  7  15  11  9
Треугольник возможен.

Попытался добавить к программе строку:

QBasic/QuickBASIC
1
 Треугольник не возможен.

Не получилось. А ведь я старался.
И второй вариант:
Ввод случайных чисел и щёлкать до тех пор, пока не
выполнится указанное условие. Но получил отказ.
Почему?

QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
CLS
DIM A(5)
  RANDOMIZE TIMER
   FOR i = 1 TO 5
     A(i) = INT(RND * 10) + 1
          PRINT A(i);
   NEXT i: PRINT
   FOR i = 1 TO 5
IF (A(i) + A(i + 1) > A(i + 2) THEN
    END IF
   NEXT i: PRINT
PRINT “ Треугольник возможен.’

На выходе получил отказ:

QBasic/QuickBASIC
1
2
  Индекс вне диапазона
           <  OK  >    <  Справка  >

@кот Бегемот · 22.10.2019, 10:53

Что это за бред:

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

IF 7 + 11 > 9 AND 11 + 9 > 7 AND 9 + 7 > 11 THEN

Разве 7+11 бывает меньше 9? Зачем эту глупость писать?
И вся Ваша программа бредовая, что в первом, что во втором варианте. У Вас три массива, а Вы работаете только с одним, условие пишите вообще не для массива, а для простых переменных, индекс у вас вылетает потому, что при i=5 i+2 будет равно 7, а у вас объявлено только 5 элементов.
Вам бы для начала теорию поучить, а вы лезете программы составлять, не понимая сути. у вас так никогда ничего не получится, и вы будете постоянно писать подобный бред на этом форуме.
С наилучшими пожеланиями
КБ

@Petro29 · 23.02.2020, 19:50 **[ТС]**

Даны три массива с одинаковым количеством элементов 5, в которых содержатся стороны треугольников Aj, Bj и Q. Определить периметр Pj и площадь S каждого треугольника по формуле Герона. (А для треугольника необходимо определённое соотношение его сторон, поэтому лучше элементы задавать в операторе DATA).

Вы бы к нелестному комментарию в мой адрес по поводу этой программы от 22.10.2019 года дали бы пояснения
к вопросам.

1. Что значит стороны и периметр с индексом j.
2. Зачем для треугольника задавать 5 сторон DATA’ом, если для треугольника требуется три стороны
(с определённым соотношением сторон).
3. Периметр и площадь достаточно определить для одного массива. А для 2-го и 3-го – это уже не проблема (если
мы можем в одной программе печатать несколько массивов).
4. А приведённые программы были на тему: возможен ли треугольник при вводе сторон a, b, c Input’ом.
Например, введя a = 2, b = 7, c = 9, треугольник невозможен, поэтому и определять нечего. Конец программы.

Вы бы ответили на эти вопросы? Был бы признателен Вам

@ZX Spectrum-128 · 24.02.2020, 14:18

кот Бегемот, https://www.cyberforum.ru/post14264574.html

@Petro29 · 09.03.2020, 21:00 **[ТС]**

К вашей программе никаких претензий нет. Только подредактировал немного.

А ответ такой:
1 пункт: Массив А, В и Р (видимо должно быть А, В и С) далее: … имеется в виду 10 тр-ков со сторонами А , В и Q (по видимому должно быть Аj , Вj и Сj )
Далее: … и почему 10 тр-ков (из 10 элементов)?
Из 5 эл-в можно составить 10 разных тр-ков (это я определил методом подбора, а как по формуле сочетаний – не знаю). Из 5 эл-в массива 1 2 3 4 5 можно сделать 10 разных тр-ков:
1 2 3; 1 3 4; 1 4 5; 2 3 4; 2 4 5; 2 5 1; 2 4 1; 3 4 5; 2 3 5; 5 3 1
А из 10 элементов тр-ков можно составить несколько десятков, а не 10. (не знаю как определить способом сочетаний). Если Вы помните формулу сочетаний (из школы), то напишите её.
2 пункт: что значит «для формулы Герона не нужно определять соотношение сторон. С какого перепуга? И чё за DATA
такая?»
Если тр-ник возможен, то вычисляем P и Q, а если не возможен – то и вычислять нечего. А про DATA – что ни разу в жизни не слышали?
В задании, кстати, рекомендуется задавать элемент массива оператором DATA.
3 пункт: что за вопрос – «Какая ещё площадь?» Да та, которую нужно определить по заданию.
4 пункт: этот пункт вообще ни к чему. Если тр-ник возможен, вычисляем P и Q, иначе ничего не вычисляем.

Новые блоги и статьи Все статьи Все блоги /
Модель микоризы: классовый агентный подход 3 anaschu 06.01.2026 aa0a7f55b50dd51c5ec569d2d10c54f6/ O1rJuneU_ls https:/ / vkvideo. ru/ video-115721503_456239114	Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ФедосеевПавел 06.01.2026 Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ВВЕДЕНИЕ Введу сокращения: аналоговый ПИД — ПИД регулятор с управляющим выходом в виде числа в диапазоне от 0% до. . .	Модель микоризы: классовый агентный подход 2 anaschu 06.01.2026 репозиторий https:/ / github. com/ shumilovas/ fungi ветка по-частям. коммит Create переделка под биомассу. txt вход sc, но sm считается внутри мицелия. кстати, обьем тоже должен там считаться. . . .	Расчёт токов в цепи постоянного тока igorrr37 05.01.2026 / * Дана цепь постоянного тока с сопротивлениями и напряжениями. Надо найти токи в ветвях. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа и решает её. Последовательность действий:. . .
Новый CodeBlocs. Версия 25.03 palva 04.01.2026 Оказывается, недавно вышла новая версия CodeBlocks за номером 25. 03. Когда-то давно я возился с только что вышедшей тогда версией 20. 03. С тех пор я давно снёс всё с компьютера и забыл. Теперь. . .	Модель микоризы: классовый агентный подход anaschu 02.01.2026 Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .	Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Programma_Boinc 28.12.2025 Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / ********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / ********/ gallery/ bKBkQFf Пост отсюда. . .	Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США. Programma_Boinc 26.12.2025 Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .

@Petro29 198 / 10 / 3 Регистрация: 30.04.2016 Сообщений: 732
	23.02.2020, 19:50 [ТС]
	Даны три массива с одинаковым количеством элементов 5, в которых содержатся стороны треугольников Aj, Bj и Q. Определить периметр Pj и площадь S каждого треугольника по формуле Герона. (А для треугольника необходимо определённое соотношение его сторон, поэтому лучше элементы задавать в операторе DATA). Вы бы к нелестному комментарию в мой адрес по поводу этой программы от 22.10.2019 года дали бы пояснения к вопросам. 1. Что значит стороны и периметр с индексом j. 2. Зачем для треугольника задавать 5 сторон DATA’ом, если для треугольника требуется три стороны (с определённым соотношением сторон). 3. Периметр и площадь достаточно определить для одного массива. А для 2-го и 3-го – это уже не проблема (если мы можем в одной программе печатать несколько массивов). 4. А приведённые программы были на тему: возможен ли треугольник при вводе сторон a, b, c Input’ом. Например, введя a = 2, b = 7, c = 9, треугольник невозможен, поэтому и определять нечего. Конец программы. Вы бы ответили на эти вопросы? Был бы признателен Вам 0

@ZX Spectrum-128 6812 / 4568 / 4820 Регистрация: 05.06.2014 Сообщений: 22,434
	24.02.2020, 14:18
	кот Бегемот, https://www.cyberforum.ru/post14264574.html 0

@Petro29 198 / 10 / 3 Регистрация: 30.04.2016 Сообщений: 732
	09.03.2020, 21:00 [ТС]
	К вашей программе никаких претензий нет. Только подредактировал немного. А ответ такой: 1 пункт: Массив А, В и Р (видимо должно быть А, В и С) далее: … имеется в виду 10 тр-ков со сторонами А , В и Q (по видимому должно быть Аj , Вj и Сj ) Далее: … и почему 10 тр-ков (из 10 элементов)? Из 5 эл-в можно составить 10 разных тр-ков (это я определил методом подбора, а как по формуле сочетаний – не знаю). Из 5 эл-в массива 1 2 3 4 5 можно сделать 10 разных тр-ков: 1 2 3; 1 3 4; 1 4 5; 2 3 4; 2 4 5; 2 5 1; 2 4 1; 3 4 5; 2 3 5; 5 3 1 А из 10 элементов тр-ков можно составить несколько десятков, а не 10. (не знаю как определить способом сочетаний). Если Вы помните формулу сочетаний (из школы), то напишите её. 2 пункт: что значит «для формулы Герона не нужно определять соотношение сторон. С какого перепуга? И чё за DATA такая?» Если тр-ник возможен, то вычисляем P и Q, а если не возможен – то и вычислять нечего. А про DATA – что ни разу в жизни не слышали? В задании, кстати, рекомендуется задавать элемент массива оператором DATA. 3 пункт: что за вопрос – «Какая ещё площадь?» Да та, которую нужно определить по заданию. 4 пункт: этот пункт вообще ни к чему. Если тр-ник возможен, вычисляем P и Q, иначе ничего не вычисляем. 0