chapter04table992for.pro

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

; Chapter04Table992For.pro

PRO Chapter04Table992For
i = 1
WHILE 1 DO  BEGIN
    IF i GT 9 THEN GOTO, MyLabel
　　FOR j = 1, i DO BEGIN
　　　　PRINT, j, '*', i, '=', i*j, FORMAT='(4X, I1, 1X, A1, 1X, I1, 1X, A1, 1X, I2, $)'
　　ENDFOR
　　PRINT
    i++
ENDWHILE
MyLabel: PRINT, '九九乘法表输出结束！'
END