1、2015程序設計答題分析（小學）1. 超市為了促銷，規(guī)定：購物不足60元的按原價付款，超過60不足200的按九折付款，超過200元的，超過部分按八折付款。編程完成超市的自動計費的工作，輸入購物金額原價，輸出打折后的金額。分析：這個題是一個分支結構的多層嵌套。閱讀題目要求時，對200元以上的，超過200的部分是8折，剩下的200元按9折算。打折后可能會是小數(shù)點，要考慮數(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從鍵盤輸入一個小于1000的正整數(shù), 若此數(shù)的各位數(shù)字之和能被7整除, 則輸出這個數(shù)。分析：此題簡單，但重點在“被”字上，對輸入的數(shù)分解出個、十、百位上的數(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！末尾有多少個連續(xù)的零。其中N!=12

3、3N（1=N=1000）。算法一：從1乘到n，每乘一個數(shù)判斷一次，若后面有0則去掉后面的0，并記下0的個數(shù)。為了不超出數(shù)的表示范圍，去掉與生成0無關的數(shù)，只保留有效位數(shù)，當乘完n次后就得到0的個數(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);計數(shù)器增加1 end; sum:=sum mod 1000;舍去與生成0無關的數(shù) end; wri

4、teln(t:6);end.算法二：此題中生成O的個數(shù)只與含5的個數(shù)有關，n！的分解數(shù)中含5的個數(shù)就等于末尾O的個數(shù)，因此問題轉(zhuǎn)化為直接求n！的分解數(shù)中含5的個數(shù)。var t,n:integer;begin readln(n); t:=0; repeat n:=n div 5 ; inc(t,n); 計數(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. 任意一個自然數(shù)，我們可以將其平均截取成三個自然數(shù)。例如135768，可以截取成13,57,68。如果某自然數(shù)不能平均截取(位數(shù)不能被3整除)，可將該自然數(shù)高位補零后截取。如4128，可在高位補零后成為004128，平均截取成00，41，28三個數(shù)。編程從鍵盤上輸入一個自然數(shù)N(N的位數(shù)12)，計算截取后第一個數(shù)加第三個數(shù)減第二個數(shù)的結果。分析：此題難點數(shù)據(jù)類型上，限定小于12位的自然數(shù)已超出長整數(shù)的范圍，可以轉(zhuǎn)成字符串來運行。參考程序 program p4;Var n:sting12; I,m,code,a:in