Даны три положительных числа. Если они могут быть длинами сторон остроугольного треугольника, то вычислить его площадь и определить вид треугольника (
10-11 класс
|
равносторонний, равнобедренный или разносторонний), иначе выдать соответсвующее сообщение.
uses crt;
var a,b,c,mn,mx,sr,p,s:real;
begin
clrscr;
writeln('Введите 3 числа:');
readln(a,b,c);
if(a<=abs(b-c))or(a>=b+c)then
write('Это не треугольник!')
else
begin
mn:=a;
if b<mn then mn:=b;
if c<mn then mn:=c;
mx:=a;
if b>mx then mx:=b;
if c>mx then mx:=c;
sr:=a+b+c-mn-mx;
if(a=b)and(b=c) then writeln('Это равносторонний треугольник')
else if((a=b)and(b<>c))or((a=c)and(b<>c))or((b=c)and(a<>b))then
writeln('Это равнобедренный треугольник')
else writeln('Это разноcторонний треугольник');
p:=(a+b+c)/2;
s:=sqrt(p*(p-a)*(p-b)*(p-c));
writeln('его площадь=',s:0:2);
write('Стороны в порядке убывания: ',mx:0:2,' ',sr:0:2,' ',mn:0:2);
end;
readln
end.
Другие вопросы из категории
принтер, процессор, клавиатура, звуковая карта, монитор, оперативная память, устройство CD-ROM? Почему?
(на угад б я так смогла наставить, меня больше интересует вопрос "почему?" Не разочарует только полный ответ)
).
#include <stdio.h>
#include <stdlib.h>
#include <conio.h>
ть поместится ли один прямоугольник внутрь другого. ( Программный код нужно писать в Паскале!)
Читайте также
треугольника,выведите их в порядке убывания и вычислите их площадь.
Ребят,подскажите пожалуйста как проверить могут ли быть стороны длинами равнобедренного остроугольного треуг. Не могу понять ,как проверить именно на остроугольный треугольник ,в геометрии 0. Помогите пожалуйста
соответствующее сообщение.
Решите разветляющим алгоритмом
вычислить площадь этого треугольника. Даны два действительных положительных числа х и у. Арифметические действия над числами пронумерованы (1 - сложение, 2 - вычитание, 3 - умножение, 4 - деление). Составить программу, которая по выведенному номеру выполняет то или иное действие над числами.