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).
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 :