4.08公顷=______公顷______平方米

1时=______分钟．

下列程序用于在带垂直滚动条的文本框Text1中输出3到100之间的全部素数。请填空。 Private Sub Command1_click()Text1.Text=""For n=3 to 100 k=Int(Sqr(n)) i=2 Flag=0 Do While i＜=______And Flag=0 If n Mod i=0 Then Flag=1Else i=i+1End If Loop If______ThenText1.Text=Text1.Text&Str(n)&Chr(13)&Chr(10) End If Next n End Sub