第20届胜利油田学生信息学奥林匹克竞赛.docx

第20届胜利油田学生信息学奥林匹克竞赛小学组 Pascal 语言试题一、单项选择。(每小题 分,共 15 分) 1. 下面是某同学定义的变量名,合符 Pascal 语法的是( )。 A. integer B. x1 B. 2x D. x*y 2 .假定所有变量均为实型,算式 duwc vb au?????的正确 Pascal 表达式是( )。 A.(u+a)/((b-v)/(c-w)+u*d) B. (u+a)/(b-v)/(c-w)+u*d C. u+a/b-v/c-w+u*d D. (u+a)/((b-v/c-w)+u*d) 3. 有如下的变量说明: var x,y,z:integer; a:real; 则下面的赋值语句中正确的是( ) A. x=y div 7; B. x:=y/z; C. a:=x*y; D. x+y:=z; a,b,c,d 均为整型变量,对于下面的程序段 a:=0; b:=0; readln(a, b); read(c); readln(d) ; 若从键盘输入: 1 <CR> 234 <CR> 567 <CR> 其中, <CR> 表示“回车”,则 a,b,c,d 中的数应为下面哪一组?( ) ,2,3,4 ,2,3,5 ,2,5,6 ,0,3,5 为整型变量,且 n:=1997 ,下面能将 n 的十位数字(即右边第 2 位数字)分离出来的语句是( )。 A. d:=n mod 100 B. d:=n div 100; C. d:=n div 100 mod 10; D. d:=n mod 100 div 10 6.“判断一个整数 x 是另一整数 y 的整数倍”的 pascal 表达式是( )。A. x=2*y B. x/y=2 mod y=0 mod y=1 7. Pascal 表达式“ 2008 div 5 mod -2”的结果是: B. -1 8. 设实型变量 pi 已赋值为 ,下面不能输出 的语句是()。 A. write(pi:0:2); B. writeln(pi:1:2); C. write(pi:2:2); D. writeln(pi:2); 9 .下列程序段的输出结果是( )。 Var x,s:integer; Begin x:=2005; s:=0; while x<>0 do begin s:=s+x mod 10; x:=x div 10; end; writeln(s); end. C. 10 10 .下列程序段执行后能打印两行“ Very good! ”的是(): A. i:=0; repeat writeln( ‘ Very good ’); i:=i+2; until i=4; B. i:=0; repeat writeln( ‘ Very good ’); i:=i+2; until i<4; B. i:=0; repeat writeln( ‘ Very good ’); i:=i+2; until i>4; D. i:=0; repeat writeln( ‘ Very good ’); i:=i+2; until i=5; 二、问题求解。(7