Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/16: Рейтинг темы: голосов - 16, средняя оценка - 5.00
Arshavin
0 / 0 / 0
Регистрация: 19.06.2010
Сообщений: 26
#1

Найти площадь пятиугольника.

19.06.2010, 06:13. Просмотров 3226. Ответов 11
Метки нет (Все метки)

дан пятиугольник и даны его 3 стороны. Найти его площадь с помощью процедуры вычисления площади треугольника по 3 сторонам. По рисунку 5-тиугольник разбит на 3 треугольника!


Извиняюсь рисунка самого нет !!

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
19.06.2010, 06:13
Ответы с готовыми решениями:

Площадь пятиугольника
Даны действительные числа a,b,c,d. Найти площадь пятиугольника, изображенного...

Функции. Вычислить площадь выпуклого пятиугольника
Вычислить площадь выпуклого пятиугольника по заданным координатам x1,y1; x2,y2;...

Вычислить площадь пятиугольника по формуле Герона
Нужна помощь в решении: Даны координаты вершин некоторого пятиугольника. Разбив...

Программы паскаль. пользуясь формулой герона рассчитать площадь пятиугольника
1) Пользуясь формулой герона http://www.webmath.ru/web/images/web_pic59.gif...

По ребру найти площадь грани,площадь боковой поверхности и обьем куба
По ребру найти площадь грани,площадь боковой поверхности и обьем куба.

11
Puporev
Модератор
54215 / 41848 / 28920
Регистрация: 18.05.2008
Сообщений: 98,508
19.06.2010, 08:20 #2
Извиняюсь рисунка самого нет !!
Спасибо! Хоть решать не нужно....
0
Arshavin
0 / 0 / 0
Регистрация: 19.06.2010
Сообщений: 26
19.06.2010, 09:51  [ТС] #3
Помогите решить)
0
Puporev
Модератор
54215 / 41848 / 28920
Регистрация: 18.05.2008
Сообщений: 98,508
19.06.2010, 09:54 #4
Arshavin, Поменьше на поле дуру гоняй, побольше думай. Как можно решить, если нет рисунка, нужно же знать какие стороны даны.
А по трем сторонам вообще 5-угольник не построить.
0
Arshavin
0 / 0 / 0
Регистрация: 19.06.2010
Сообщений: 26
19.06.2010, 10:37  [ТС] #5
Потом закину рисунок как найду

Добавлено через 25 минут
Puporev, Вот процедура которая над


Pascal
1
2
3
4
5
6
7
procedure work(var a1,a2,a3,s:real);
var
p:real;
begin
p := (a1+a2+a3)/2;
s := sqrt(p*(p-a1)*(p-a2)*(p-a3))
end;
0
Puporev
Модератор
54215 / 41848 / 28920
Регистрация: 18.05.2008
Сообщений: 98,508
19.06.2010, 10:40 #6
Pascal
1
2
3
4
5
6
procedure work(a1,a2,a3:real;var s:real);
var p:real;
begin
p := (a1+a2+a3)/2;
s := sqrt(p*(p-a1)*(p-a2)*(p-a3))
end;
0
Arshavin
0 / 0 / 0
Регистрация: 19.06.2010
Сообщений: 26
19.06.2010, 10:43  [ТС] #7
Вот условие терь полное
0
Arshavin
0 / 0 / 0
Регистрация: 19.06.2010
Сообщений: 26
19.06.2010, 15:04  [ТС] #8
Найти площадь пятиугольника.
0
Puporev
Модератор
54215 / 41848 / 28920
Регистрация: 18.05.2008
Сообщений: 98,508
19.06.2010, 15:12 #9
Arshavin, Ну так что? Процедура есть, вызови ее в программе 3 раза и сложи результаты.

Добавлено через 4 минуты
Недостающие стороны введи с клавиатуры,

Добавлено через 47 секунд
Только проверяй при вводе что это треугольник.
0
Arshavin
0 / 0 / 0
Регистрация: 19.06.2010
Сообщений: 26
19.06.2010, 15:23  [ТС] #10
Помоги если мож?
0
Puporev
Модератор
54215 / 41848 / 28920
Регистрация: 18.05.2008
Сообщений: 98,508
19.06.2010, 15:32 #11
Целый день сидеть и канючить... За это время можно и Паскаль выучить и думать научится.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
uses crt;
procedure Plosh(a,b,c:real;var s:real);
var p:real;
begin
p:=(a+b+c)/2;
s:=sqrt(p*(p-a)*(p-b)*(p-c));
end;
var a,b,c,d,s1,s2,s3,s:real;
begin
clrscr;
writeln('Введите 4 стороны пятиугольника:');
repeat
write('1<a<3 a=');
readln(a);
until(a>1)and(a<3);
repeat
write('0.5<b<4.5 b=');
readln(b);
until(a>0.5)and(a<4.5);
repeat
writeln('c,d c+d>2.5');
readln(c,d);
until c+d>2.5;
Plosh(1,a,2,s1);
Plosh(2,b,2.5,s2);
Plosh(2.5,c,d,s3);
s:=s1+s2+s3;
write('S=',s:0:1);
readln
end.
1
Arshavin
0 / 0 / 0
Регистрация: 19.06.2010
Сообщений: 26
19.06.2010, 16:30  [ТС] #12
Спасибо)
0
19.06.2010, 16:30
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
19.06.2010, 16:30

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

Найти площадь грани, площадь полной поверхности и объем куба
4. Дана длина ребра куба. Найти площадь грани, площадь полной поверхности и...

Найти площадь грани, площадь полной поверхности и объем куба
Уважаемые програмисты помагите до здачи 1 лабораторной остался 1 день а ничего...


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

Или воспользуйтесь поиском по форуму:
12
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru