do:input""a:?or(a+!0^a,1)loop