Programmation pascal

Lijule -  
KX Messages postés 19031 Statut Modérateur -
Bonjour,
C'est moi lijule. Tout juste pour avoir les commandes qui pourraient me permettre d'encadrer un texte en langage pascal.
A voir également:

1 réponse

KX Messages postés 19031 Statut Modérateur 3 020
 
À mon avis, il n'existe rien de déjà fait pour la console (en mode graphique peut-être ?)
Toutefois voici une procédure qui te suffira peut-être...
procedure Encadre(s:string);
var i,n:integer;
begin
  n:=length(s);
  for i:=1 to n+4 do
    write('-');
  writeln;
  writeln('| ',s,' |');
  for i:=1 to n+4 do
    write('-');
  writeln;
end;
0