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

@EdinDzeko · Регистрация: 23.10.2014

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

Даны коэффициенты прямой y=kx+b. Найти координаты ее пересечения с линией y=x.

@Puporev · 23.09.2015, 21:34

Pascal

var k,b,x,y:real;
begin
writeln('Введите k,b');
readln(k,b);
if(k=1)and(b=0) then write('Прямые совпадают')
else if k=1 then write('Прямые параллельны')
else
 begin
  x:=-b/(k-1);
  y:=x;
  write('Прямые пересекаются в точке x=',x:0:2,' y=',y:0:2);
 end;
end.

@EdinDzeko -25 / 0 / 0 Регистрация: 23.10.2014 Сообщений: 99
		1
	Найти координату пересечения прямых 23.09.2015, 21:23. Показов 4876. Ответов 1 Метки нет (Все метки) Даны коэффициенты прямой y=kx+b. Найти координаты ее пересечения с линией y=x. 0

	23.09.2015, 21:34

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

Решение