Cho khai báo biến và khai báo đầu của hàm F:
Var x,S: Real;
n: Integer;
FUNCTION F(y: Real; m: Integer): Real;
Lời gọi hàm nào dưới đây là đúng?
A -
S:= F(n, x);
B -
S:= F( x, n);
C -
S:= F( n);
D -
S:= F( x);
3-
Cho khai báo biến và khai báo đầu của thủ tục TT như sau: Var x,S: Integer;
ch: Char;
Procedure TT(y: Integer; kytu: char);
Lệnh gọi thủ tục nào đúng?
A -
S:= TT(x, ch);
B -
TT(ch, x);
C -
TT;
D -
TT(x, ch);
4-
Khi chạy chương trình:
Procedure TINHS;
Var i,S: integer;
Begin
S:=1;
For i:=1 to 4 do S:=S*I;
Write(S);
End;
BEGIN
TINHS;
END.
Kết quả in ra sẽ là?
A -
12
B -
6
C -
24
D -
4
5-
Cho khai báo hàm:
Function F(x: Integer): Integer;
Begin
F:=x*x;
End.
Giá trị của F(2+1) là?
A -
9
B -
3
C -
4
D -
1
6-
Cho khai báo hàm:
Function F(x,y: Integer): Integer;
Begin
If x < y then F:=x else F:=y;
End.
Giá trị của F(9,0) là?
A -
0
B -
1
C -
2
D -
3
7-
Cho khai báo hàm:
Function F(k: Integer): Integer;
Begin
F:=2*k+1;
End.
Giá trị của hàm F(F(1)) là?
A -
3
B -
7
C -
5
D -
1
8-
Khi chạy chương trình: Procedure TT(a: Integer);
Begin
Repeat;
a:= 2*a;
Until a > 15;
Write(a);
End;
BEGIN
TT(2); END.
Kết quả in ra là?
A -
9
B -
16
C -
32
D -
2
9-
Cho khai báo đầu của một hàm:
Function F(k: Integer): String;
Begin
If k mod 2=0 then F:= "Chan’ else F:= "Le’;
End.
Muốn gán X:= F(5) thì biến X phải khai báo kiểu gì?
A -
Var X: Real;
B -
Var X: String;
C -
Var X: Integer;
D -
Var X: Char;
10-
Cho khai báo đầu của một hàm:
Function F(k: Integer): String;
Begin
If k mod 2=0 then F:= 'Chan' else F:= 'Le';
End.
Muốn in Write(F(y)) thì biến y phải khai báo kiểu gì?
