# Kreisfläche bei gegebenem Umfang

## Problembeschreibung

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

Gegeben ist der Umfang eines Kreises.
Zu berechnen sind
a) Radius
b) Fläche

Die Fläche soll, auf 2 Stellen gerundet, ausgegeben werden!

## Problemlösung

EINGABE

U:read("Gib den Umfang des Kreises ein");

VERARBEITUNG

r:U/(2.0*%pi);

F:r**2*%pi;

F:F,numer;

F:floor(F*100+0.5)/100.0;

AUSGABE

print("Die gesuchte Fläche ist",F)$