Var i integer begin for i. For i 1 to n do в паскале. integer. readln в конце. readln в си.