while(x:?read(?-,?-,~))#~do dispterms(round(x^.25));