Section courante

A propos

Section administrative du site

SQR

Carré
Delphi/Kylix/Lazarus System

Syntaxe

Function Sqr(X:Extended):Extended;

Paramètres

Nom Description
X Ce paramètre permet d'indiquer l'expression contenant le nombre à traiter

Description

Cette fonction retourne le carré d'un nombre.

Algorithme

MODULE SQR(X)
      RETOURNE X x X

Exemple

Cet exemple permet de montrer une simple définition d'un type «Octet» :

  1. Program SqrSamples;
  2.  
  3. {$APPTYPE CONSOLE}
  4. Uses SysUtils;
  5.      
  6. BEGIN
  7.  WriteLn('Sqr(1) = ',Sqr(1));
  8.  WriteLn('Sqr(2) = ',Sqr(2));
  9.  WriteLn('Sqr(3) = ',Sqr(3));
  10.  WriteLn('Sqr(4) = ',Sqr(4));
  11.  WriteLn('Sqr(8) = ',Sqr(8));
  12.  WriteLn('Sqr(16) = ',Sqr(16));
  13. END.

on obtiendra le résultat suivant :

Sqr(1) = 1
Sqr(2) = 4
Sqr(3) = 9
Sqr(4) = 16
Sqr(8) = 64
Sqr(16) = 256

Voir également

Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - Dec
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - Inc
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - Sqrt
Langage de programmation - Delphi/Kylix/Lazarus - Référence de procédures et fonctions - Sum

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