A．x＝34567 y＝0 flag＝.T. DO WHILE flag y＝x%10＋y*10 x＝int(x/10) IF x>0 flag＝.F. ENDIF ENDDO B．x＝34567 y＝0 flag＝.T. DO WHILE flag y＝x%10＋y*10 x＝int(x/10) IF x＝0 flag＝.F. ENDIF ENDDO C．x＝34567 y＝0 flag＝.T. DO WHILE ！flag y＝x%10＋y*10 x＝int(x/10) IF x>0 flag＝.F. ENDIF ENDDO D．x＝34567 y＝0 flag＝.T. DO WHILE ！flag y＝x%10＋y*10 x＝int(x/10) IF x＝0 flag＝.T. ENDIF ENDDO