chapter04table99.pro

来自「IDL可视化工具入门与提高(PDF)及其随书代码」· PRO 代码 · 共 13 行

; Chapter04Table99.pro
PRO Chapter04Table99
    i = 1
    WHILE  i  LT 10  DO  BEGIN
       j = 1
       WHILE  j LE i  DO BEGIN
           PRINT, j, '*', i, '=' ,i * j, FORMAT = '(4X,I1,1X,A1,1X,I1,1X,A1,1X,I2,$)'
           j = j +1
       ENDWHILE
       PRINT, FORMAT = '(/)'
       i = i + 1
    ENDWHILE
END