Kiem tra 1 tiet _lan2_HK2_E

Lớp: STT:
Họ và tên:
KIỂM TRA 1 TIẾT LẦN 2
MÔN TIN HỌC 11.


I. TRẮC NGHIỆM (4 ĐIỂM)


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


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) ;


Cho khai báo của một hàm:     Function F( k : Integer) : String ;
      Begin
        If k mod 2=0 then F:=’Chan’ else F:=’Le’;
      End;
3.1) 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
3.2) Muốn in Write( F(y) ); thì biến y phải khai báo kiểu gì :
A. Var y : Real; B. Var y : String; C. Var y: integer; D. Var y : Char;


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


Để khai báo hàm trong Pascal bắt đầu bằng từ khóa
A. Program B. Procedure C. Function D. Begin


Để khai báo thủ tục trong Pascal bắt đầu bằng từ khóa
A. Program B. Procedure C. Function D. Begin


Đoạn chương trình sau có lỗi gì?
Procedure End (key:char);
Begin
If key = ’q’ then
Writeln(’ket thuc’);
End;


Khai báo nào sau đây về phần đầu của hàm là đúng?
A. function nhan(x,y: real); B. procedure nhan(x,y: real) : real;
C. function nhan(x,y) : real; D. function nhan(x,y: real) : real;


Kiểu dữ liệu của hàm
A. chỉ có thể là kiểu integer. C. có thể là các kiểu integer, real, char, boolean, string.
B. chỉ có thể là kiểu real. D. có thể là integer, real, char, boolean, string, record, kiểu mảng.


Muốn khai báo x, y là tham số giá trị và z là tham số biến (x, y, z thuộc kiểu Byte) trong thủ tục “Max” thì khai báo nào sau đây là đúng?
A. Procedure Max(x, Var y: Byte; var z: Byte); B. Procedure Max(x, y: Byte; Var z: Byte);
C. Procedure Max(x: Byte; Var y: Byte; var z: Byte); D. function Max(x, y: Byte; var x: Byte);


Program Tham_so;
Var a, b: integer;
Procedure Nhan_biet_ts(x: integer; var y: integer);
begin
x:=x-1; y:=y-1;
writeln(x: 6; y: 6);
end;
Begin
a:=1; b:=4;
………………?…………………
writeln(a: 6; b: 6);
End.
11. 1) Câu lệnh điền vào (…?...) để gọi chương trình con Nhan_biet_ts cho 2 biến a và b là:
A. Nhan_biet_ts;