Langage de programmation - Turbo Pascal - Référence de procédures et de fonctions

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

Contrairement au QBASIC/QuickBasic (Sqr) ou au GWBASIC (Sqr), le Turbo Pascal utilise plutôt la fonction Sqrt pour obtenir la racine carré.
Le résultat et sa précision dépendront beaucoup du mode de traitement de l'unité mathématique de calcul, soit le coprocesseur mathématique 80x87 (l'option de la directive de compilation {$N+}) ou de l'émulateur de coprocesseur mathématique utilisable avec l'option {$E+}.

Algorithme

MODULE SQR(X)
RETOURNE X x X

Exemple

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


				
Program SqrSamples;

 
BEGIN

 WriteLn('Sqr(1) = ',Sqr(1));


 WriteLn('Sqr(2) = ',Sqr(2));

 WriteLn('Sqr(3) = ',Sqr(3));


 WriteLn('Sqr(4) = ',Sqr(4));

 WriteLn('Sqr(8) = ',Sqr(8));


 WriteLn('Sqr(16) = ',Sqr(16));

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

Section courante

A propos

Section administrative du site

SQR