var x, y, z:integer; begin for x := 1 to z do begin writeln(y); end; end.