p:=c:=1;for(i,1,File standardInput readLine asNumber,write(i,if(p==i,c=c+1;p=p+c;"
"," ")))