题目

运行下列XY.PRG程序后,将在屏幕上显示如下的乘法表:

1

2 4

3 6 9

4 8 12 16

5 10 15 20 25

6 12 18 24 30 36

7 14 21 28 35 42 49

8 16 24 32 40 48 56 64

9 18 27 36 45 54 63 72 81

请对下面的程序填空:

***计算乘法XY.PRG***

SET TALK OFF

CLEAR

FOR J=1 TO 9

FOR【 】

??【 】

EMDFOR

?

ENDFOR

RETURN

相关标签: 乘法表  

答案
查看答案
相关试题

下面程序是用来打印九九乘法表的,请填空。

Private Sub Form_Click()

Dim flag As Integer,i As Integer,j As Integer,Str1$

Str1=“”

For i=1 To 9

【 】

For j=1 To 9

If【 】 Then

str1=str1+Str$(j)+“*”+Str$(i)+“=”+Str$(Val(i*j))

Else

str1=str1 & Chf(13)

Exit For

End If

Next j

Next i

Print str1

End Sub

子过程Test显示—个如下所示4×4的乘法表。

1*1=1 1*2=2 1*3=3 1*4=4

2*2=4 2*3=6 2*4=8

3*3=9 3*4=12

4*4=16

请在空白处填入适当的语句使子过程完成指定的功能。

Sub Text()

Dim i,j As Integer

For i=1 To 4

For j=1 To 4

If【 】Then

Debug.Print i& "*" &j&"="& i*j & Space(2),

End If

Next j

Debug.Print

Next i

End sub

( 10 )子过程 Test 显示一个如下所示 9X4 的乘法表。

1*1=1 1*2=2 1*3=3 1*4=4

2*2=4 2*3=6 2*4=8

3*3=9 3*4=12

4*4=16

请在空白处填入适当的语句使子过程完成指定的功能。

Sub Text ()

Dim i,j As Integer

For i=1 To 4

For j=1 To 4

If 【 10 】 Then

Debug.Prrint I & “ * ” & j & “ = ” & i * j & Space ( 2 )

End If

Next j

Debug .Print

Next i

End Sub

以下程序的作用是()

For i = 1 To 9

For j = 1 To 9

se = i & "×" & j & "=" & i * j

Picture1.Print Tab((j - 1) * 9 + 1); se;

Next j

Picture1.Print

Next i

A.打印ASCII码表

B.打印九九乘法表

C.打印加法表

D.以上说法都不正确

最新解答的试题
付款人在进行付款时无()

A.形式审查义务

B.实质审查义务

C.附带审查义务

D.票据外有关事项的审查义务
根据《公司法》的规定,有限责任公司下列人员中,可以提议召开股东会临时会议的是()。
A.总经理B.人数过半数的股东C.监事会主席D.人数为半数的董事
关于股份有限公司中的监事会,下列说法错误的是()

A.监事会负责提议聘请或更换外部审计机构B.监事会主席和副主席由全体监事过半数选举产生C.监事会中的职工代表的比例不得低于三分之一D.监事会应至少每6个月召开一次会议
三北精神的科学内涵
阿里巴巴提供了“企业名称认证”“企业身份认证”不同种类的认证,可以根据自身的