循环的嵌套 课件

课件13张PPT。循 环 嵌 套-----打印99乘法表循 环 嵌 套-----打印99乘法表1×1=1???????? 1×2=2 2×2=4????????1×3=3 2×3=6??3×3=9?????? 1×4=4 2×4=8??3×4=12 4×4=16??????1×5=5 2×5=10 3×5=15 4×5=20 5×5=25???? 1×6=6 2×6=12 3×6=18 4×6=24 5×6=30 6×6=36????1×7=7 2×7=14 3×7=21 4×7=28 5×7=35 6×7=42 7×7=49?? 1×8=8 2×8=16 3×8=24 4×8=32 5×8=40 6×8=48 7×8=56 8×8=64??1×9=9 2×9=18 3×9=27 4×9=36 5×9=45 6×9=54 7×9=63 8×9=72 9×9=8199乘法表乘法表
乘法表Dim s as integer
S=1*1
Print 1;”*”;1;”=”;s ;单元公式:s=1*jDim s, j As Integer
For j = 1 To 9
s = j * 1
Print j; "*"; 1; "="; s;
Next j1→9乘法表单元公式:s= i*j单元公式:s= i*jDim i As Integer
Dim j As Integer
Dim s As Integer
For i = 1 To 9
For j = 1 To 9
s = i * j
Print j; "*"; i; "="; s;
Next j
Print ""
Next i乘法表jiDim i As Integer
Dim j As Integer
Dim s As Integer
For i = 1 To 9
For j = 1 To i
s = i * j
Print j; "*"; i; "="; s;
Next j
Print ""
Next i*
**
***
****
*****
******
********
**
***
****
*****
******
*******
******
*****
****
***
**
**
**
***
****
*****
******
*******