abap編寫九九乘法表


DATA:gf_i TYPE n VALUE 1,
     gf_j TYPE n VALUE 1,
     gf_k(2TYPE N.
DO TIMES.
  gf_j 1.
  DO gf_i TIMES.
    gf_k = gf_i * gf_j.
    WRITE:gf_j NO-GAP,'*' NO-GAP,gf_i NO-GAP,'=' NO-GAP,gf_k.
    IF gf_i = gf_j.
      WRITE: /.
      EXIT.
    ELSE.
      gf_j = gf_j + 1.
    ENDIF.
  ENDDO.
  gf_i = gf_i + 1.
ENDDO.

 

 


免責聲明!

本站轉載的文章為個人學習借鑒使用,本站對版權不負任何法律責任。如果侵犯了您的隱私權益,請聯系本站郵箱yoyou2525@163.com刪除。



 
粵ICP備18138465號   © 2018-2025 CODEPRJ.COM