[ Lista ] toma-o-primeiro

var x := Lista ← 1 ; 2 ; 3.
var y := x toma-o-primeiro.
Stdout escribir: y, parar.
Stdout escribir: x, parar.
1
Lista ← 2 ; 3