begin var l: List; var i: integer?; end.