99乘法表
.程序集 启动窗口程序集
.子程序 __启动窗口_创建完毕
' 算法:循环
' 问题:9X9乘法表
' 问题描述:用循环的方式得到9X9乘法表并列出99乘法表。
' 问题分析:
' 被乘数和乘数都是从1-9依次递增1,到9后继续返回1重新递增!
' 备注:
.子程序 _计算图形按钮_被单击
.局部变量 被乘数, 整数型, , , 被乘数1-9
.局部变量 乘数, 整数型, , , 乘数1-9
' 第一行到第九行
.变量循环首 (1, 9, 1, 被乘数)
' 第一列到第九列
.变量循环首 (1, 9, 1, 乘数)
' 显示文本不同的颜色
显示画板.文本颜色 = 多项选择 (乘数 % 3 + 1, #红色, #蓝色, #蓝灰, #褐绿)
' 显示结果
显示画板.定位写出 (乘数 × 50 - 35, 被乘数 × 20 - 10, 到文本 (被乘数) + “X” + 到文本 (乘数) + “=” + 到文本 (被乘数 × 乘数))
显示画板.写文本行 ()
.变量循环尾 ()
.变量循环尾 ()
.子程序 _高级选择夹1_子夹被改变
.子程序 _标签6_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型