begin var Floors := new Dictionary<(cardinal, cardinal), List>; var sz := (1, 2); foreach var a{@var a: (cardinal,cardinal);@} in Floors.Keys do begin end; var l{@var l: List;@} := Floors[sz]; l.Add(23); end.