while(n:?read(display2d:?-,?-,~))#~do printf(?t,"~a=~a ",n,factor(n));