Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.72/25: Рейтинг темы: голосов - 25, средняя оценка - 4.72
1 / 1 / 0
Регистрация: 07.11.2010
Сообщений: 8
1

точка с координатами x и y лежит внутри круга радиуса 5 с центром в точке (5, 2)

12.11.2010, 13:53. Показов 5222. Ответов 3
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Как Написать следующее выражение на языке Pascal: точка с координатами x и y лежит внутри круга радиуса 5 с центром в точке (5, 2).
Ребята подскажите пожалуйста! Заранее спасибо!
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
12.11.2010, 13:53
Ответы с готовыми решениями:

Определить, лежит ли точка с координатами (X,Y) вне круга радиуса R с центром в точке (А,В) или внутри него
Определить лежит ли точка с координатами (X,Y) вне круга радиуса R с центром в точке (А,В) или...

Написать программу по условию, и определить истину или ложь. Точка (x,y) лежит вне круга радиуса R центром в точке (1,0)
Задача: Написать программу по условию, и определить истину или ложь Условие: Точка (x,y) лежит вне...

Выяснить принадлежит ли точка с координатами (x1,y1), кругу радиуса r с центром в точке (x,y)
Выяснить принадлежит ли точка с координатами (x1,y1), кругу радиуса r с центром в точке (x,y),...

лежит ли точка с координатами (x,y) внутри круга с радиусом r
даны координаты центра круга (x,y) x=2 y=4 с радиусом r=1 дана точка с координатами (x1,y1)...

3
0 / 0 / 1
Регистрация: 03.11.2010
Сообщений: 29
12.11.2010, 14:03 2
Pascal
1
2
3
4
5
6
7
8
9
10
Var 
    x, y, x1, y1, s, r : Real;
Begin
Readln(x1,y1,x,y,r); {x1, y1 - координаты точки, x, y - центр окружности, r - радус}
s := sqrt( sqr(x - x1) + sqr(y - y1));
if s<r then 
    writeln('Точка лежит в окружности')
else 
    writeln('Точка НЕ лежит в окружности')
End.
0
Почетный модератор
 Аватар для Puporev
64305 / 47602 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
12.11.2010, 14:13 3
Цитата Сообщение от Mironov Посмотреть сообщение
Как Написать следующее выражение
Pascal
1
2
3
var f:boolean;
......
f:=sqrt( sqr(x - 5) + sqr(y - 2))<r;
1
1 / 1 / 0
Регистрация: 07.11.2010
Сообщений: 8
12.11.2010, 14:17  [ТС] 4
Цены нет этому форуму и людям на нем ! всем спасибо!
1
12.11.2010, 14:17
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
12.11.2010, 14:17
Помогаю со студенческими работами здесь

Bычислить расстояние от точки плоскости с кординатами X, Y до круга радиуса R с центром в точке X0, Y0.
Bычислить расстояние от точки плоскости с кординатами X, Y до круга радиуса R с центром в точке...

Подсчитать количество точек, лежащих вне круга радиуса 2 с центром в точке (2, 2)
подсчитать количество точек, лежащих вне круга радиуса 2 с с центром в точке (2,2) помогите...

Определить взаимное расположение точки с координатами (х0,y0) и окружности радиуса R с центром в точке (х1,у1)
Определить взаимное расположение точки с координатами (х0,y0) и окружности радиуса R с центром в...

Выбрать все точки совокупности, лежащие вне круга заданного радиуса R с центром в заданной точке
Дана совокупность N различных точек плоскости. Выбрать все точки совокупности, лежащие вне круга...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
Rust или Go? А может C++?
hw_wired 28.01.2025
С каждой новой технологией или методологией появляются новые языки программирования, призванные решать конкретные задачи либо улучшать аспекты производительности и безопасности. Среди множества. . .
Fortran и WinAPI: как создать приложение с графическим интерфейсом
hw_wired 28.01.2025
Fortran — это один из старейших высокоуровневых языков программирования, широко используемый в науке и инженерии уже несколько десятилетий. Его название происходит от "Formula Translation" (перевод. . .
Списки в Haskell
hw_wired 28.01.2025
Haskell является функциональным языком программирования, который отличается лаконичностью синтаксиса и мощными абстракциями. Важным концептом в Haskell являются списки — упорядоченные коллекции. . .
Функции высшего порядка в Haskell
hw_wired 28.01.2025
Haskell – это современный функциональный язык программирования, который получил широкое распространение благодаря своей выразительности и мощным абстракциям. Одной из ключевых особенностей Haskell. . .
Как в цикле обойти все поля объекта в JavaScript
bytestream 28.01.2025
Объекты в JavaScript представляют собой фундаментальные структуры данных, которые позволяют хранить и организовывать связанную информацию в виде пар ключ-значение. Каждый объект можно представить как. . .
Как выбрать строки в DataFrame по значению столбца в Pandas
bytestream 28.01.2025
В области анализа данных библиотека Pandas стала незаменимым инструментом для работы с табличными данными в Python. Эта мощная библиотека предоставляет множество функций для эффективной обработки и. . .
Как сделать перенос строки в Bash
bytestream 28.01.2025
При работе с командной оболочкой Bash разработчики часто сталкиваются с необходимостью форматирования текстового вывода, где ключевую роль играет правильное управление переносами строк. Умение. . .
Поиск подстроки в строке с помощью Bash
bytestream 28.01.2025
Поиск подстроки в строке является одной из важных задач в программировании и обработке текстов. Применение такого поиска можно найти в самых разных областях, от анализа данных до разработки. . .
[golang] 169. Majority Element
alhaos 28.01.2025
Тут надо вернуть "мажористый" элемент который встречается в слайсе больше чем в половине случаев. По условиям задачи во входных данных такой элемент обязан присутствовать. / / . . .
Когда лучше использовать LinkedList вместо ArrayList в Java
bytestream 28.01.2025
При разработке Java-приложений выбор правильной структуры данных играет ключевую роль в обеспечении эффективности и производительности программы. ArrayList и LinkedList являются двумя. . .
Какой ответ HTTP лучше использовать: 403 Forbidden или 401 Unauthorized, когда недостаточно прав
bytestream 28.01.2025
В современной веб-разработке правильная обработка ошибок и точное информирование клиентов о статусе их запросов играют критическую роль в создании надежных и безопасных приложений. Особое внимание. . .
Как получить список всех файлов коммита в Git
bytestream 28.01.2025
Система контроля версий Git представляет собой мощный инструмент для управления изменениями в программном коде и других файлах проекта. В основе работы Git лежит концепция коммитов - снимков. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru