# Lagebeziehung Kreis und Gerade

## Problembeschreibung

******************************************
Dokumentnummer: D1019
Quelle: Johann Weilharter,
             Analytische Geometrie 2
******************************************

Gegeben sind ein Kreis und eine Gerade.
Es ist zu bestimmen, ob 
a) eine Sekante
b) eine Tangente
c) eine Passante 
vorliegt

## Problemlösung

EINGABE

kreis:read("Gib die Gleichung eines Kreises ein");

g:read("Gib die Gerade ein");

VERARBEITUNG

y1:solve(g,y);

k1:kreis,y1[1];

l:realroots(k1);

n:length(l);

AUSGABE

if n=0 then print("Die Gerade ist eine Passante")$

if n=1 then print("Die Gerade ist eine Tangente")$

if n=2 then print("Die Gerade ist eine Sekante")$