程序三种基本结构练习答案.doc

《程序三种基本结构练习答案.doc》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、一、选择题：1、已知x=10,y=20,z=30,以下程序段执行后x,y,z的值应是……………………(B)IFx>yTHENz:=x;x:=y;y:=zA)x=10,y=20,z=30B)x=20,y=30,z=30C)x=20,y=30,z=10D)x=20,y=30,z=202、有下列程序段：X：=3；Y：=5；FORI：=XTOYDOBEGINX：=3；Y：=6；WRITE(I)END则FOR循环体的执行次数是……(B)A)0B)3C)4D)63、表达式TrueANDNOTOdd(-202)AND(7-3<=4)的值是…………………………(A)A)TrueB)FalseC

2、)0D)14、有下面程序段：A：=FALSE；B：=FALSE；C：=TRUE；X：=10；IFATHENX：=X-5ELSEIFBTHENIFCTHENX：=36ELSEX：=45；假设所有变量均已说明，程序运行后X的值是………(B)A）5B）10C）36D）45二、根据程序写结果：1、PROGRAMex1；VARI，N，K：INTEGER；BEGINN：=15469；K：=2；FORI：=1TOK-1DON：=NDIV10；N：=NMOD10；WRITELN（N）END.输出：_____6_________2、Programex2;VarA,B,C:Boolean;X,D:

3、integer;beginA:=FALSE;B:=TRUE;C:=FALSE;D:=20;x:=0;IFATHEND：=D-10ELSEIFNOTBTHENIFNOTCTHENX：=15ELSEX：=25；Writeln（D,X）;End.输出：____200___________3、PROGRAMp268(Output);VARi,j,k,sum1,sum2:Integer;BEGINsum1:=0;sum2:=0;k:=1;WHILEk<=10DOBEGINIF(kMOD2=0)THENFOFi:=1TO5DOsum1:=sum1+iELSEFORj:=1TO5DOsum2

4、:=sum2+j;k:=k+1END;Writeln(sum1,sum2)END.7575三、完成程序:1、读入三个整数，找出并输出其中最大数。Vara,b,c,max:integer;BeginRead(a,b,c);Ifa>bthen___MAX:=A___else__max:=b_____;Ifc>maxthen____max:=c______;Writeln(‘thelargestnumberis’,max:8);End.2、下列程序段计算1~20中既不能被3整除，也不能被4整除的所有整数之积。Varp,i:longint;BeginP：=1；fori：=1to20do

5、IF（IMOD3<>0）AND(IMOD4<>0)THEN_______p:=p*i________;Writeln(p);End.3、输入年、月，输出该月天数。　　varyear,month,days:integer;　　begin　　readln(year,month);　　casemonthof　　　1,3,5,7,8,10,12:days:=31;　　　4,6,9,11:days:=30;2:if(yearmod400=0)or((yearmod4=0)and(yearmod100<>0))thendays:=29elsedays:=28;　　　end;　　　write

6、ln(days);　　end.