【正文】
program p(output); var k,n:integer;function f(a:integer):boolean;var k:integer; flag:boolean;begin flag:=__3________; k:=2; while(k〈=a div 2〉 and____4____do if a mod k=0 then ______5______ else k:=k+1。 f:=flag。 end;beginn:=0;k:=2;repeatif f(k) and _____6____ thenbegin n:=n+1;writeln(k,k+2)end;k:=k+1until n=15end.答案一、選擇題(每小題2 分,共40分) 12345678910111213DAADBBCAAABDECAA14151617181920CDCCDBB二、 a b d f g e c ABCEGDFHIJ三、閱讀程序,并寫(xiě)出程序的正確運(yùn)行結(jié)果(每空6 分,共30分) 程序運(yùn)行結(jié)果: 1 程序運(yùn)行結(jié)果: mo 程序運(yùn)行結(jié)果: 9 程序運(yùn)行結(jié)果: (1) n:=n+1。 (2) (n*(n+1))四、程序填空(每空5 分,共30分) ① N或1 ② N1 ③ TRUE ④ FLAG或FLAG=TRUE ⑤ FLAG:=FALSE ⑥ F(K+2)=TURE或F(K+2)