算法[下学期]江苏教育版

算法[下学期]江苏教育版内容摘要：

句  条件语句 —— 嵌套  伪代码  Excel VBA 例 5（ P19） 输入 x，计算 y  的值。 Read x If x 0 Then y ← 1 Else If x  0 Then y ← 0 Else y ← 1 End If Print y x  InputBox(输入一个数 ) If x 0 Then y  1 ElseIf x  0 Then y  0 Else y  1 End If MsgBox y 第 3节 基本算法语句  循环语句 —— For  伪代码  Excel VBA 例 6（ P21） 计算 1  3  5  7  „  99。 S ← 1 For I From 3 To 99 Step 2 S ← S  I End For Print S S  1 For I  3 To 99 Step 2 S  S*I Next I MsgBox S 第 3节 基本算法语句  循环语句 —— While  伪代码 1 例 7（ P21） 求最小的奇数 I，使 1  3  5  7  „  I 10 000。 S ← 1 I ← 3 While S≤10 000 S ← S  I I ← I + 2 End While Print I S ← 1 I ← 1 While S≤10 000 I ← I + 2 S ← S  I End While Print I  伪代码 2 第 3节 基本算法语句  Excel VBA1 例 7（ P21） 求最小的奇数 I，使 1  3  5  7  „  I 10 000。 S  1 I  1 While S  10000 I  I + 2 S  S*I Wend MsgBox I  Excel VBA2 S  1 I  1 Do I  I + 2 S  S*I Loop Until S10000 MsgBox I  循环语句 —— While 第 3节 基本算法语句  伪代码 例 8（ P2例 4） 抛硬币试验。 s  0 Read n For i From 1 To n If Rnd Then s  s + 1 End For Print 出现正面的频率为 s/n  Excel VBA s = 0 n = InputBox(输入试验次数 ) For i = 1 To n If Rnd Then s = s + 1 Next i MsgBox 出现正面的频率为 amp。 s/n 例 1（ P2例 1） 孙子问题： “ 今有物不知其数，三三数之剩二；五五数之剩三；七七数之剩二．问物几何。 答曰：二十三． ” 分析 “ 孙子问题。