# Kreis und Ellipse

## Problembeschreibung

******************************************
Dokumentnummer: D1020
Quelle: Johann Weilharter,
             Analytische Geometrie 2
******************************************
Gegeben sind die Gleichungen eines Kreises und einer Ellipse.
Etwaige Schnittpunkte sind zu bestimmen.

## Problemlösung

EINGABE

kreis:read("Gib einen Kreis ein");

ellipse:read("Gib eine Ellipse ein");

VERARBEITUNG

realonly:true;

loesung:solve([kreis,ellipse],[x,y]);

loesung:loesung,numer;

n:length(loesung);

AUSGABE

if n>0 then print("Die",n," Schnittpunkte sind",loesung) else print("Es gibt keine Schnittpunkte")$