[ Aufgab ] prozedur

var x := 1.
 {
 	(x = 1) wouer: { Stdout schreiwen: ['x']. }, briechen.
 	Stdout schreiwen: ['y'].
 } prozedur.

 {
 	(x = 1) wouer: { Stdout schreiwen: ['x']. }, briechen.
 	Stdout schreiwen: ['y'].
 } × 1.