Вычислить площадь треугольника, если известны длинны его сторон

 

Ход выполнения работы.

 

1. Площадь S треугольника, зная длины его сторон, можно вычислить по формуле Герона.

 

, где – полупериметр

2. Определим, что в данной задаче является исходными данными, промежуточными и конечными результатами

В этой задаче a, b, c, – исходные данные;

р – промежуточный результат;

S – искомый результат.

3. Составим графическую схему алгоритма:

 

 

4. Составим таблицу соответствия переменных:

 

В задаче	a	b	c	p	S
В программе	a	b	c	p	S
Тип	real	real	real	real	real

 

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

 

6. На основе графической схемы составим программу:

 

program example1;

var

a, b, c, p, S: real;

begin

writeln (‘ Введите стороны треугольника a, b, c ‘);

readln (a, b, c);

p: =(a+b+c)/2;

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

write (‘Площадь треугольника равна S=’, S: 7: 3);

readln

end.

7. Откомпилировать программу, нажав комбинацию клавиш Alt+F9.

8. Запустить программу на исполнение, нажав Ctrl+F9 и получить

результаты работы при:

а) a = 15, 2 см. b = 8, 346 см. c = 1, 824 см.

б) а = 4 см. b = 5 см. c = 2 см.

9. Получить распечатку листинга программы.

10. Получить распечатку результатов.

 

Задание 2.

 

В соответствии со своим вариантом выполнить задание: составить программу для вычисления функции b=f(x, y, z).

Вариант	Вид функции	Исходные данные
x	y	z
01		-0, 825	2, 379	-
02		-0, 729	-1, 42	-
03		-0, 720	-1, 42	-
04		3, 981	-1, 625	-
05		3, 981	-	0, 512
06		-0, 622	-	5, 541
07		17, 421	10, 365	0, 828
08		17, 421	10, 365	-
09		0, 335	0, 025	32, 005
10		-4, 5000	0, 750	0, 845
11		-	-	0, 160
12		-17, 22	6, 33	-
13		-1, 825	18, 225	-3, 298
14		-0, 85	1, 25	-
15		125, 331	32, 075	-
16		0, 100	-8, 750	-
17		1, 542	-8, 261	80, 005
18		-	-	3, 500
19		0, 400	-0, 875	-
20		-15, 246	4, 642	-
21		16, 55	-2, 75	0, 15
22		16, 55	-2, 75	0, 15
23		1, 825	18, 225	-
24		-2, 3	-0, 8	-
25		20, 12	-12, 55	-
26		0, 273	4, 38	3, 76
27		16, 3	7, 32	0, 08
28		0, 42	1, 23	0, 756
29		4, 327	-	-0, 523
30		3, 256	4, 125	-