m:-get0(A),get0(B),B>0,C is 69+(A/\1)*10,put(C),m.