第5章--程序设计基础.ppt

settalkoffclearclosealluse学生信息dowhile.T.xh=space(9)@15,10say请输入查询学号：getxhreadlocafor学号=trim(xh)iffound()dispcontinueelse?查无此人！endifwait是否继续查询（Y/N）：toynifuppe(yn)=Nexitendifenddousesettalkon*5.4应用程序举例5.27：从键盘输入的数，判断该数是否为素数。算法思路：素数指除了能被1和自身外，不能被其他整数整除的自然数。判断整数X是不是素数的基本方法是：将X分别除以2，3，…，X的平方根，若都不能整除，则X为素数。判断X被I整除还可用表达式MOD(X,I)=0或INT(X/I)=X/I或X%I=0*****LI.PRG*****SETTALKOFFCLEAINPUTX=TOXFORI=2TOint(sqrt(X))IFINT(X/I)=X/IEXITENDIFENDFORIFI=int(sqrt(X))?是素数！ELSE?不是素数！ENDIFSETTALKON*5.28：求两个正整数的最小公倍数和最大公约数算