循环结构程序的设计12.3.pptVIP

LOGO COMPANY LOGO LOGO COMPANY LOGO 循环结构程序设计 徐水职教中心 姜继红 图片欣赏 一青二白，所求不多，只清水一盆，并不在乎于生命短促，不在乎刀刃的“创伤”，不在乎于严寒的“凌辱”，始终洁身自爱，带给人间的是一份绿意和温馨。 水仙花数 水仙花数：又称为阿姆斯特朗数，它是指一个三位数，其各位上数字的三次幂的和仍等于这个三位数。 例如：1^3 + 5^3 + 3^3 = 153 有哪几个三位数能拥有这么漂亮的名字呢？ 水仙花数 探究一：各位上的数字如何得出？ 探究二：可以使用哪几种结构的程序设计？ 探究三：循环的变量、初始值、循环体和终止循环 条件如何确定？ 各位上的数字如何得出？ 1.取整函数INT() 百位 十位 个位 A B C 2.取模函数MOD() 4.截取字符串函数SUBSTR() 5.左截取函数LEFT() 6.右截取函数RIGHT() VAL() 百位 十位 个位 A B C 1 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 SET TALK OFF CLEAR K=100 DO WHILE K=999 A=INT(K/100) B=(INT(K/10))-10 C=K-A*100-B*10 IF A^3+B^3+C^3=K ?K ENDIF K=K+1 ENDDO SET TALK ON RETURN 153 370 371 407 你真棒！ C=MOD(K,10) SET TALK OFF CLEAR K=100 DO WHILE K=999 A=VAL(SUBSTR(STR(K,3),1,1)) B=VAL(SUBSTR(STR(K,3),2,1)) C=VAL(SUBSTR(STR(K,3),3,1)) IF A^3+B^3+C^3=K ?K ENDIF K=K+1 ENDDO SET TALK ON RETURN 153 370 371 407 你真棒！ SET TALK OFF CLEAR K=100 DO WHILE K=999 A=VAL(LEFT(STR(K,3),1)) B=VAL(RIGHT( LEFT( STR(K,3) ,2),1)) C=VAL(RIGHT(STR(K,3),3,1)) IF A^3+B^3+C^3=K ?K ENDIF K=K+1 ENDDO SET TALK ON RETURN 153 370 371 407 你真棒！ B=INT((K-A*100)/10) SET TALK OFF CLEAR A=1 DO WHILE A=9 B=0 DO WHILE B=9 C=0 DO WHILE C=9 IF A*100+B*10+C=A^3+B^3+C^3 ?A*100+B*10+C ENDIF C=C+1 ENDDO B=B+1 ENDDO A=A+1 ENDDO SET TALK ON 153 370 371 407 第 一 层 第 二 层 第 三 层 课堂小结 通过本节课的学习，我们理解并掌握了循环结构程序设计的概念和编写格式，并且体会到了用循环结构编写程序，关键要做好三点： ①确定循环变量和初始值。 ②确定循环体。 ③确定循环终止条件。 作业布置 四叶玫瑰数： 所谓是四叶玫瑰数指一个四位数，其各位上的数字的4次幂的和仍等于这个四位数。 五朵金