Section courante

A propos

Section administrative du site

RESULT

 Résultat
Delphi/Kylix/Lazarus System

Syntaxe

Var Result:Variant;

Description

Cette variable contient le résultat à retourner par la fonction.

Exemple

Voici un exemple permettant d'afficher le logarithme inférieurs à 2 en le retournant à l'aide de la variable «Result» :

  1. Program ResultSamples;
  2.      
  3. {$APPTYPE CONSOLE}
  4. Uses SysUtils;
  5.        
  6. Function Log(X:Real):Real;Begin
  7.  Result := Ln(X);
  8. End;
  9.          
  10. Var I:Real;
  11.      
  12. BEGIN
  13.  I := 0.1;
  14.  While I <= 2.0 do Begin
  15.   WriteLn('LOG(',I:1:6,')=',Log(I):1:6);
  16.   I := I + 0.1;
  17.  End;
  18. END.

on obtiendra le résultat suivant :

LOG(0.100000)=-2.302585
LOG(0.200000)=-1.609438
LOG(0.300000)=-1.203973
LOG(0.400000)=-0.916291
LOG(0.500000)=-0.693147
LOG(0.600000)=-0.510826
LOG(0.700000)=-0.356675
LOG(0.800000)=-0.223143
LOG(0.900000)=-0.105360
LOG(1.000000)=0.000000
LOG(1.100000)=0.095310
LOG(1.200000)=0.182322
LOG(1.300000)=0.262364
LOG(1.400000)=0.336472
LOG(1.500000)=0.405465
LOG(1.600000)=0.470004
LOG(1.700000)=0.530628
LOG(1.800000)=0.587787
LOG(1.900000)=0.641854

Voir également

Langage de programmation - Delphi/Kylix/Lazarus - Référence des directives de compilation - $ExtendedSyntax
Langage de programmation - Delphi/Kylix/Lazarus - Références de mots réservés (mots clefs) - Function

Dernière mise à jour : Mercredi, le 18 février 2015