📄 m980104.gb_
字号:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<HTML>
<HEAD>
<TITLE>VB5 教本： 如何计算 Sum = 1 + 2 + 3 + ... + 20？</TITLE>
<META NAME="GENERATOR" CONTENT="Mozilla/3.01Gold (Win95; I) [Netscape]">
<META NAME="Author" CONTENT="KJ Wang">
</HEAD>
<BODY TEXT="#202020" BGCOLOR="#FFFFFF" LINK="#FF0000" VLINK="#000080" ALINK="#FF0000">
<H2 ALIGN=CENTER><A HREF="vbba.htm">新观念的 VB5 教本</A></H2>
<CENTER><P ALIGN=CENTER><B><FONT COLOR="#0000FF"><FONT SIZE=+1>补充教材</FONT></FONT></B></P></CENTER>
<H2>
<HR WIDTH="100%"></H2>
<TABLE WIDTH="100%" >
<TR VALIGN=TOP>
<TD NOWRAP WIDTH="70">98/01/04</TD>
<TD>如何计算 Sum = 1 + 2 + 3 + ... + 20？
<HR WIDTH="100%"></TD>
</TR>
<TR VALIGN=TOP>
<TD></TD>
<TD>这类问题出现在 p.246 的习题， 不少初学程式设计的读者来函表示不知如何撰写。
<P>为了解这个问题， 我们可以把 Sum = 1 + 2 + 3 + … + 20 表示成：</P>
<UL>
<P><IMG SRC="m980104.gif" HEIGHT=123 WIDTH=263></P>
</UL>
<P>简单地说， Sum = 1 + 2 + 3 + … + 20 的计算结果等於 Sum = 0、Sum = Sum
+ 1、Sum = Sum + 2 … Sum = Sum + 20 连续运算的结果， 所以使用 For 回圈来撰写程式最合适，如下：</P>
<UL>
<PRE><FONT SIZE=+1>Sum = 0
For I = 1 To 20
Sum = Sum + I
Next I </FONT></PRE>
</UL>
<P><FONT COLOR="#008000">再举个问题：『Sum = 1 + 4 + 7 + 10 + … + 301』,
计算 Sum 的数值。 </FONT></P>
<P>这一题与上一题相类似， 上一题的累加每次进 1(1、2、3…)， 这一题的累加则是每次进
3(1、4、7…)， 所以同样是使用 For 回圈， 但「步进值」等於 3， 程式如下：</P>
<UL>
<PRE><FONT SIZE=+1>Sum = 0
For I = 1 To 301 <FONT COLOR="#FF0000">Step 3</FONT>
Sum = Sum + I
Next I </FONT></PRE>
</UL>
</TD>
</TR>
</TABLE>
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -