[ Fichier ] lis

var f := Fichier nouveau: (Emplacement-du-fichier /tmp: ['test.txt']).
 f écrire: ['test'].
 var q := Fichier nouveau: (Emplacement-du-fichier /tmp: ['test.txt']).
 Stdout écrire: q lis, stop.