Статистика
Всего в нашей базе более 4 327 664 вопросов и 6 445 978 ответов!

Введите три числа.Если они могут быть длинами сторон остроугольного

10-11 класс

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

Lenhik20 24 марта 2015 г., 20:00:39 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Elvin0009
24 марта 2015 г., 22:50:12 (9 лет назад)

a, b, c, i,z, j, p:integer;
d:array[1..10] of integer
begin
readln(a, b, c);
d[1]:=a; d[2]:=b; d[3]:=c;
for i:=1 to 3 do
for j:=1 to 3 do
if d[i]<d[j] then begin
z:=d[i]; d[i]:=d[j]; d[j]:=z;
if ((a+b)>c) and ((a+c)>b) and ((c+b)>a) then begin
p:=(a+b+c) div 2;
p:=p*(p-a)*(p-b)*(p-c);
p:=sqrt(p);
p:=(2*p) div a;
for i:=1 to n do
writeln(d[i]);
end;
writeln(p);
readln;
end.


Ответить

Другие вопросы из категории

Читайте также

Введите три числа. Если они могут быть длинами сторон равнобедренного остроугольного....

Ребят,подскажите пожалуйста как проверить могут ли быть стороны длинами равнобедренного остроугольного треуг. Не могу понять ,как проверить именно на остроугольный треугольник ,в геометрии 0. Помогите пожалуйста

Программирование. Даны три вещественных числа a,b,c. Существует ли треугольник со сторонами a,b,c? program dz1; uses crt; var

a,b,c:integer;

begin

writeln('введите три числа: ');

readln(a,b,c)

а дальше не знаю помогите пожалуйста!!!!)

1) Составить функцию, которая определяет наибольшее из трех чисел и привести пример ее использования. Пример: Введите три числа:

28 15 10

Наибольшее число: 28

2)Составить функцию, которая определяет сумму всех чисел от 1 до N и привести пример ее использования.

Пример:

Введите число:

100

Сумма = 500

Буду очень признателен за помощь.



Вы находитесь на странице вопроса "Введите три числа.Если они могут быть длинами сторон остроугольного", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.