[ Список ] удалить-последний-элемент

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