Section courante

A propos

Section administrative du site

POWER

 Puissance
Delphi/Kylix/Lazarus Math

Syntaxe

Function Power(Base,Exponent:Extended):Extended;

Paramètres

Nom Description
Base Ce paramètre permet d'indiquer la base de la puissance.
Exponent Ce paramètre permet d'indiquer la puissance.

Description

Cette fonction permet d'effectuer le calcul d'une base spécifié à la puissance spécifié.

Algorithme

MODULE POWER(a,b)
   p ← 1
   BOUCLE POUR i ← 1 JUSQU'A b
      p ← p x a
   FIN BOUCLE POUR
   RETOURNE p

Exemple

Voici des exemples permettant d'afficher des fonctions de puissance :

  1. Program PowerSamples;
  2.  
  3. {$APPTYPE CONSOLE}
  4.  
  5. Uses SysUtils,Math;
  6.  
  7. BEGIN
  8.  WriteLn('POWER(0,1)=',Power(0,1):1:1);
  9.  WriteLn('POWER(1,1)=',Power(1,1):1:1);
  10.  WriteLn('POWER(-1,0)=',Power(-1,0):1:1);
  11.  WriteLn('POWER(-1,1)=',Power(-1,1):1:1);
  12.  WriteLn('POWER(2,2)=',Power(2,2):1:1);
  13.  WriteLn('POWER(2,8)=',Power(2,8):1:1);
  14.  WriteLn('POWER(30,2)=',Power(30,2):1:1);
  15.  WriteLn('POWER(-35,4)=',Power(-35,4):1:1);
  16. END.

on obtiendra le résultat suivant :

POWER(0,1)=0.0
POWER(1,1)=1.0
POWER(-1,0)=1.0
POWER(-1,1)=-1.0
POWER(2,2)=4.0
POWER(2,8)=256.0
POWER(30,2)=900.0
POWER(-35,4)=1500625.0

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