Program HelloWorld; (*On spécifie le nom du programme*)
Begin (*Début du programme*)
  Write('Hello World');
End.
									

Program HelloWorld; (* On spécifie le nom du programme *)
Begin (* Début du programme *)
  Write('Hello World');
  ReadLn;
End.
									

Program HelloWorld; (* On spécifie le nom du programme *)
Uses Crt;
Begin (* Début du programme *)
  Write('Hello World');
  ReadKey;
End.
									

Program Welcome;
Var name : String;
Begin
  WriteLn('Entrez votre nom');
  ReadLn(name);
  WriteLn('Bonjour ',name,', et bienvenue!');
  ReadLn;
End.
									

Program Write1;
Begin
  Write('Avec Write');
  WriteLn('Avec WriteLn');
  ReadLn;
End.
									

Program Write2;
Begin
  WriteLn('Avec WriteLn');
  Write('Avec Write');
  ReadLn;
End.