Var integer begin while. Var i integer. var i,j,integer,begin. for i : = 1 to 10 writeln. var i: 1 to 10.