2741 / 2340 / 620
Регистрация: 19.03.2012
Сообщений: 8,830
1

Найти периметр треугольника, заданного координатами своих вершин, определив финкцию для расчета длины отрезка по координатам его вершин.

17.04.2012, 16:01. Показов 17118. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Найти периметр треугольника, заданного координатами своих вершин, определив финкцию для расчета длины отрезка по координатам его вершин.
Помогите решить с использованием процедуры.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
17.04.2012, 16:01
Ответы с готовыми решениями:

Найти периметр треугольника, заданного координатами своих вершин, определив функцию для расчета длины отрезка по координатам его вершин.
Помогите пожалуйста решить!СПАСИБО! Найти периметр треугольника, заданного координатами своих...

Найти периметр треугольника, заданного координатами своих вершин (используя функцию для расчета длины отрезка)
Найти периметр треугольника, заданного координатами своих вершин. (Определить функцию для расчета...

Найти периметр треугольника, определив функцию, рассчитывающую длину отрезка по координатам его вершин
Найдите периметр треугольника, заданного координатами вершин, определив функцию, рассчитывающую...

Найти периметр треугольника, заданного координатами своих вершин
Найти периметр треугольника, заданного координатами своих вершин, определив процедуру для расчёта...

1
Почетный модератор
7966 / 3937 / 2464
Регистрация: 30.10.2011
Сообщений: 5,377
17.04.2012, 16:38 2
Лучший ответ Сообщение было отмечено alex925 как решение

Решение

tsar925, так функцию или процедуру?... в задании вроде функцию, поэтому:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
uses crt;
var xa,ya,xb,yb,xc,yc: integer;
    p: real;
 
function Dlina(x1,y1,x2,y2: integer):real;
var d: real;
begin
d:= sqrt(sqr(y1-y2)+sqr(x1-x2));
Dlina:=d;
end;
 
begin
writeln ('Координаты вершины A ');
readln (xa,ya);
writeln ('Координаты вершины B ');
readln (xb,yb);
writeln ('Координаты вершины C ');
readln (xc,yc);
p:=Dlina(xa,ya,xb,yb)+Dlina(xb,yb,xc,yc)+Dlina(xc,yc,xa,ya);
write ('Периметр треугольника = ',p:7:2);
readkey
end.
1
17.04.2012, 16:38
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
17.04.2012, 16:38
Помогаю со студенческими работами здесь

Найти периметр треугольника, заданного координатами своих вершин
Найдите пожалуйста периметр треугольника, заданного координатами своих вершин, определив функцию...

Найти периметр треугольника, заданного координатами своих вершин
Найти периметр треугольника, заданного координатами своих вершин, определив функцию для расчета...

Найти периметр треугольника, заданного координатами своих вершин
2. Составьте программу для решения задачи. Найдите периметр треугольника, заданного координатами...

Найти периметр треугольника, заданного координатами своих вершин
2) Найти периметр треугольника, заданного координатами своих вершин. (Определить функцию для...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru