几道pascal题目、请高手帮帮忙、要快

来源：百度知道 编辑：UC知道 时间：2024/05/16 01:00:33
1.下面程序中的过程 proc 的参数表没有给数（填空）
program lx22 ；
var
a,b:integer
procedures proc（______）①
begin
c:=a+b;
d:=a-b;
end;
begin
a:=1;
b:=2;
proc(a,b);
writeln(a:2,’,’,b:2);
end.
则过程 proc 中的参数表为
___________
程序的输出是 1， 2

2.已知函数说明如下
function f(n:integer):integer;
begin
if n=0 then f:=0
else if n>0 then f:=f(n-2)
else f:=f(n+3);
end;
则函数调用f（5）的值是______

3.有下列函数说明
function ff(a,b,c:integer):integer;
var
t:integer;
begin
a:=3*a;
t:=b div c;
ff:=a+4*t;
end;
则表达式 ff(ff(1,(ff(1,2,3),3),2,3)的值是______

1.设有过程说明如下
procedures gc(x:integer;var y:integer);
var z:integer;
begin
x:=10; y:=12; z:=14;
end;
执行下列语句后，输出结果为_____
x：=1； y：=2； z：=3；
gc (y,x);
write(x,y,z);
A. 2123 B. 1223
C. 10123 D. 121014

2.以知有如下函数

1.a,b:integer
2.f(5)="0"
3.21

1.D
2.B

补充程序
1.
k:=a;
a:=b;
b:=k;
2.
print(n-1);
n

判断题(T/F)
1.F
2.T
3.T
4.F
5.T
6.T
7.T
8.F
9.T

1.填“a,b:integer”
2.f(5)="0"
3.题目有错吧

1.D
2.B

补充程序
1.
k:=a;
a:=b;
b:=k;
2.
print(n-1);
n

判断题(T/F)
1.F
2.T
3.T
4.F
5.T
6.T
7.T
8.?
9.T

这是pascal NOIP竞赛模拟题吧！我虽没有答案，做几个吧！
1、a,b:integer;
2、没有赋值，f(5)="0"
3、好象有问题，不过我也不会。

1、D
2、B
补充程序
1.
k:=a;
a:=b;
b:=k;
2.
print(n-1);
n
判断题(T/F)
1.F
2.T 过程没有实型。
3.T
4.F
5.T
6.T
7.F 电脑已含有的函数（如sqrt)。
8.F
9.T

1.下面程序中的过程 proc 的参数表没有给数（填空）
program lx22 ；
var
a,b:integer
procedures proc（---）①
begin