1下面程序的功能是:输入8个字符,如果第三到第六个字符为“OKOK”,则执行命令文件pass,否则重新输入,若输入超过三次则退出程序运行,请将程序补充完整。CLEARPASSWORD=SPACE(8)I=3DO WHILE .T. 10,10 SAY 输入口令:GET PASSWORD( 56 ) IF( 57 ) =OKOK( 58 ) 退出循环ELSE I=I-1IF ( 59 ) RETURN ENDIF ENDIFENDDODO passRETURN(56) AREAD BPUT CGET DWRITE(57) A STR(PASSWORD,3,4)B SUBSTR(PASSWORD,3,4) C RIGHT(PASSWORD,3,4)D LEFT(PASSWORD,3,4)(58) AEND BRETURN CQUET DEXIT(59)
Copyright © 2018-2021 Wenke99.com All rights reserved
工信部备案号:浙ICP备20026746号-2
公安局备案号:浙公网安备33038302330469号
本站为C2C交文档易平台,即用户上传的文档直接卖给下载用户,本站只是网络服务中间平台,所有原创文档下载所得归上传人所有,若您发现上传作品侵犯了您的权利,请立刻联系网站客服并提供证据,平台将在3个工作日内予以改正。