Определить периметр треугольника, заданного в пространстве своими вершинами.

@Albertin777 · Регистрация: 07.03.2012

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

Определить периметр треугольника, заданного в пространстве своими вершинами.(Не могу решить )

@MayaNash · 26.04.2012, 15:28

Pascal

uses crt;
 
type tochka = record
     x,y,z: real;
     end;
 
var a,b,c: tochka;
    d,p: real;
 
begin clrscr;
write('Tochka nr.1: '); readln(a.x,a.y,a.z);
write('Tochka nr.2: '); readln(b.x,b.y,b.z);
write('Tochka nr.2: '); readln(c.x,c.y,c.z);
 
p:=0;
d:=sqrt(sqr(a.x-b.x) + sqr(a.y-b.y) + sqr(a.z-b.z));
p:=p + d;
d:=sqrt(sqr(b.x-c.x) + sqr(b.y-c.y) + sqr(b.z-c.z));
p:=p + d;
d:=sqrt(sqr(a.x-c.x) + sqr(a.y-c.y) + sqr(a.z-c.z));
p:=p + d;
 
writeln('Perimetr treugolinika = ',p:5:2);
readkey; end.

@Albertin777 0 / 0 / 0 Регистрация: 07.03.2012 Сообщений: 16
		1
	Определить периметр треугольника, заданного в пространстве своими вершинами. 26.04.2012, 15:17. Показов 1830. Ответов 1 Метки нет (Все метки) Определить периметр треугольника, заданного в пространстве своими вершинами.(Не могу решить ) 0

	26.04.2012, 15:28

Определить периметр треугольника, заданного в пространстве своими вершинами.

Решение