Free pascal的高手来啊，有几道题目请教一下！ 别看分少，答得好加分!

选择题
1.A
2.C
3.A
4.C
5.A
6.A
7.B
8.D
9.C
10.A
11.B
12.B
13.无答案，应为round(x*100)/100
14.C
15.D
16.C
17.B
填空题
1.a*sqr(x)+b*x+c
2.(-b+sqrt(sqr(b)-4*a*c))/(2*a)和(-b-sqrt(sqr(b)-4*a*c))/(2*a)
3.如果/表示整除的话，答案是0;0，否则答案是2.5;0.0
4.i mod j=0;not odd(m);(y>-2) and (y<-1);(y mod 4=0) and (y mod 100<>0) or (y mod 400=0)
5.chr(ord('A')+ord('Z')-ord(x))

——百度知道团队pas世界欢迎你加入！

BCACA ABDC（C、D似乎都对)A
BB？(应该是round（x*100）/100吧？）CDCB
1 a*x*x+b*x+c
2 s:=b*b-4*a*c
if s=0 then x1:=-b/(2*a)
else begin
x1:=(-b+sqrt(s))/(2*a);
x2:=(-b-sqrt(s))/(2*a);
end;
3 2.5 0(这个不确定= =）
4 i mod j=0 m mod 2=0 (y>=-2)and(y<=-1)
(y mod 4=0)and(y mod 100<>0)or(y mod 400=0)
5 chr(ord('A')+ord('Z')-ord(x))

1.A
2.C
3.A
4.C
5.A
6.C
7.B
8.D
9.C
10.A
11.B
12.B
13.B
14.C
15.C
16.C
17.C

1.a*x*x+b*x+c
2.x=(-b+sqrt(b*b-4*a*c))/(2*a) x=(-b+sqrt(b*b-4*a*c))/(2*a)
3.2.5
4.0
5.chr(155-ord(x))
做这题很累的，多给点分。。