# Geradengleichung aus zwei Punkten

## Problembeschreibung

******************************************
Dokumentnummer: D1028
Quelle: Johann Weilharter
             Analytische Geometrie 2
******************************************

Man kennt zwei Punkte. Die Geradengleichung durch
diese zwei Punkte ist gesucht.

## Problemlösung

EINGABE

P:read("Gib eine Liste mit 2 Punkten ein");

VERARBEITUNG

globalsolve:true;

x1:P[1][1];

y1:P[1][2];

x2:P[2][1];

y2:P[2][2];

g(x,y):=y=k*x+d;

g1:g(x1,y1);

g2:g(x2,y2);

solve([g1,g2],[k,d]);

gerade:y=k*x+d;

AUSGABE

print("Die Gerade ist",gerade)$