Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.86/7: Рейтинг темы: голосов - 7, средняя оценка - 4.86
0 / 0 / 0
Регистрация: 10.03.2014
Сообщений: 23
1

Найти периметр восьмиугольника, вершины которого имеют соответственно координаты (x1, y1), (x2, y2), …, (x8, y8)

02.04.2014, 16:43. Показов 1282. Ответов 5
Метки нет (Все метки)

Найти периметр восьмиугольника, вершины которого имеют соответственно координаты (x1, y1), (x2, y2), …, (x8, y8). Определить функцию вычисления расстояния между двумя точками, заданными своими координатами.
Задачу нужно написать в Pascal через функцию и процедуру.Заранее спасибо.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
02.04.2014, 16:43
Ответы с готовыми решениями:

Найти периметр десятиугольника, вершины которого имеют соответственно координаты
Задание:Даны действительные числа x1,y1,x2,y2,…,x10. Найти периметр десятиугольника, вершины...

Найти периметр четырехугольника, вершины которого имеют соответственно координаты (х1, у1), …, (х4, y4)
Даны действительные числа х1, у1, х2, у2, …,х4, у4. Найти периметр четырехугольника, вершины...

Найти периметр десятиугольника, вершины которого имеют соответственно координаты (х1, у1), (х2, у2), …, (х10, у10)
Даны действительные числа х1, у1, х2, у2, …,х10, у10. Найти периметр десятиугольника, вершины...

Даны действительные числа х1, у1, х2, у2, …,х10, у10. Найти периметр десятиугольника, вершины которого имеют соответственно координаты (х1, у1), (х2,
Даны действительные числа х1, у1, х2, у2, …,х10, у10. Найти периметр десятиугольника, вершины...

5
1643 / 1072 / 1081
Регистрация: 03.07.2013
Сообщений: 4,507
02.04.2014, 16:56 2
Цитата Сообщение от kaiz Посмотреть сообщение
Определить функцию вычисления расстояния между двумя точками
Pascal
1
2
3
4
Function Len(x1,y1,x2,y2) : Real;
Begin
  Len:=sqrt(sqr(x1-x2)+sqr(y1-y2));
End;
Цитата Сообщение от kaiz Посмотреть сообщение
Найти периметр восьмиугольника
Pascal
1
2
3
4
5
6
7
8
9
Type
  Tm = Record
             x,y : Real;
          end;
Var m : array[1..8] of Tm;
...
P:=Len(m[8].x,m[8].y,m[1].x,m[1].y);
For i:=1 to 7 do P:=P+Len(m[i].x,m[i].y,m[i+1].x,m[i+1].y)
Writeln(P);
1
0 / 0 / 0
Регистрация: 10.03.2014
Сообщений: 23
02.04.2014, 17:03  [ТС] 3
Добавлено через 3 минуты
APALoff, Блин нужно попроще, я в 10 классе,тут как то сложно очень.
0
1643 / 1072 / 1081
Регистрация: 03.07.2013
Сообщений: 4,507
02.04.2014, 17:06 4
Если делать проще - то будет очень "коряво"!

...но действительно, проще сделать можно - если Вы сами это напишите в соответствии с усвоенной программой обучения.
0
Модератор
1623 / 1078 / 485
Регистрация: 17.07.2012
Сообщений: 5,308
04.04.2014, 22:56 5
APALoff, думаю можно запись заменить на двумерный массив,но кому не лень это писать?
0
1643 / 1072 / 1081
Регистрация: 03.07.2013
Сообщений: 4,507
05.04.2014, 00:06 6
Цитата Сообщение от Новичок Посмотреть сообщение
можно запись заменить на двумерный массив
Конечно можно, но сути это не поменяет, только усложнит понимание т.к. придется использовать индексы - на мой взгляд запись Len(m[8].x,m[8].y,m[1].x,m[1].y); более понятна, чем Len(m[8,1],m[8,2],m[1,1],m[1,2]);
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
05.04.2014, 00:06

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

Вычислить периметр n-угольника вершины которого имеют соответственно координаты в порядке их обхода по часовой стрелке
вычислить периметр н-угольника вершины которого имеют соответственно координаты (х1, у1) (х2, у2)...

Найти периметр десятиугольника, вершины которого имеют соответственные координаты
Даны действительные числа X1,Y1, X2,Y2,...X10,Y10. Найти периметр десятиугольника, вершины которого...

Найти периметр десятиугольника, вершины которого имеют соответствующие координаты
Даны действительные числа х1,у1....х10,у10. Найти периметр десятиугольника, вершины которого имеют...

Найти площадь пятиугольника, вершины которого имеют указанные координаты
Даны вещественные числа х1, у1, х2, у2,… х5, у5 – Найти площадь пятиугольника, вершины которого...


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

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

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