Home
About
C
Pascal
Allegro
Évolution
Liens
Downloads
Email

Turbo Pascal

Le Turbo Pascal est un language simple. C'est l'ancêtre du C et du C++. Il permet d'arriver assez rapidement à de bons résultats. Écrire en mode texte est accessible dès le début, gérer le temps est la deuxième étape et déjà on voit apparaître le mode graphique.
Entrons maintenant dans le vif du sujet. Pour trouver le Turbo Pascal, si vous ne l'avez pas déjà! il suffit de nous en envoyer la demande par E-mail.


Tout programme commence par le mot "Program" suivit par le nom du programme et terminé par un point virgule(;). Comme en C ou C++, toutes les lignes finissent par un point virgule sauf celles qui contienent un "mot clé" ou un mot système comme "if", "while", "repeat" ou "begin".

Sur une autre ligne, on met ensuite le mot "Uses" suivit des bibliothèques qui seront utilisées. Crt est celle qui est la plus souvent utilisée, car elle concerne le mode texte (et la couleur), le haut-parleur interne, le clavier et le temps. D'autres bibliothèques peuvent aussi être utilisées dont Graph, Dos, Printer, System ou WinDos.

On ajoute sur une autre ligne (ou même sur la même ligne après le point virgule, mais c'est désordonné) le mot réservé "Var" suivit du nom de variable, d'un (:), du type de variable (Integer, real, boolean, text, string...) et du coutumier point virgule(;). On peut séparer d'une virgule différents noms de variables : cela cré plusieurs variables du même type.

Maintenant la partie intéressante d'un programme! On écrit sur une nouvelle ligne le mot système "Begin" et on passe à la ligne suivante.




Procédures

Voici les différentes procédures et fonctions possibles. La bibliothèque System compose une exception puisqu'elle est toujours incluse. C'est une bibliothèque de base, il est donc inutile de la mettre dans Uses. (Des exemples sont entre crochets[] et la bibliothèque requise entre parenthèses) :

Clrscr : Pour CLeaR SCReen. Efface l'écran en mode texte et remet le curseur en haut à gauche de celui-ci. [Clrscr;] (Crt)

Write : Cette fonction permet d'écrire à l'écran du texte et la valeur de variables. Faites attention à l'écriture, car en Pascal, on ne met pas des guillemets(") pour encadrer notre texte, mais bien des apostrophes('). Pour écrire des mots contenant des apostrophes, il suffit d'en mettre 2 de suite. [Write('Bonjour ',VariableNom,' ! C''est amusant le TurboPascal!');] (System)

Writeln : C'est une variante de Write. La seule différence est qu'un ENTER est ajouté (à l'exécution) et le prochain texte affiché débutera à gauche sur la ligne en dessous. [Writeln('Je passe 2 lignes :');Writeln;Writeln;Writeln('2 lignes sont passées.');] (System)

TextColor : Permet de changer la couleur du texte qui sera écrit à l'écran. Les différentes couleurs possibles sont : 0(Noir) 1(bleu) 2(vert) 3(cyan) 4(rouge) 5(magenta) 6(brun) 7(gris pâle) 8(gris foncé) 9(bleu pâle) 10(vert pâle) 11(cyan pâle) 12(rouge pâle) 13(magenta pâle) 14(jaune) 15(blanc). En ajoutant 128 à votre couleur, vous la faites clignoter! [Textcolor(3);Write('Ceci est coloré!');] (Crt)

Read : Lis les caractères tapés au clavier jusqu'à ce que ENTER soit appuyé et les enregistre dans une variable au besoin. Le caractère ENTER n'est pas inclu dans le texte enregistré, il reste dans la mémoire tampon (key buffer). Read permet aussi et surtout de lire de l'information contenue dans un fichier enregistré sur un disque.[Write('Quel âge avez-vous? ');Read(VarAge);Write(' Vous avez ',VarAge,' ans.');] (System)

Readln : Lis les caractères tapés au clavier jusqu'à ce que ENTER soit appuyé et les enregistre dans une variable au besoin. Il est très utile d'utiliser Readln sans attributs(ce qu'il y a dans les parenthèses), car cette fonction demande uniquement à l'utilisateur d'appuyer sur ENTER : en fait, c'est une pause. La majeure différence avec Read, est que ce dernier code est plus utilisé pour lire des fichiers. Comme avec Read, il y a saut de ligne après la lecture. Il est préférable d'utiliser Readln, car dans [Write('Quel est votre nom?');Read(VarNom);Write('Votre nom est ',VarNom);Read;], le deuxième Read ne fera jamais effet parce que tous les Read qui suivent le premier Read sont ignorés s'ils ne sont pas séparés de Readln. Il faut donc "fermer" un Read avec Readln de la manière qu'on "ferme" un Begin avec un End. Dans l'exemple qui suit, le deuxième Readln sert à faire une pause avant que le programme ne se termine. [Write('Quel est votre nom?');Read(VarNom);Write('Votre nom est ',VarNom,'.');Readln;Readln;] (System)

Delay : En construction ... [] (Crt)




Types de variables

(Les étendues sont entre parenthèses) : 
Integer:

  - ShortInt     (-128 à 127)
  - Integer       (-32768 à 32767)
  - LongInt     (-2147483648 à 2147483647)
  - Byte           (0 à 255)
  - Word         (0 à 65535)
Boolean:

  -Boolean      (vrai ou faux qui s'écrit : True/False)

  -WordBool  (")

  -LongBool   (")

  -ByteBool    (" .Ces trois derniers ont pour but la compatibilité avec Windows)

String:

  -String    (Contient du texte. Ex: 'Texte'. Si la taille n'est pas spécifiée, elle prends 255)

Voilà les types de variables les plus utiles. Si vous croyez manquer de précision dans vos nombre parce que vous avez l'intention de travailler avec des distances atomiques, rassurez-vous puisqu'il existe le Extended qui va de 3.4^-4932 à 1.1^4932 !!!