[ Объект ] сделать

var x := Список ← 1 ; 2 ; 3.
x сделать удалить-последний-элемент сдвиг выполнить.
Stdout написать: x, стоп.
Список ← 2