[ Listar ] preceder: [ String ]

var x := Listar ← 1 ; 2 ; 3.
x acrescentar: 0.
x preceder: 9.
Stdout escrever: x, punto.
Listar ← 9 ; 1 ; 2 ; 3 ; 0