Var k c integer. Do begin в паскале. for i 1 to n do begin в паскале. mas в паскале. program var begin end.