[ Código ] procedimento

var x := 1.
 {
 	(x = 1) verdadeiro: { Stdout escrever: “x”. }, parar.
 	Stdout escrever: “y”.
 } procedimento.

 {
 	(x = 1) verdadeiro: { Stdout escrever: “x”. }, parar.
 	Stdout escrever: “y”.
 } × 1.