[ Lista ] máximo

var x := Lista ← 8 ; 4 ; 2 ; 16.
var y := x máximo.
Stdout escribir: y, parar.
16