Даны отрезки a, b, c

@prime17 · Регистрация: 12.02.2010

Author24 — интернет-сервис помощи студентам

Даны отрезки a, b, c Для каждой тройки этих отрезков, из которых можно построить треугольник, напечатать площадь данного треугольника. Определить и использовать процедуру printsq (x, y, z), которая выводит на печать площадь треугольника со сторонами x, y, z, если такой треугольник существует.

есть код программы

Pascal

program zadacha
uses
Crt;
var
   AB,BC,AC:real;
begin
     ClrScr;
     write('input hand AB=');
     write('input hand BC=');
     write('input hand AC=');
end;
function zxa:real;
var
   a,b,c:real;
begin
     if (a+b)<c and (a+c)<b and (b+c)<a then
     p:=(a+b+c)/2;
     s:=sqr(p(p-a)(p-b)(p-c));
end;
end.

она не работает. Спасибо за рание

@yanyk1n · 23.02.2010, 13:40

Pascal

uses crt;
var a,b,c:real;
 
procedure printsq(x,y,z:real);
begin
 if (x<y+z) and (y<x+z) and (z<x+y) then writeln('YES') else writeln('NO');
end;
 
begin
 clrscr;
 write('A B C -> ');
 readln(a,b,c);
 printsq(a,b,c);
 readln;
end.

@prime17 · 23.02.2010, 19:32 **[ТС]**

ну в моем коде программы есть ещо и формулы

Pascal

1 2	p:=(a+b+c)/2; s:=sqr(p(p-a)(p-b)(p-c));

@Puporev · 23.02.2010, 19:52

Сообщение от prime17

есть ещо и формулы

Если это, то это не формула площади

Pascal

1	s:=sqr(p(p-a)(p-b)(p-c));

Нужно

Pascal

1	s:=sqrt(p(p-a)(p-b)*(p-c));

@zeLYOnyi · 24.05.2010, 20:00

А как для такой задачи сделать что бы выводились на экран эти треугольники и площадь под каждый из них?

@Puporev · 24.05.2010, 20:05

Сообщение от zeLYOnyi

что бы выводились на экран эти треугольники

По длинам сторон треугольники на экран не вывести, нужны координаты вершин.

@zeLYOnyi · 24.05.2010, 20:14

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

@zeLYOnyi 0 / 0 / 1 Регистрация: 17.05.2010 Сообщений: 18
	24.05.2010, 20:00	5
	А как для такой задачи сделать что бы выводились на экран эти треугольники и площадь под каждый из них? 0

@Puporev Почетный модератор 64300 / 47595 / 32743 Регистрация: 18.05.2008 Сообщений: 115,181
	24.05.2010, 20:05	6
	Сообщение от zeLYOnyi что бы выводились на экран эти треугольники По длинам сторон треугольники на экран не вывести, нужны координаты вершин. 0

@zeLYOnyi 0 / 0 / 1 Регистрация: 17.05.2010 Сообщений: 18
	24.05.2010, 20:14	7
	впринципи мне нужно решить вот эту задачу Для каждой тройки этих отрезков, из которых можно построить треугольники, вычислить площадь данного треугольника" ...даже если платно то сколько будет стоить? 0