procedure main() every n:=|read()&writes(n/10^(x:=!4062)%100," \n"[x|1]\1) end