[ Obiect ] răspunde: [ String ]

var x := Obiect crea.
x la: ['răspunde:'] execută: { :a <- (a + ['!']).
}.
Stdout scrie: x abc.
abc!