[ Uzdevums ] procedūra

var x := 1.
{
(x = 1) taisnība: { Stdout rakstīt: ['x']. }, pārtraukums.
Stdout rakstīt: ['y'].
} procedūra.

{
(x = 1) taisnība: { Stdout rakstīt: ['x']. }, pārtraukums.
Stdout rakstīt: ['y'].
} × 1.
xx