《编程pascal》由会员分享，可在线阅读，更多相关《编程pascal（13页珍藏版）》请在金锄头文库上搜索。
1、中级班第一讲我们学过的语句：循环l计数循环lFor i:=初值 to 终值 do l 循环体l将要赋给i的值与终值比较，如果没有超过 终值，即将初值赋给循环变量i，并执行循 环体，循环变量加1。返回1。l否则，执行循环体下面的命令。l统计1N之间的奇数和。l用计数循环。求n个数的最大值和最小值l试题描述 l 任意输入n个整数，把它们的最大值，最小值求出来。l输入要求 l 输入只有一行，包括一个整数n(1=n=20),后面跟着n个数。l输出要求 l 输出只有一行,包括2个整数。l输入样例 l 5 1 99 3 6 0l输出样例 l 99 0找约数l找出N所有的约数。l确定可能的范围l在可能的范围
2、中找符合条件的1到N之间所有的数必须符合的条件：N除以这个数没有余数。约数和为什么会超时l约数都是成对出现的。l你能用成对的方法约数吗？36的约数64的约数81的约数100的约数1 36 2 18 3 12 4 9 6 61 642 324 168 81 81 3 27 9 91 100 2 50 4 25 5 5你有什么发现？寻找水仙花数l有这样的三位数，它的个位、十位、百位 的立方和为这个数本身，这样的数我们称 之为水仙花数。l如： 153=1 +3 +5 水仙花数333质数（素数）l除了1和它本身以外，不再有别的约数， 这种整数叫做质数或素数。还可以说成质 数只有1和它本身两个约数。l15l17l20l337如何区分素（质）数和非素数判素数的的优化（break）l思考：任何一个数只要能找到一个约数， 这个数就不是质数了。l设想：如果找到一个约数是否可以马上停 止循环呢？l跳出循环的语句：当型循环lWhile 条件 do l 循环体Read(n);i:=1;While i=n do beginwriteln(i);i:=i+2;end;l从键盘上输入一个数N,求出N所有的约数 。l输入一个数n(n=100000000)，输出这 个数的各位数字和。
