aus Paswiki Turbo Pascal, der freien Wissensdatenbank

Beschribung

Dieses Programm rechnet für Sie mit Potenzen der Form x hoch y.

Programm

uses crt,dos;
var  x,y,ergeb:real;
begin
writeln('Dieses Programm rechnet fuer Sie x hoch y aus !');
writeln('x (Bais) = ?');
readln(x);
writeln('y (exponent) = ?');
readln(y);
ergeb:=exp(y*ln(x));
write(x:5:5,' hoch ',y:5:5,' ergibt : ');
writeln(ergeb:10:5);
readln;
end.

---

--Gastarbeiter 16:05, 27. Feb 2006 (CET)

---