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