[ Listar ] substituir: [ Número ] comprimento: [ Número ] com: [ Listar ]

var x := Listar ← 1 ; 2 ; 3 ; 4 ; 5.
var z := Listar ← 9.
var y := x substituir: 2 comprimento: 1 com: z.
Stdout escrever: y, punto.
Listar ← 1 ; 9 ; 3 ; 4 ; 5