信息學(xué)競賽普及組初賽模擬試題二(編輯修改稿)
2025-07-04 15:01 本頁面
【文章內(nèi)容簡介】 m(varm:integer。x:real)。varn:integer。beginm:=m+1。n:=m+1。x:=n*3。p:=n。end。beginm:=8。n:=5。p:=3。x:=。mm(n,x)。writeln(m:5,n:5,p:5,x:6:1)。end.輸出的結(jié)果為：4.programtext4。constn=5。typeary=array[0..n1,0..n1]ofinteger。vara:ary。i,j,k:integer。begin fori:=0ton1doforj:=0ton1doa[i,j]:=0。k:=1?！ ori:=1tondo forj:=n1downtoido begin a[j,ji]:=k?！ :=k+1?！ nd?！ ori:=0ton1dobegin forj:=0ton1dowrite(a[I,j]:4)。writeln。end?！ nd. 輸出的結(jié)果為：text5(input,output)。varch:char。i,n,sum:integer。beginsum:=0。read(ch)。casechof 39。A39。:fori:=4to6do begin read(n): sum:=sum＋n end。 39。B39。：beginread(n)?！ ori:=1tondo beginread(n)。sum:=sum＋nend?！ nd。 39。C39。:repeat read(n)。sum:=sum＋n untilsum10?！?9。D39。:beginread(n)。 whilen=3do beginsum:=sum＋n。read(n)end end end?！riteln(sum:4)end.當(dāng)程序運行(1)輸入A 4 1 2 3 4 5 6 7 8 9時，其輸出為_____________。(2)輸入B 4 1 2 3 4 5 6 7 8 9時，其輸出為_____________。(3)輸入C 4 1 2 3 4 5 6 7 8 9時，其輸出為_____________。(4)輸入D 4 1 2 3 4 5 6 7 8 9時，其輸出為_____________。四、完善程序（第1題每空2分第3題每空3分，共32分）第1題孿生素數(shù)是指兩個相差為2的素數(shù)，例如：3和5，5和7，11和13等。下面程序可輸出15對孿生素數(shù)，其中函數(shù)q判斷整數(shù)a是否為素數(shù)。programp(output)。vark,n:integerfunctionq(a:integer):booklean。vark:integer。flag:boolean。beginflag:___(1)____k:=2___(2)____(k=adiv2)andflagdoifamodk=0then______(3)_______elsek:=k+1q:=flagend。beginn:=0。k:=2。repeatifq(k)and___(4)___thenbeginn:=n+1。writeln(k,k+2)end。k:=K+1untiln=5end.第二題已知有類型arr=array[1..16]ofstring。arr型數(shù)組a中存放著從第1屆到第16屆足球世界杯冠軍國家的名字，下面的函數(shù)可求出歷界世界杯比賽共有幾個國家曾獲得過世界杯冠軍，請?zhí)羁胀瓿?。Functiontext2(a:arr):integer。1
教學(xué)教案相關(guān)推薦
鄂ICP備17016276號-1