while 0#(v:?read(?-,?-,0))do dispterms(1+v+mod(v,2));