var a,i:longint;
begin
for i:=1 to 100 do
writeln(i);
end.
/**************************************************************
Problem: 1881
User: admin
Language: Pascal
Result: Wrong Answer
****************************************************************/