第二册 第3章 循环结构（2）-2020-2021学年华东师大版高一信息技术上学期导学案

10A信息 4-4 循环结构（2） 班级 姓名 学号 日期 【目标导学】 1. 能根据实际问题选择计数器或累加器设计算法。 【知识新授】 程序一：求输入的十个数之和。 要求：用户输入一个实数x，并将这个数加到总和里。重复上述操作十次，最后输出输入的十个数之和。 请画出流程图： 请写出VB代码： 程序二：求输入的若干数之和，输入0时结束。 要求：用户输入一个实数，如果不是0，则将这个数加到总和里，然后继续输入数据；如果输入的数据为0，则结束数据输入；最后输出输入的数之和。 请画出流程图： 请写出VB代码： 程序三：输出1-20之间所有奇数的乘积。（循环结构） 请画出流程图： 请写出VB代码： 【巩固练习】 程序一：依次输入某班22名学生信息考试的成绩，求22名学生信息学科考试成绩的总分s 。 请画出流程图： 请写出VB代码： 程序二：输入整数n，然后输入n个整数，输出这n个数的和。如输入3，1，2，2，则输出5。 请画出流程图： 请写出VB代码： 程序三：输出1×2×3×……×50的值。 10A信息 4-4 循环结构（2） 班级 姓名 学号 日期 【目标导学】 2. 能根据实际问题选择计数器或累加器设计算法。 【知识新授】 程序一：求输入的十个数之和。 要求：用户输入一个实数x，并将这个数加到总和里。重复上述操作十次，最后输出输入的十个数之和。 请画出流程图： 请写出VB代码： Dim i As Integer, s As Single, x As Single i = 1: s = 0 Do While i <= 10 x = Val(InputBox("输入一个实数")) s = s + x i = i + 1 Loop Print s 程序二：求输入的若干数之和，输入0时结束。 要求：用户输入一个实数，如果不是0，则将这个数加到总和里，然后继续输入数据；如果输入的数据为0，则结束数据输入；最后输出输入的数之和。 请画出流程图： 请写出VB代码： Dim s As Single, x As Single s = 0 x = Val(InputBox("输入x")) Do While x <> 0 s = s + x x = Val(InputBox("输入x")) L