PASCAL语言 高手 帮帮忙 ！！感激不尽 ！！

15. 以下程序段共执行___________次循环 I:=0.5; While I<2.5 do Begin I:=I+0.5; End; (A) 1 (B) 3 (C) 4 (D) 5 16. 以下属非法的pascal用户自定义标识是_____ (A) CONST (B) FORMAT (C) MAX (D) NEXT 17. 下面的常量定义中正确的是__ (A) CONST I=100 OR 200 (B) CONST R:12.5 (C) CONST PI=3.14 (D) CONST J:=10 18. 分析下面的PASCAL程序，给出正确的运行结果___________ PROGRAM mx(input,output); VAR R, s, t :integer; PROCEDURE change(a,b:integer); VAR T:integer; BEGIN A:=3*a; B:=2*b; T:=a+b; End; BEGIN R:=2;s:=4;t:=6; Change(r,s); Writeln(‘r=’,r,’s=’,s,’t=’,t) End. (A) r=2 s=4 t=6 (B) r=2 s=4 t=14 (C) r=6 s=8 t=6 (D) r=6 s=8 t=14 19. 设有如下的过程说明 PROCEDURE wri; BEGIN Writeln(‘Welcome to use pascal!!!’); End; 则下面有关过程wri的叙述中正确的是____ (A) 过程说明有错，因为没有形式参数 (B) 过程说明有错，因未说明过程的类型 (C) 过程说明有错，因为在过程体内没有给过程名赋值的语句 (D) 过程说明正确 20. 有一单向链表，已知P，Q两接点，删除P 接点的操作是（ ） head ……. Q P (A) Q^.next:=P^.next; Dispose(p); (B) q^.next^.next:=next; dispose(p); (C) q^.next:=p; P^.next:=nil; Dispose(P); (D) p:=q^.next; q^:=p^.next; p^.next:=q^.next; Dispos(p); 21. 下面循环语句仅执行一次的是_____ (A) I:=0; Repeat I:=I+1; Writeln(i) Until I<3 (B) I:=0; while (I<3) do I:=I+1; writeln(i); (C) for I:=0 downto 3 do I:=I+1; Writeln(i); (D) I:=0 while (I>0) or (I<3) do I:=I+1; writeln(i); 22. 以下pascal程序输出结果是__________ program tea(output); VAR i,j:integer; Begin For i:=1 to 4 do Begin For j:=4-i to 1 do Write(‘*’); Writeln end end. (A) * * * * * * (B) * * * * * * (C) * * * (D) * * * 23. 循环语句FOR C:=‘X’ DOWNTO ‘Z’ DO writeln;的循环次数是___ (A) 0 (B) 1 (C) 2 (D) 3 24. 根据下面的变量说明 VAR M, n, i, j:integer;bool:Boolean; 则下面的赋值语句中正确的是_____________ (A) m+n:=2*j (B) bool:=n=i DIV j (C) m=15 MOD 7 (D) m:=i+j:=n+8 25. Pascal 程序中无序类型是指（ ） (A) 实型 (B) 字符型 (C) 整型 (D) 布尔型

CACADAACABA
15. i = 0.5, 1, 1.5, 2 时各执行一次
16. const 是保留字(会高亮的那种)
17. 正确格式是 "const 常量名 = 值;" A 选项的表达式不合法
18. 要写成"procedure change(var a,b:integer);" a 和 b 的值才会变, 删去"var t : integer" t 的值才会变
19. 对的就是对的, 没什么原因...
20. 将q 的next指向q 的next 的next, 即p 的next 即可
21. A 一次, B 3次, C 0次(不能通过编译), D 死循环
22. i = 1, 2 时不打星号, i = 3 时 j = 1 ~ 1 打1个, i = 4 时 j = 0 ~ 1 打2个
23. 'X' < 'Z' , 所以0次
24. "n = i div j" 是一个条件表达式, 结果是一个boolean类型的值
25. 不太好表述, 反正就是实型分2部分, 即xxxE+yyy, 不能对实型变量进行inc或者dec

c,a,c,a,d,a,a,c,a,b,a

我是来打酱油的