Einzelnen Beitrag anzeigen

PomBär

Registriert seit: 28. Sep 2003
Ort: MV
57 Beiträge
 
Delphi 6 Professional
 
#1

Vorzeichen eines Parameters übergenben

  Alt 26. Nov 2003, 11:34
hi leute ich hab von meinem lehrer ne schöne aufgabe bekommen und sehe da irgendwie gar nicht durch könnt ihr mir helfen?
Aufgabe: ändern sie die beispiele:
die funktion quadrat soll dem ergebnis das vorzeichen des parameters mitgeben

Delphi-Quellcode:
function Quadrat(x:double):double;
begin
  result := x*x;
  //oder: Quadrat :=x*X;
end;
...

begin //Hauptprogramm
...
if Quadrat(k) kleiner 10 then //erlaubt,
   //wenn k Fuktion, Konstante oder
   //Variable eines Gleitkomma-Typs
...
Quadrat('Hi'), //Fehler weil string
               //übergeben
ich hoffe irgendjemand kann mir helfen.
danke im vorraus


[edit=Admin]Code in Delphi-Tags eingebettet. Künftig bitte selber machen. Mfg, Daniel[/edit]
  Mit Zitat antworten Zitat