data: ii type i value 1,
jj type i value 1,
lineLen type i,
lineWidth type i,
multiply type i.
while ii <= 9.
lineLen = ii * 14 + ii.
WRITE AT /(lineLen) SY-ULINE.
while jj <= ii.
multiply = ii * jj.
lineWidth = jj * 15.
if ( jj = 1 ).
write /(1) sy-vline no-gap.
endif.
write: (2) jj, '*', (2) ii, '=', (2) multiply COLOR COL_KEY, ' ', at lineWidth sy-vline.
jj = jj + 1.
endwhile.
ii = ii + 1.
jj = 1.
endwhile.
WRITE AT (lineLen) SY-ULINE.
九九乘法口诀表的输出,带分隔线
最新推荐文章于 2024-05-30 23:04:29 发布
本文展示了一个使用循环进行数值计算并格式化输出的例子。通过双重循环实现了乘法表的生成,并利用变量调整了输出的宽度和长度,使得输出结果整齐有序。
934

被折叠的 条评论
为什么被折叠?



