Ich will dein Prog ja nicht schlecht machen, aber wie micsie schon sagt, das kann man leicht im Taschenrechner machen.
Außerdem sollte man kein real mehr verwenden, nimm besser single, double und real
Aber wir haben ja alle mal so angefangen, also mach dir nix draus...
Man merkt eindeutig, wer mit normalem PASCAL angefangen hat 
Julian J. Pracht