Asp九九乘法表

<%
Response.Write("<table width='450' class='table' cellspacing='1' border='1' bordercolor='#000000'><TR><TD colspan='9' align='center'><strong>九 九 乘 法 表</strong></TD></TR>")
Dim X,Y,B
X = 1
Y = 1
Do While X <= 9
Response.Write("<TR>")
Do While Y > 0 And X >= Y
Z = X * Y
A = Y & "*" & X & "=" & Z & "&nbsp;"
Response.Write ("<TD height=18>&nbsp;"&A&"</TD>")
Y = Y + 1

Loop
B = 9 - Y + 2
Do While B > 1
Response.Write("<TD>&nbsp;</TD>")
B = B - 1
Loop

Y = 1
X = X + 1
Response.Write("</TR>")
Loop
Response.Write("</TABLE></BODY><HMTL>")
''''转载请注明:www.132c.com 并保存程序的完整性!
%>

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值