procedure main()
while a:=read()do{every(b:=0)+:=!(4^a)
write(b)}
end