原创力文档- 1、本文档内容版权归属内容提供方，所产生的收益全部归内容提供方所有。如果您对本文有版权争议，可选择认领，认领后既往收益都归您。。
- 2、本文档由用户上传，本站不保证质量和数量令人满意，可能有诸多瑕疵，付费之前，请仔细先通过免费阅读内容等途径辨别内容交易风险。如存在严重挂羊头卖狗肉之情形，可联系本站下载客服投诉处理。
- 3、文档侵权举报电话：400-050-0827(电话支持时间：9:00-18:30)。
- 4、该文档为VIP文档，如果想要下载，成为VIP会员后，下载免费。
- 5、成为VIP后，下载本文档将扣除1次下载权益。下载后，不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后，您将拥有八大权益，权益包括：VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传，每下载1次， 网站将根据用户上传文档的质量评分、类型等，对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
1编写程序，计算并输出下面级数前n 项(n 50)中偶数项的和。 (要求用循环做，非循环不
给分。)
1*2+2*3+3*4+4*5+……+n*(n+1)+…
Private Sub Form_Activate()
s 0
For I 2To50 Step 2
s s+ I *(I+ 1)
Next I
Print s
End Sub
2 勾股定理中三个数的关系是：a^2+b^2 c^2 编写程序，输出100 以内满足上述关系的整
数组合，例如3，4，5就是一个整数组合。
Private Sub Form_Activate()
For a 1To
文档评论（0）