[ Soubor ] číst

var f := Soubor nový: (Umístění-souboru /tmp: ['test.txt']).
 f psát: ['test'].
 var q := Soubor nový: (Umístění-souboru /tmp: ['test.txt']).
 Stdout psát: q číst, stop.