Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.57/7: Рейтинг темы: голосов - 7, средняя оценка - 4.57
0 / 0 / 0
Регистрация: 18.11.2015
Сообщений: 7
1

Даны произвольные значения углов А и B (в градусах). Если треугольник с такими углами существует, то определит

20.12.2015, 17:15. Показов 1390. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Даны произвольные значения углов А и B (в градусах). Если треугольник с такими углами существует, то определить его тип по отношению к сторонам.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
20.12.2015, 17:15
Ответы с готовыми решениями:

даны 3 числа. определить, существует ли треугольник с такими сторонами
даны 3 числа. определить, существует ли треугольник с такими сторонами

даны 2 угла треугольника в градусах.определить существует ли такой треугольник
ребят помогите пожалуста с программой даны 2 угла треугольника в градусах.определить существует...

существует ли треугольник с данными углами
Пожалуйста помогите с программкой... Дана два угла (в градусах)треугольник.Определить существует...

Даны величины трех углов треугольника, существует ли треугольник с такими углами?
Мне нужно решить задачу,даны величины трех углов треугольника и нужно определить существует ли...

1
5079 / 2651 / 2349
Регистрация: 10.12.2014
Сообщений: 10,028
21.12.2015, 09:41 2
Лучший ответ Сообщение было отмечено Ivan_Kardan как решение

Решение

Википедия: треугольник
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
begin
  var A := ReadLnInteger('A =');
  var B := ReadLnInteger('B =');
  var C := 180 - A - B;
  if A > B then Swap(A, B);
  if B > C then Swap(B, C);
  if A > B then Swap(A, B);
  
  if A < 0 then begin WriteLn('не существует'); Halt; end;
  
  if C = 90 then WriteLn('прямоугольный')
  else if C > 90 then WriteLn('тупоугольный')
  else WriteLn('остроугольный');
  
  if (A = B) and (A = C) then WriteLn('равносторонний')
  else if (A = B) or (B = C) then WriteLn('равнобедренный')
  else WriteLn('разносторонний');
end.
0
21.12.2015, 09:41
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
21.12.2015, 09:41
Помогаю со студенческими работами здесь

Даны три числа A, B и С. Выяснить существует ли треугольник с такими даными сторон и если существует - вычеслить величину всех его углов.
Даны три числа A, B и С. Выяснить существует ли треугольник с такими даными сторон и если...

Выяснить, существует ли треугольник с такими длинами сторон и если существует - вычислить величину всех этих углов.
Даны числа А, B, C. Выяснить, существует ли треугольник с такими длинами сторон и если существует -...

Выяснить существует ли треугольник с такими данными сторон и если существует - вычислить величину всех его углов.
Даны три числа A, B и С. Выяснить существует ли треугольник с такими даными сторон и если...

Даны произвольные числа Если нельзя построить треугольник с такими длинами сторон, то напечатать 0, иначе 1
Даны произвольные числа a, b и c. Если нельзя построить треугольник с такими длинами сторон, то...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru