3 / 3 / 0
Регистрация: 19.11.2010
Сообщений: 26
1

окружность и прямая

19.11.2010, 16:56. Показов 733. Ответов 0
Метки нет (Все метки)

найти коорд. точек пересечения прямой y=kx +b и окружности радиуса R с центром в начале координат.Если точек пересечения нет или прямая касается окружности , выдать сообщение

подойдет вот это?
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
var R,k,b,x1,y1,x2,y2,d,a,b1,c:real;
begin
write(' R=');
readln(R);
writeln('k,b:');
readln(k,b);
a:=k*k+1;
b1:=2*k*b;
c:=b*b-r*r;
d:=b1*b1-4*a*c;{дискриминант}
if d<=0 then writeln ('не пересекаются')
else
begin
  x1:=(-b1+sqrt(d))/(2*a);
  y1:=k*x1+b;
  x2:=(-b1-sqrt(d))/(2*a);
  y2:=k*x2+b;
  if x1=x2 then
  writeln('касается')
  else writeln ('пересекает в двух точках');
     writeln('x1=',x1:0:2,'  y1=',y1:0:2,'  x2=',x2:0:2,'  y2=',y2:0:2);
     end;
     end.
Добавлено через 22 минуты
за что спасибо, может где-то неправильно)
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
1
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
19.11.2010, 16:56
Ответы с готовыми решениями:

Задана окружность и прямая. Определить, пересекаются ли прямая и окружность
Задана окружность с центром в точке O(0,0) и радиусом R0, и прямая y = ax+b. Определить,...

Написать программу, проверяющую, пересекаются ли окружность и прямая, или они касаются друг друга, или не пересекаются и не касаются
Заданы окружность радиуса R с центром в начале координат и прямая, проходящая через точки А (х; у)...

Движущаяся прямая и окружность
Изобразить движущуюся прямую, которая в каждый момент касается окружности данного радиуса, центр...

Прямая и окружность
Есть прямая, заданая уравнением Ax+By+C=0 И окружность с координатами центра и радиусом Нужно...

0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
19.11.2010, 16:56

Окружность и прямая
Помогите написать программу на чистом Си. Вот условие:&quot;Дана окружность с координатами Xо,Yo и...

Пересекает ли прямая окружность
Есть класс окружность. Нужно создать метод &quot;добавить/удалить прямую сечения&quot;. Прямую задаём двумя...

Определить, пересекаются ли прямая и окружность
Задана окружность с центром в точке О(x0,y0) и радиусом R и прямая у=ах+b. Определить, пересекаются...

Определить, пересекаются ли прямая и окружность
Задана окружность с центром в точке x0, y0 и радиусом R0 и прямая y=ax+b. Определить, пересекаются...


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

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

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