Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.80/5: Рейтинг темы: голосов - 5, средняя оценка - 4.80
 Аватар для JulUlibina
5 / 5 / 0
Регистрация: 08.11.2010
Сообщений: 87

Выяснить существует ли треугольник с длинами сторон x, y, z

18.11.2012, 21:54. Показов 1026. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Доброго времени суток!
Помогите пожалуйста написать программку, функцию понимаю как надо писать, а вот язык новый, не знаю как в нем программировать!

Даны действительные положительные числа x, y,z. Выяснить существует ли треугольник с длинами сторон x, y, z, если такой треугольник существует, то ответить является ли он остроугольным.

Заранее спасибо!
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
18.11.2012, 21:54
Ответы с готовыми решениями:

Выяснить,существует ли треугольник с длинами сторон x,y,z
Даны три положительных вещественных числа x,y,z.Выяснить,существует ли треугольник с длинами сторон x,y,z.если треугольник существует,то...

Треугольник задан длинами сторон. Как найти длины высот
Треугольник задан длинами сторон. Найти длины высот. Private Sub Command1_Click() a = Val(Text1.Text) b = Val(Text2.Text) c =...

Даны произвольные числа a,b,c.Сообщить можно ли постоить треугольник с такми длинами сторон
Даны произвольные числа a,b,c.Сообщить можно ли постоить треугольник с такми длинами сторон, и если можно то вывести соответствующее...

1
670 / 163 / 22
Регистрация: 27.01.2012
Сообщений: 372
18.11.2012, 22:54
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Private Sub Command1_Click()
Dim x!, y!, z!, m!
x = InputBox("x")
y = InputBox("y")
z = InputBox("z")
 
Dim a(1 To 3) As Single
a(1) = x: a(2) = y: a(3) = z
For i = 1 To 3
For j = 1 To 3
If a(i) < a(j) Then m = a(i): a(i) = a(j): a(j) = m
Next j
Next i
 
 
If a(1) + a(2) <= a(3) Then MsgBox "òðåóãîëüíèê íå ñóùåñòâóåò": Exit Sub
 
s = Sqr(a(1) ^ 2 + a(2) ^ 2)
 
If a(3) < s Then MsgBox "îñòðîóãîëüíûé"
If a(3) = s Then MsgBox "ïðÿìîóãîëüíûé"
If a(3) > s Then MsgBox "òóïîóãîëüíûé"
 
End Sub
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
18.11.2012, 22:54
Помогаю со студенческими работами здесь

Выяснить, существует ли треугольник с заданными длинами сторон, и является ли он прямоугольным
Заданы три действительных положительных числа X,Y,Z. Выяснить, существует ли треугольник с длинами сторон X,Y,Z. Если да, выяснить...

Даны действительные положительные числа x, y, z. Выяснить, существует ли треугольник с длинами сторон x, y, z.
Даны действительные положительные числа x, y, z. Выяснить, существует ли треугольник с длинами сторон x, y, z. Private Sub...

Определить существует ли треугольник с такими длинами сторон и, если существует, будет ли он прямоугольным
помогите проверить правильно ли составил программу. т.к на семерке проверить возможности нет ( CLS DIM SHARED X#, Y#, Z#, A% ...

Определить, существует ли треугольник с длинами сторон x, y, z
Дано

Определить, можно ли построить треугольник с длинами сторон, равным этим числам
Даны три положительных числа. Определить, можно ли по¬строить треугольник с длинами сторон, равным этим числам. Если можно, то ответить на...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
влияние грибов на сукцессию
anaschu 26.01.2026
Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android
8Observer8 26.01.2026
Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .
Установка Android SDK, NDK, JDK, CMake и т.д.
8Observer8 25.01.2026
Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf
8Observer8 25.01.2026
Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly
8Observer8 24.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
моя боль
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 ). Также. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru