aus Paswiki Turbo Pascal, der freien Wissensdatenbank

Beschreibung

Gibt die Wurzel des Wertes zurück.

Deklaration

function sqrt(zahl:real,integer);

Beispiel

var zahl:integer;

begin
writeln('Aus welcher Zahl erwuenschen Sie die Wurzel ?');
writeln;
readln(zahl);
zahl:=sqrt(zahl);
writeln('Das Ergebnis ist ',zahl);
readln;
end. 

---