Discussion :

[thompson]

Salut !!

je vais vous montrer comment changer la couleur de la console en Pascal.
Pour cela, je vais vous écrire un petit programme qui permet de calculer le carré d'un nombre saisi par l'utilisateur.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
program carree;
uses crt;
var nbr,car:integer;
begin
  textbackground(7);
  writeln('entrez un nombre ');
  readln(nbr);
  car:=(nbr*nbr);
  writeln('le carre de',nbr,'est:',car);
  readln;
end.

[l_autodidacte]

Merci pour ce cours gratuit.

Mais, dans ton code, seul le fond du texte sera en gris clair et le texte sera invisible car de même couleur que le fond.

A ta place, j'utiliserais par exemple pour un fond bleu et texte blanc :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
program carree;
uses crt;
var nbr,car:integer;
begin
  TextAttr:=blue shl 4+15;ClrScr;
  write('entrez un nombre ');
  readln(nbr);
  car:=(nbr*nbr);
  writeln('le carre de ',nbr,' est : ',car);
  readln;
end.

Ainsi tout le fond de la fenêtre de sortie est en bleu contrairement à ce que tu as proposé.