Question

以下vb问题，请高手解答

1.现有一件原价1000元促销产品，如果单价降5元，销量就能增加10件。那么，按照这样的促销手段，持续下降2天，销量增加20件；下降3天，销量增加30件……如果持续下降20天，销售价格为多少？（900元）增加销量多少件？（200件）
For i =1000 to 900 step____________
S=__________________
Next i
Print ”20t天后的销售价格为”;i,”增加销量”;S;”件”

2.学校要求学生每学期练字200页，每天至少练字2页，最多练字10页。
For y =_________________
T =_________________
Print ”每天练”;y;”页”;”需要”;t;”天”
Next y

3. 现有一个自我评价的程序。如果自我评价的分数小于3分，则显示“只退不进”；如果自我评价的分数大于3分，小于10分，则显示“不进不退”；如果自我评价的分数大于10分，则显示“只进不退”。
Let x=text1.text
If x>3 then
If x <10 then
Print ” _____________”
Else
Print ” 只进不退”
____________
Else
Print ” 只退不进”
End If

4.有一个用身高-体重测试健康状况的方法，如果身高小于160并且体重超过160，则为“亚健康身体”；如果身高大于160并且体重小于160，则有“健康身体”。（题意纯属杜撰）
Let sg= text1.text
Let tz= text2.text
If sg<160 And ___________ then
Print ”健康身体”
Else
If__________________
Print ” 身体亚健康”
End If
End If

5.TOM月考只考了60分，但他知道“刻苦学习提升成绩”的道理。为此，TOM放弃每周的活动来学习，他计划每周提高5分成绩，直到获得90分才能去上活动课。程序运行后，成绩不到90分时输出“继续努力”，成绩达到90分后，输出“恢复活动课”。
（提示：条件循环语句）

Answer 1

1.现有一件原价1000元促销产品，如果单价降5元，销量就能增加10件。那么，按照这样的促销手段，持续下降2天，销量增加20件；下降3

天，销量增加30件……如果持续下降20天，销售价格为多少？（900元）增加销量多少件？（200件）

For i =1000 to 900 step___-5_________
   S=_s+10________________
 Next i    
Print  ”20t天后的销售价格为”;i,”增加销量”;S;”件”

2.学校要求学生每学期练字200页，每天至少练字2页，最多练字10页。

For y =_2 to 10________________
   T =__200/y_______________
   Print  ”每天练”;y;”页”;”需要”;t;”天”
Next y

 

3. 现有一个自我评价的程序。如果自我评价的分数小于3分，则显示“只退不进”；如果自我评价的分数大于3分，小于10分，则显示“不

进不退”；如果自我评价的分数大于10分，则显示“只进不退”。

Let x=text1.text
If  x>3 then 
If  x <10 then 
    Print  ” _不进不退____________”
Else 
    Print  ” 只进不退”
     _____End If_______
Else
 Print  ” 只退不进”
End If

 

4.有一个用身高-体重测试健康状况的方法，如果身高小于160并且体重超过160，则为“亚健康身体”；如果身高大于160并且体重小于160

，则有“健康身体”。（题意纯属杜撰）

Let sg= text1.text
Let tz= text2.text
If  sg>160 And ____tz<160_______   then 
Print  ”健康身体”
Else
If__sg<160 And __tz>160_then__
    Print  ” 身体亚健康”
End If
End If

5.TOM月考只考了60分，但他知道“刻苦学习提升成绩”的道理。为此，TOM放弃每周的活动来学习，他计划每周提高5分成绩，直到获得90

分才能去上活动课。程序运行后，成绩不到90分时输出“继续努力”，成绩达到90分后，输出“恢复活动课”。

（提示：条件循环语句）

cj=60
do while cj<90
Print  "继续努力"
cj=cj+5
loop
Print  "恢复活动课"