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

WRITELN	Écrire avec saut ligne
Turbo Pascal 1+	System

Syntaxe

Procedure WriteLn([var fich:File;]var1, var2,...);

Paramètres

Nom	Description
fich	Ce paramètre permet d'indiquer l'identificateur de fichier
var1, var2	Ce paramètre permet d'indiquer des variables ou du texte à afficher

Description

Cette procédure permet d'écrire différentes données avec un saut de ligne sur une périphérique, dans un fichier ou sur la console.

Remarques

Si aucun paramètre n'est spécifié pour l'appel de cette procédure, un simple saut de ligne sur la console est effectué.
La console est généralement un écran de texte de 40 ou 80 colonnes par 25, 43 ou 50 lignes ou une fenêtre console dans un système d'exploitation comme Windows ou OS/2.
Lorsqu'on cherche à faire sortie une valeur réel, les paramètres de format sont supportées, ainsi on peut indiquer la précision du nombre en ajoutant un deux points (:) pour indiquer le nombre précision avant la fraction et un deuxième deux-points (:) pour indiquer la précision après la fraction.
Il est possible de modifier la couleur de fond de l'écriture en utilisant la procédure TextBackground ou la couleur de l'écriture en utilisant la procédure TextColor. On peut aussi considérablement améliorer le confort de l'utilisation de cette procédure en utilisant l'unité «Crt», laquelle offre la possibilité de changer la résolution d'affichage, le déplacement à des emplacements précis,...
Lorsqu'on utilise la procédure «WriteLn» afin d'écrire dans un fichier, il faut toujours utiliser l'identificateur de fichier comme premier paramètre. De plus, le fichier doit d'abord être ouvert avant d'effectuer des opérations en écriture.
Il s'agit d'une des procédures les plus fondamentales du langage de programmation Turbo Pascal, laquelle est définit dans l'unité «SYSTEM.TPU» du fichier «TURBO.TPL» (mode réel) ou «TPP.TPL» (mode protégé). Parce que le Turbo Pascal charge automatiquement cette unité, il n'est pas nécessaire d'inclure «USES SYSTEM;» à partir de la version 4 à 7 du Turbo Pascal. Le format des fichiers TPU change d'une version de Turbo Pascal à l'autre, voir le Index des extensions de fichier - Format de fichier .TPU.
Pour les versions de Turbo Pascal 1 à 3, aucune optimisation du code de la bibliothèque n'est effectué, et cette procédure est toujours inclus dans le code machine du programme compilé.
Comme n'importe quel autres procédures, fonctions, mots réservés, directives, constantes, variables ou type de données, le Turbo Pascal n'effectue aucun différence entre les majuscules ou les minuscules de l'identification de cette procédure.
Si vous ne voulez pas effectuer de saut de ligne, utiliser plutôt la procédure «Write», laquelle est identique à l'exception de ce détail.

Algorithme

MODULE Write(chaine)
   SI unité Crt est chargé et DirectVideo ALORS
      BOUCLE POUR I ← 1 JUSQU'A Longueur(chaine)
         Memoire(Segment vidéo:Position courante + I) ← chaine(I)
         Position courante ← Position courante + 1
      FIN BOUCLE POUR
   SINON
      chaine ← chaine + '$'
      registre DS ← Segment(chaine)
      registre DX ← Offset(chaine)
      registre AH ← 9
      Interruption 21h
   FIN SI

MODULE WriteLn(valeur)
   APPEL Write(valeur + caractère ASCII 13 + caractère ASCII 10)

Exemple

Voici divers exemple d'affichages de format :

Essayer maintenant !


				
Program WriteLnSamples;

 
BEGIN

 WriteLn('Bonjour!');


 WriteLn('Entier 15 = ',15);

 WriteLn('Chaine de caracteres message = ','message');


 WriteLn('Reel 123.45 = ',123.45);

 WriteLn('Reel 123.45 = ',123.45:3:2);


END.

on obtiendra le résultat suivant :

Bonjour! Entier 15 = 15 Chaine de caracteres message = message Reel 123.45 = 1.2345000000E+02 Reel 123.45 = 123.45

Références

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

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

Section courante

A propos

Section administrative du site

WRITELN