Section courante

A propos

Section administrative du site

SQR

Carré
Turbo Pascal 3+ System

Syntaxe

Function Sqr(x:Integer):Integer;
Function Sqr(x:Real):Real;

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.

Remarques

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. BEGIN
  4.  WriteLn('Sqr(1) = ',Sqr(1));
  5.  WriteLn('Sqr(2) = ',Sqr(2));
  6.  WriteLn('Sqr(3) = ',Sqr(3));
  7.  WriteLn('Sqr(4) = ',Sqr(4));
  8.  WriteLn('Sqr(8) = ',Sqr(8));
  9.  WriteLn('Sqr(16) = ',Sqr(16));
  10. 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

Référence

Aide-mémoire de Turbo Pascal versions de 3 à 6, Edition Marabout, De Groote, Virga, 1992, ISBN: 2-501-01833-8, page 419.

Dernière mise à jour : Dimanche, le 8 février 2015