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

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


textual

Код к задаче: «Найти координату пересечения прямых - Pascal ABC»

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.

СДЕЛАЙТЕ РЕПОСТ

15   голосов, оценка 4.200 из 5



Похожие ответы
  1. Пересекаются ли отрезки заданными координатами (x1;y1),(x2;y2),(x3;y3),(x4;y4)

  1. Найти координаты пунктов пересечения двух окружностей радиусами и с центрами в пунктах (;) и (;) соответственно.

  1. Есть три массива A={1,3,4,5,10}, B={3,5,7,8,9}, C={3,5,6,9,10} Надо вычислить и вывести результат в виде 4 массива

  1. Нужно написать программу, изображающую два графика с указанием точек пересечения y=|x^2-5*x+6|и y=2*x Help please

  1. Нужно написать программу, изображающую два графика с указанием точек пересечения y=-x^2-5x+6 и y=|x-1| Помогите пожалуйста

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

  1. Задано множество прямых на плоскости(коэффициентами своих уравнений). Посчитать количество точек пересечения этих прямых.

  1. Поле имеет форму треугольника, ограниченного пересекающимися в его вершинах дорогами. Найти площадь этого поля, если известны расстояния: а) от пересечения каждых двух дорог до третьей. б) между каждыми двумя пересечениями дорог. Помогите пожалуйста

  1. описать тип записи круг, содержащий информацию о радиусе и центре(координаты х и у). ввести массив из n кругов и выяснить, пересекаются ли они друг с другом. (координаты Х и У, и радиус надо ввести с клавиатуры)!!!!!