4 / 4 / 1
Регистрация: 29.08.2011
Сообщений: 104
1

Формулы принадлежности(Pascal ABC)

25.09.2011, 15:27. Показов 2399. Ответов 4
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Подскажите формулы принадлежности точки к квадрату,треугольнику,кругу. И в чём особенности написание программ подобного рода. И ещё как вычислять принадлежность к другим фигурам.
Заранее спасибо.

Пример: Дана точка C(x,y), определить принадлежность к указанной области(фигуре).
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
25.09.2011, 15:27
Ответы с готовыми решениями:

Перевести код Pascal ABC NET в Pascal ABC
Помогите, плиз Сделал на Pascal ABC NET, но нужно его открыть в обычном Pascal ABC. Не компилит...

Перевод из Pascal ABC.net в Pascal ABC
Помогите, пожалуйста, перевести программу в Pascal ABC с Pascal ABC.net; если не трудно, объясните,...

Переделайте, пожалуйста, программу из Turbo pascal в ABC pascal
Помогите, пожалуйста, перевести из PASCAL TURBO в PASCAL ABC Program ProgInt; Uses Crt,...

Перевести в код Pascal ABC из кода Pascal Delphi
Помогите перевести в код ABC а то с Delphi вообще не знаком. Задание было такое: Записать в файл...

4
Почетный модератор
64304 / 47599 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
25.09.2011, 16:18 2
Цитата Сообщение от ZTNGod Посмотреть сообщение
принадлежности точки к квадрату,треугольнику
Определяешь площадь фигуры и площади треуголников, образованных точкой и парами соседних вершин. Если общая площадь=сумме маленьких площадей с заданной точностью, то принадлежит.
Цитата Сообщение от ZTNGod Посмотреть сообщение
кругу.
Если расстояние от точки до центра круга меньше или равно радиусу круга, принадлежит.
Определение расстояния между точками
d:=sqrt(sqr(x2-x1)+sqr(y2-y1));
1
4 / 4 / 1
Регистрация: 29.08.2011
Сообщений: 104
26.09.2011, 14:36  [ТС] 3
Помогите решить задачу:
Дан квадрат, с координатами (13,22) (35,22) (13,44) (35,44), в общем при соединении точек получается квадрат. Нужно определить принадлежность точки к указанной области.
0
Почетный модератор
64304 / 47599 / 32743
Регистрация: 18.05.2008
Сообщений: 115,181
26.09.2011, 14:40 4
Pascal
1
2
if (x>=13)and(x<=35)and(y>=22)and(y<=44) then write('Принадлежит')
else write('Не принадлежит');
1
4 / 4 / 1
Регистрация: 29.08.2011
Сообщений: 104
26.09.2011, 14:55  [ТС] 5
Спасибо
0
26.09.2011, 14:55
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
26.09.2011, 14:55
Помогаю со студенческими работами здесь

Перевести в код Pascal ABC из кода Pascal Delphi
procedure TForm1.Button1Click(Sender: TObject); const n=8; var x:array of real; y,z:array of...

Переписать код из Turbo Pascal в Pascal ABC
Программа 1: program zadacha; uses crt, graph; const m=150; var gd,gm,i,j,s1,s2,c: integer;...

Переписать программу с Turbo Pascal на Pascal ABC
Помогите пожалуйста перевести код с Turbo Pascal на Pascal ABC uses graph,crt; const n=20;...

Переписать код из Turbo Pascal в Pascal ABC
Переписать код из Turbo Pascal в Pascal ABCprogram zadacha; uses crt, graph; const m=150; var...


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

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

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