Найти координаты точки пересечения окружности

@Eksly · Регистрация: 23.03.2015

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

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

@Puporev · 09.12.2015, 18:25

Pascal    
        
            
                
                
                
                
            
        
    Скопировано
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
var r,x0,y0,u,x,y:real;
begin
repeat
write('Радиус окружности r=');
readln(r);
until r>0;
writeln('Введите координаты центра окружности');
readln(x0,y0);
repeat
write('Введите угол от 0 до 360 градусов u=');
readln(u);
until(u>=0)and(u<=360);
u:=u*pi/180;
x:=x0+r*cos(u);
y:=y0+r*sin(u);
write('x=',x:0:2,'  y=',y:0:2)
end.

@Eksly · 09.12.2015, 18:32 **[ТС]**

Благодарю вас

Новые блоги и статьи Все статьи Все блоги /
Работа с объемным DOM в javascript Htext 04.04.2025 Сегодня прочитал статью тут о расходах памяти в JS, ее утечках и т. п. И вот что вспомнил из своей недавней практики. Может, кому пригодится. Хотя, в той статье об этом тоже есть. Дело в том, что я. . .	Оптимизация производительности Node.js с помощью кластеризации run.dev 04.04.2025 Масштабирование приложений для обработки тысяч и миллионов запросов — обыденная задача для многих команд. Node. js, благодаря своей асинхронной событийно-ориентированной архитектуре, стал популярной. . .	Управление зависимостями в Python с Poetry py-thonny 04.04.2025 Стандартный инструмент для установки пакетов в Python - pip - прекрасно справляется с базовыми сценариями: установил пакет командой pip install и используешь его. Но что произойдёт, когда разные. . .	Мониторинг с Prometheus в PHP Jason-Webb 04.04.2025 Prometheus выделяется среди других систем мониторинга своим подходом к сбору и хранению метрик. В отличие от New Relic, который использует агентный подход и отправляет данные во внешнее хранилище,. . .	Пакет Context в Golang: Управление потоками и ресурсами golander 04.04.2025 Работа с горутинами в Go часто напоминает управление непослушными детьми - они разбегаются кто куда, делают что хотят и не всегда завершаются вовремя. К счастью, в Go 1. 7 появился пакет context,. . .
Контейнеризация React приложений с Docker Reangularity 03.04.2025 Контейнеризация позволяет упаковать приложение со всеми его зависимостями в автономный контейнер, который можно запустить на любой платформе с установленным Docker. Это существенно упрощает процессы. . .	Свой попап в SwiftUI mobDevWorks 03.04.2025 SwiftUI, как декларативный фреймворк от Apple, предоставляет множество инструментов для создания пользовательских интерфейсов. В нашем распоряжении есть такие API как alerts, popovers, action sheets. . .	Антипаттерны микросервисной архитектуры ArchitectMsa 03.04.2025 Хорошо спроектированная микросервисная система может выдержать испытание временем, оставаясь гибкой, масштабируемой и устойчивой к большинству проблем. Такая архитектура обладает высоким уровнем. . .	std::mutex в C++: Советы и примеры использования bytestream 03.04.2025 std::mutex - это механизм взаимного исключения, который гарантирует, что критический участок кода выполняется только одним потоком в каждый момент времени. Это простое, но могущественное средство. . .	Не удержался от оценки концепции двигателя Стирлинга. Hrethgir 03.04.2025 Сколько не пытался - она выдавала правильные схемы, причём случайно рисовала горячие области в середине, холодные по краям, трубки с краёв в низ и магнит в соединяющей, но при этой выдавала описание. . .

@Eksly 0 / 0 / 0 Регистрация: 23.03.2015 Сообщений: 7

	Найти координаты точки пересечения окружности 09.12.2015, 18:03. Показов 2822. Ответов 2 Метки нет (Все метки) Здравствуйте. Нужно написать программу на паскале. Заданы координаты центра окружности, ее радиус и значение некоторого угла. Найти координаты точки пересечения окружности и луча, исходящие из ее центра под заданным углом. Заранее спасибо. 0

@Eksly 0 / 0 / 0 Регистрация: 23.03.2015 Сообщений: 7
	09.12.2015, 18:32 [ТС]
	Благодарю вас 0

Найти координаты точки пересечения окружности

Решение