Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.88/8: Рейтинг темы: голосов - 8, средняя оценка - 4.88
0 / 0 / 0
Регистрация: 16.07.2013
Сообщений: 20
1

Даны 3 значения a,b,c. Проверить являются ли они сторонами треугольника

17.07.2013, 19:21. Показов 1519. Ответов 2
Метки нет (Все метки)

Даны 3 значения a,b,c.Проверить являются ли они сторонами треугольника.Если да,то найти биссектрисы этого треугольника.
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
17.07.2013, 19:21
Ответы с готовыми решениями:

Даны три положительных числа а, b, с. Проверить, будут ли они сторонами треугольника. Если да, то вычислить площадь этого треугольника.
Помогите, пожалуйста, исправить здесь ошибку времени... #include<iostream> #include<cmath> using...

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

Даны длины трех отрезков. Требуется проверить: могут ли они являться сторонами невырожденного треугольника
Входные данные Входной файл INPUT.TXT содержит 3 натуральных числа X Y Z – длины заданных...

Даны длины a,b и с сторон некоторого треугольника. Найти медианы треугольника, сторонами которого являются медианы исходного треугольника
Как сделать с процедурой

2
Почетный модератор
64087 / 47496 / 32734
Регистрация: 18.05.2008
Сообщений: 115,182
17.07.2013, 19:37 2
Лучший ответ Сообщение было отмечено Laky94 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
uses crt;
var a,b,c:integer;
    La,Lb,Lc:real;
begin
clrscr;
writeln ('vvedite storoni treygolnika');
readln(a,b,c);
if(a<abs(b-c))or(a>b+c)then writeln('ne treygolnik!')
else
 begin
  La:=sqrt(b*c*(a+b+c)*(b+c-a))/(b+c);
  Lb:=sqrt(a*c*(a+b+c)*(a+c-b))/(a+c);
  Lc:=sqrt(a*b*(a+b+c)*(a+b-c))/(a+b);
  writeln ('BissA=',la:0:1);
  writeln ('BissB=',lb:0:1);
  writeln ('BissC=',lc:0:1);
 end;
readln
end.
1
153 / 153 / 81
Регистрация: 16.06.2012
Сообщений: 314
17.07.2013, 19:38 3
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
var a , b , c , la , lb , lc : real;
begin
    read(a , b , c);
    if (a + b > c) and (a + c > b) and (b + c > a) then begin
        la := sqrt((b * c * (a + b + c) * (b + c - a))) / (b + c);
        lb := sqrt((a * c * (a + b + c) * (a + c - b))) / (a + c);
        lc := sqrt((a * b * (a + b + c) * (a + b - c))) / (a + b);
        writeln('la = ' , la : 0 : 6);
        writeln('lb = ' , lb : 0 : 6);
        writeln('lc = ' , lc : 0 : 6);
    end else
        writeln('ne treugolnil');
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
17.07.2013, 19:38

По трем введенным числам определить являются ли они сторонами треугольника..
Итак, текст задачи: По 3м введенным числам определить, являются ли они сторонами треугольника....

Задаваясь длинами трех отрезков, определить, являются ли они сторонами треугольника
Здравствуйте ув. жители форума. Нужна помощь. В понедельник экзамен. Помогите решить задачи в VBA....

Проверить будут ли они сторонами треугольника
Даны три положительных числа a.b.c. Проверить будут ли они сторонами треугольника. Если да то...

Зная три стороны, определить, являются ли они сторонами треугольника и является ли он прямоугольным
Есть три длины сторон треугольника (например 5,4,3) Нужно выяснить, существует ли такой...


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru