Var i integer begin for i. Var i integer begin for i