Cho khai báo biến và khai báo đầu của thủ tục TT:
Var x,y: Integer;
St:String;
Procedure TT(Var a: Integer; b: String);
Lệnh nào đúng?
A -
TT(x +1, St);
B -
TT(10, St);
C -
TT(x, St);
D -
y:= TT(St, x);
2-
Khi chạy chương trình:
Var x,y: Real;
Function F(x,y: Real): Real;
Begin
F:=x;
If x < y then F:= y;
End;
BEGIN
x:=10; y:=15;
Write(F(x, y): 0:0);
END.
Kết quả in ra?
A -
10
B -
15
C -
0
D -
F(x,y)
3-
Cho a là biến nguyên a=3, và khai báo thủ tục:
Procedure TT(x: Integer);
Begin
x:=x+2;
End.
Sau khi gọi thủ tục TT(a) thì Giá trị của biến a là?
A -
2
B -
5
C -
3
D -
0
4-
Cho x, y là hai biến nguyên và khai báo thủ tục:
Procedure Doicho(Var a: Integer; b: Integer);
Var z: Integer;
Begin
z:=a; a:=b; b:=z;
End.
Sau khi thực hiện các lệnh:
x:=7; y:=3;
Doicho(x,y);
Thì giá trị của x, y là?
A -
x=7, y=7
B -
x=3, y=3
C -
x=3, y=7
D -
x=7, y=3
5-
Cho khai báo hàm đệ quy:
Function F(a: Integer): Integer;
Begin
If a=1 then F:=1 else F:= a*a+ F(a-1);
End.
Giá trị của hàm F(4) là?
A -
1
B -
25
C -
14
D -
30
6-
Khi chạy chương trình:
Var x: Integer;
Procedure TT;
Begin
x:=4; x:= x+5;
End;
BEGIN
x:=0; TT;
Write(x);
END.
Kết quả in ra là?
A -
4
B -
5
C -
9
D -
0
7-
Khi chạy chương trình:
Var x: Integer;
Procedure TINH;
Var x: Integer;
Begin
x:=1; x:= x+12;
End;
BEGIN
x:=10; TINH;
Write(x);
END.
Kết quả in ra là?
A -
10
B -
12
C -
22
D -
13
8-
Khi chạy chương trình:
Var x: Integer;
Procedure TTA;
Var x: Integer;
Begin
x:= 7*5;
Write(x, ",);
End;
BEGIN
x:=4; TTA;
Write(x:2);
END.
Kết quả in ra là?
A -
35, 4
B -
4, 35
C -
4, 75
D -
354
9-
Chọn khai báo đúng?
A -
Type Phanso = Record Tu, Mau: Integer; End.
B -
Type Phan so = Record; Tu so, Mau so: Integer; End.