Le langage Pascal

Organisation

Le Pascal est un langage différenciant les fonctions (retournant une valeur) des procédures (effectuant uniquement un traitement).

Librairies réutilisables (.tpu en Turbo Pascal).

Exemples

Un exemple de code source Turbo Pascal est :

program ExemplePascal; { Exemple de programme Pascal }

uses Dos, Crt;

type PtrDiskParam = ^DiskParamBlock;
DiskParamBlock = record
Segment, Offset : Word;
Suivant : PtrDiskParam;
end;

var List : PtrDiskParam;

function SegPremierDBP : Word;
var Regs : Registers;
begin
if (
regs.Flags and 1 = 1) then
SegPremierDBP := $FFFF;
else
SegPremierDBP := MemW[Regs.Es:(Regs.Bx+2)];
end;


procedure ConstruitListe (var PtrListe : PtrDiskParam);
var Actuel, Suivant : PtrDiskParam;
begin
Actuel := PtrListe;
while
actuel^.Offset <> $FFFF do
begin
{ Etc. }
end;
end;


begin
ConstruitListe (Liste);
end.

Des exemples de Pascal sont :

Notes