2015程序設(shè)計(jì)答題分析12

1、2015程序設(shè)計(jì)答題分析（小學(xué)）1. 超市為了促銷，規(guī)定：購(gòu)物不足60元的按原價(jià)付款，超過60不足200的按九折付款，超過200元的，超過部分按八折付款。編程完成超市的自動(dòng)計(jì)費(fèi)的工作，輸入購(gòu)物金額原價(jià)，輸出打折后的金額。分析：這個(gè)題是一個(gè)分支結(jié)構(gòu)的多層嵌套。閱讀題目要求時(shí)，對(duì)200元以上的，超過200的部分是8折，剩下的200元按9折算。打折后可能會(huì)是小數(shù)點(diǎn)，要考慮數(shù)據(jù)類型。Var n:real;Begin Read(n); If n60 then If n10 then j:=j-10; i:=i+j; if i10 then i:=i-10; until (i=1) and (j=1);

2、for i:=1 to 10 do if di0 then write(i);end.初中1從鍵盤輸入一個(gè)小于1000的正整數(shù), 若此數(shù)的各位數(shù)字之和能被7整除, 則輸出這個(gè)數(shù)。分析：此題簡(jiǎn)單，但重點(diǎn)在“被”字上，對(duì)輸入的數(shù)分解出個(gè)、十、百位上的數(shù)字，相加后得出的和被7整除。參考程序program p1;var n,m,k:integer;beginreadln(k);m:=0;while n0 dobeginm:=m+n mod 10;n:=n div 10;end;if m mod 7=0 then writeln(k);end.2. 鍵盤輸入N，求N！末尾有多少個(gè)連續(xù)的零。其中N!=12

3、3N（1=N=1000）。算法一：從1乘到n，每乘一個(gè)數(shù)判斷一次，若后面有0則去掉后面的0，并記下0的個(gè)數(shù)。為了不超出數(shù)的表示范圍，去掉與生成0無關(guān)的數(shù)，只保留有效位數(shù)，當(dāng)乘完n次后就得到0的個(gè)數(shù)。（pascal程序如下）var i,t,n,sum:longint; begin t:=0; sum:=1;readln(n); for i:=1 to n do begin sum:=sum*i; while sum mod 10=0 do begin sum:=sum div 10; inc(t);計(jì)數(shù)器增加1 end; sum:=sum mod 1000;舍去與生成0無關(guān)的數(shù) end; wri

4、teln(t:6);end.算法二：此題中生成O的個(gè)數(shù)只與含5的個(gè)數(shù)有關(guān)，n！的分解數(shù)中含5的個(gè)數(shù)就等于末尾O的個(gè)數(shù)，因此問題轉(zhuǎn)化為直接求n！的分解數(shù)中含5的個(gè)數(shù)。var t,n:integer;begin readln(n); t:=0; repeat n:=n div 5 ; inc(t,n); 計(jì)數(shù)器增加n until n= = = = = = = =是是是是是是是是是是是是是是是是b1b5b6b3b2b4b7b8b7b8b2b4b3b6blb5重輕輕重重輕重輕輕重輕重輕重輕重參考考生程序program p3;var cpcode:-8.8;cpweight,zpweight,i:int

5、eger;wt:array1.8 of integer;function finddiff(a,b,c:integer):integer;beginif a=b thenif a=c then finddiff:=0else if ac then finddiff:=-3 else finddiff:=3elseif ab thenif b=c then finddiff:=1 else finddiff:=-2elseif b=c then finddiff:=-1 else finddiff:=2;end;beginwrite(cipin hao:);readln(cpcode);writ

6、e(cipin zhong:);readln(cpweight);write(zhengpinzhong:);readln(zpweight);write(cipin hao:);for i:=1 to 8 doif i=cpcode then wti:=cpweight else wti:=zpweight;if wt1+wt2+wt3wt4+wt5+wt6 thenbeginif finddiff(wt1,wt2,wt3)=0 thenif finddiff(wt4,wt5,wt6)0 then cpcode:=3+finddiff(wt4,wt5,wt6)else cpcode:=-3-

7、finddiff(wt4,wt5,wt6)else cpcode:=finddiff(wt1,wt2,wt3);endelsebeginif wt7wt8 then if wt7wt1 then cpcode:=7 else cpcode:=-8else if wt7=wt1 then cpcode:=8 else cpcode:=-7;end;writeln(abs(cpcode);write(Cipin: );if cpcode0 then writeln(QING) else writeln(ZHONG);end.4. 任意一個(gè)自然數(shù)，我們可以將其平均截取成三個(gè)自然數(shù)。例如135768，可以截取成13,57,68。如果某自然數(shù)不能平均截取(位數(shù)不能被3整除)，可將該自然數(shù)高位補(bǔ)零后截取。如4128，可在高位補(bǔ)零后成為004128，平均截取成00，41，28三個(gè)數(shù)。編程從鍵盤上輸入一個(gè)自然數(shù)N(N的位數(shù)12)，計(jì)算截取后第一個(gè)數(shù)加第三個(gè)數(shù)減第二個(gè)數(shù)的結(jié)果。分析：此題難點(diǎn)數(shù)據(jù)類型上，限定小于12位的自然數(shù)已超出長(zhǎng)整數(shù)的范圍，可以轉(zhuǎn)成字符串來運(yùn)行。參考程序 program p4;Var n:sting12; I,m,code,a:in