问题 问答题

在考生文件夹下有一个工程文件sjt3.vbp,在程序运行时,单击“输入整数”按钮,输入一个整数,并在窗体上显示此整数的所有不同因子和因子个数。图1是输入53后的结果,图2是输入100后的结果。已经给出了全部控件和程序,但程序不完整。
要求:请去掉程序中的注释符,把程序中的改为正确的内容。不能修改程序中的其他部分,也不能修改控件的属性。最后用原来的文件名保存工程文件和窗体文件。

答案

参考答案:[操作步骤]
步骤1:打开本题工程文件。
步骤2:打开代码编辑窗口,去掉程序中的注释符,将问号改为正确的内容。
参考答案:(阴影部分是需考生填入的内容)
Private Sub Command1_Click()
Dim n As Integer
Cls’清空窗体
n=InputBox("请输入一个整数") ’InputBox返回值赋给n
Print"因子数="; fun(n) ’调用fun函数并打印结果
End Sub
Function fun(m As Integer)
Dim s As Integer
s=0
For k=1 To Abs(m)/2
If m Mod k=0 Then’当整除余数为0时则一定是它的因子
s=s+1
Print k
End If
Next k
fun=s’返回因子总数
End Function
程序结束
步骤3:调试并运行程序,关闭程序后按题目要求存盘。

解析:[考点] 本题考点有:InputBox()函数、Functionfun()过程函数、Abs()函数、Mod()函数、For循环语句、If判断语句以及Print方法。
通过InputBox()函数实现对话框中显示提示,等待用户输入正文或按下按钮,并返回包含文本框内容的String。
通过Function fun()过程函数,实现对因子数的确定和查找,Mod()函数用来判断是否能够整除,即判断是否为因子数。
在进行循环的时候注意变量k的上限为Abs(m)/2,这样可以节省循环的次数。

问答题 案例分析题

2002年3月1日,人民法院受理了甲公司就自己不能支付到期债务而提出的破产申请,并依照法定程序,于同年10月10日宣告该公司破产,同年10月20日成立了清算组。清算组接管甲公司后,对该公司的财产进行了清理,有关清理情况如下:

(1)甲公司资产总额为1800万元(变现价值);负债总额为4000万元,其中,流动负债的情况为:

①应付职工资80万元,未交税金220万元。

②短期借款500万元。其中:2001年3月5日,以甲公司全部厂房作抵押,向中国工商银行贷款300万元;221年6月1日,以全部机器设备作抵押,向中国建设银行贷款200万元。

③应付账款640万元。其中包括但不限于:

(A)应付乙公司2001年4月到期货款100万元。乙公司经多次催收无效后向人民法院提起诉讼,2002年2月25日,人民法院终审判决甲公司支付乙公司欠款及违约金和赔偿金等共于十120万元,并将甲公司办公楼予以查封,拟用于抵偿已公司的债权。人民法院受理甲公司破产申请时,此判决尚未执行。

(B)应付丙公司2001年7月18日到期货款180万元。2001年6月18日应丙公司的要求,甲公司与丙公司签订了一份担保合同,担保合同约定:以甲公司机器设备作抵押,若2002年6月18日前甲公司仍不能支付丙公司180万元货款,则以甲公司机器设备变卖受偿。

(C)应付丁公司222年1月30日到期货款200万元。

④其他流动负债台计1660万元。

(2)甲公司于1999年8月10日在某港口城市设立的甲分公司,至人民法院受理破产申请之日止,账外资金累计余额为90万元。2002年3月20日,甲分公司的主要负责人将该90万元作为奖金予以私分。

(3)甲公司2001年4月26日为戌公司向城市商业银行贷款70万元(贷款期限为18个月)提供担保,并与城市商业银行签订了保证合同。保证合同约定:当成公司不能偿还到期贷款时,由甲公司承担连带保证责任。城市商业银行在法定期限内未申报债权。

(4)甲公司在破产程序中支付的破产费用为40万元。

(5)经评估确认:甲公司厂房变现价值为160万元,办公楼变现价值为190万元,机器设备变现价值为320万元。经查:甲公司的股东用于出资的房产在出资时作价300万元,而当时的实际价值仅为120万元;甲公司用于抵押的厂房、机器设备于合同签订的当天全部办理了抵押登记手续。

要求:

根据以上事实,在不考虑债权利息的情况下,分别回答下列问题:

(1)人民法院查封的甲公司的办公楼可否用于偿还所欠乙公司的货款?并说明理由。

(2)甲公司所欠丙公司的货款是否属于破产债权?并说明理由。

(3)对甲分公司私分的财产应如何处置?并说明理由。

(4)甲公司与城市ha银行计立的保证合同是否应当终止?并说明理由。

(5)甲公司的破产财产额是多少?并具体说明破产财产的构成。

(6)如果甲公司的破产债权额确认为3125万元,则丁公司可分配的财产具体数额为多少(金额保留至元)?并列明计算过程。

判断题