Var i integer begin for i. Readln. integer 10. uses crt. array of integer.