[ Lista ] ordenar: [ Block ]

var x := Lista ← 2 ; 1 ; 3.
x ordenar: { :a :b <- a < b.}.
Stdout escribir: x, parar.
Lista ← 3 ; 2 ; 1