Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.87/15: Рейтинг темы: голосов - 15, средняя оценка - 4.87
Askael
2 / 2 / 0
Регистрация: 17.09.2010
Сообщений: 13
1

Будут ли прямые перпендикулярны?

01.10.2010, 14:16. Просмотров 2831. Ответов 10
Метки нет (Все метки)

Написать прогу Б определяющюю будут ли прямые A1x+B1y+C1=0 и A2x+B2y+C2=0 перпендикулярны.
Если нет , то найти угол между ними.
0
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
01.10.2010, 14:16
Ответы с готовыми решениями:

Определить, будут ли прямые параллельны и перпендикулярны
Составить программу даны координаты 4 точек на плоскости , 1 и 2 точки определяют первую прямую, 3...

Будут ли прямые перпендикулярны: А1х+В1у+С1=0 и А2х+В2у+С2=0
.......

Написать программу, определяющую, будут ли прямые
Написать программу, определяющую, будут ли прямые А1х + В1у + С1 = 0 и А2х + В2у + С2 = 0...

Даны две прямые, заданные уравнениями Если эти прямые параллельны, то определить расстояние между ними
Даны две прямые, заданные уравнениями у=k1x+b1 и y=k2x+b2. Если эти прямые параллельны, то...

Написать программу, определяющую, будут ли прямые перпендикулярны
Написать программу, определяющую, будут ли прямые A1X+B1Y+С1=0 и A2X+B2Y+С2=0 перпендикулярны. Если...

10
iama
1294 / 983 / 119
Регистрация: 30.07.2010
Сообщений: 5,297
01.10.2010, 14:20 2
Цитата Сообщение от Askael Посмотреть сообщение
A1x+B1y+C1=0
это не линейная функция
0
Puporev
Модератор
57476 / 43828 / 30283
Регистрация: 18.05.2008
Сообщений: 104,620
01.10.2010, 14:29 3
iama, А какая?

Добавлено через 47 секунд
Всегда думал что уравнение прямой ax+by+c=0
0
iama
1294 / 983 / 119
Регистрация: 30.07.2010
Сообщений: 5,297
01.10.2010, 14:31 4
Puporev, уравнение прямой - ax + b = 0;
0
01.10.2010, 14:31
Puporev
Модератор
57476 / 43828 / 30283
Регистрация: 18.05.2008
Сообщений: 104,620
01.10.2010, 14:36 5
http://ru.wikipedia.org/wiki/%D0%9F%D1%80%D1%8F%D0%BC%D0%B0%D1%8F
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
uses crt;
var a1,b1,c1,a2,b2,c2:integer;
    u:real;
begin
clrscr;
writeln('Введите коэффициенты двух прямых, целые числа:');
repeat
writeln(' -  коэффициенты первой прямой:');
readln(a1,b1,c1);
if (a1=0)and(b1=0) then writeln('Это не прямая, повторите ввод.');
until (a1<>0)or(b1<>0);
repeat
writeln(' -  коэффициенты второй прямой:');
readln(a2,b2,c2);
if (a2=0)and(b2=0) then writeln('Это не прямая, повторите ввод.');
until (a2<>0)or(b2<>0);
if a1*a2+b1*b2=0 then write('Прямые перепендикулярны')
else
 begin
  u:=abs((arctan((a1*b2-a2*b1)/(a1*a2+b1*b2)))*180/pi);
  write('Прямые не перепендикулярны, угол=',u:0:2,#248);
 end;
readln
end.
Добавлено через 51 секунду
уравнение прямой - ax + b = 0;
А ax-b=0 это уже кривая....
0
iama
1294 / 983 / 119
Регистрация: 30.07.2010
Сообщений: 5,297
01.10.2010, 14:40 6
Цитата Сообщение от Puporev Посмотреть сообщение
А ax-b=0 это уже кривая....
на той же странице в википедии написано тремя строчками ниже, что ту же самое можно задать, там только
y = kx + b
0
Puporev
Модератор
57476 / 43828 / 30283
Регистрация: 18.05.2008
Сообщений: 104,620
01.10.2010, 14:41 7
iama, Извини конечно, но стукнись пару раз башкой апстену, может пройдет...
0
Humanoid
Почетный модератор
10091 / 3955 / 369
Регистрация: 12.06.2008
Сообщений: 11,561
01.10.2010, 14:46 8
Цитата Сообщение от iama Посмотреть сообщение
y = kx + b
Это тоже самое, что и
kx - y + b = 0
А ты предлагал
ax + b = 0
...тут вообще "y" нету... получается, что это плоскость получится, т.к. при каждом значении "x" значение "y" может быть от минус бесконечности до плюс бесконечности.
0
iama
1294 / 983 / 119
Регистрация: 30.07.2010
Сообщений: 5,297
01.10.2010, 14:49 9
Puporev, извини, конечно, но нецензурное выражение. описАлся и не вчитал, что такого-то?
и спасибо за карточку
0
vital792
2006 / 1278 / 60
Регистрация: 05.06.2010
Сообщений: 2,213
01.10.2010, 14:57 10
Цитата Сообщение от Humanoid Посмотреть сообщение
ax + b = 0
на плоскости будет прямая параллельная оси OY
0
Humanoid
Почетный модератор
10091 / 3955 / 369
Регистрация: 12.06.2008
Сообщений: 11,561
01.10.2010, 15:24 11
vital792, и правда я ступил
0
01.10.2010, 15:24
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
01.10.2010, 15:24

При каком значении m прямые будут взаимно перпендикулярны
10. При каком значении m прямые (система) 3x-4y+5z-18=0 и 6x-5y+z-27=0 и (x+1)/3=(y-2)/m=(z-4)/5 ...

Узнать перпендикулярны ли прямые
Даны две прямые y=a1*x+c1 и y=a2*x+c2. Определить условие перпендикулярности прямых, и если оно не...

Определить значения, при которых векторы будут перпендикулярны
Даны два вектора вектор a=(4;m;-6); вектор b=(m;2;-7). При каком значении m эти векторы...


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

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

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