ПРОЦЕДУРЫ И ФУНКЦИИ

@Sacredd · Регистрация: 05.06.2012

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

Составить программу для решения задачи с применением функции пользователя:

1) В правильном треугольнике проведена средняя линия. Найти площадь образовавшейся трапеции, дважды используя функцию вычисления площади правильного треугольника, по формуле
S= (a*a*(корень из 3))/4

2) Составить программу для решения задания 1, используя процедуру пользователя вместо функции

Пожалуйста помогите.

@olegoner · 08.06.2012, 13:11

Найти площадь образовавшейся трапеции, дважды используя функцию вычисления площади правильного треугольника, по формуле
S= (a*a*(корень из 3))/4

обязательное условие?
если нет

Delphi

Function Strop(a:integer):real;
begin
result:=sqr(a)*sqrt(3)*3/16;
{т.к. средними линиями треуголик бьётся на четыре равных правильных треугольников
три из которых лежат в нашей трапеци}
end;

если обязательно то ход конём

Delphi

Function Strop(a:integer):real;
begin
result:=sqr(a)*sqrt(3)/4-sqr(a)*sqrt(3)/16; //из площади треугольника вычитаем площадь маленького
end;

для процедуры

Delphi

Procedure Strop(a:integer);
begin
res:=sqr(a)*sqrt(3)/4-sqr(a)*sqrt(3)/16; //из площади треугольника вычитаем площадь маленького
end;

где res - глобальная переменная например, в зависимости от того как вам надо

@Sacredd 1 / 1 / 0 Регистрация: 05.06.2012 Сообщений: 28
		1
	ПРОЦЕДУРЫ И ФУНКЦИИ 07.06.2012, 20:34. Показов 1265. Ответов 1 Метки нет (Все метки) Составить программу для решения задачи с применением функции пользователя: 1) В правильном треугольнике проведена средняя линия. Найти площадь образовавшейся трапеции, дважды используя функцию вычисления площади правильного треугольника, по формуле S= (aa(корень из 3))/4 2) Составить программу для решения задания 1, используя процедуру пользователя вместо функции Пожалуйста помогите. 0

	08.06.2012, 13:11

ПРОЦЕДУРЫ И ФУНКЦИИ

Решение