日期SKIPENDDO”平均年龄为：”STRPX5USESETTALKONRETURN13在数据库文件ZG中，按出生日期查询记录，找到时则显示该条记录并退出；否则，继续查找。SETTALKOFFUSEZGINDEXON出生日期TOZG4DOWHILETCLEARACCEPT“输入出生日期：TORQ”SEEK_________CTODRQIF______________FOUND或NOTEOFDISPLAYEXITENDIFENDDO15．数据库ZGDBF中，编号、姓名、奖金字段，并有若干记录。在下面程序中，输入姓名后可以自动进行查找，显示对应该姓名的记录的编号、姓名、奖金。也可以重复查找，在输入“”后退出。SETTALKOFFUSEZG
4
f辽宁专升本考试网
INDEXON姓名TOXMIDOWHILETCLEAR_____________NAMESPACE8或NAME”“320SAY“输入姓名（退出）”GETNAMEREADNAMETRIMNAMEIF____________NAME””EXITENDIFSEEKNAMEIFNOTEOF”姓名：”姓名”奖金：”奖金ELSE”查无此人”ENDIFWAITENDDOUSESETTALKONRETURN16．完善下面菜单程序。DOWHILETCLEARK0320SAY“0退出”420SAY“1输入”520SAY“2校验”620SAY“3修改”720SAY“4输出”920SAY“请选择04”GETKPICTURE“9”RANGE04____________READ____________KSTRK1IFK”0”EXITENDIFDOPROKENDDORETURN17．显示ZGDBF中部门为“销售部”的职工情况。SETTALKOFFCLEARUSEZG_____________________SCANFOR部门”销售部”
5
f辽宁专升本考试网
”姓名：”姓名SPACE4”部门：”部门？ENDSCANUSE三、写出程序运行结果认真阅读以下程序，写出程序的运行结果。1SETTALKOFFI1DOWHILEI3J1DOWHILEJ3I3J2SAYSTRIJ2JJ1ENDDOII1ENDDORETURN运行结果：1232463692．SettalkoffM0DowhileTMM1IfM4INTM4LOOPElseMe
difIfM12EXITE
difE
ddoSettalko
Retur
运行结果：12356791011133．SETTALKOFFDIMENSIONX22X5
6
f辽宁专升本考试网
FORI1TO2FORJ1TO2IFIJXIJ0ENDIFXIJENDFORENDFORSETTALKONRETURN运行结果：05504．SETTALKOFFI0DOWHILEI5J1DOWHILEJ5IFIJ15JJ1ELSEEXITENDIFENDDOII1ENDDO”J”JRETURN运行结果：J45．SETTALKOFFM4P1DOWHILEM1PPPMMM1ENDDOSTRP3RETURN运行结果：606．SETTALKOFF
7
f辽宁专升本考试网
N1P0DOWHILEN50IFN10EXITENDIFIFN2INTN2PPNENDIFNN1ENDDO”P”PRETURN运行结果：P307．SETTALKOFFCLEARSTORE1TOISTORE5TOJDOWHILEIJYREPL“”2I1IJSAYYII1JJ1ENDDOSETTALKONRETURN运行结果：
9．SETTALKOFFPUBLICIJSTORE1TOIJKB”X1”X110DOP1WITHBKKJIJKX1SETTALKONRETURN
8
f辽宁专升本考试网
P1PRGPARAMETERSYPRIVATEYYY10II2YJI21RETURN运行结r