Склавиатуры вводят 3 числа. определить существует ли треугольник с такими сторонами. если да-найти его площадь. если нет-вывести сообщение об этом на экран.
Var a,b,c:integer; p:real; begin readln(a,b,c); p:=a+b+c; p:=p/2; if (a+b<c) or (a+c<b) or (b+c<a) then writeln('impossible') else writeln(sqrt(p*(p-a)*(p-b)*(p-c)):0:0); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку