Đề kiểm tra 1 tiết HK2 môn Tin học 11 năm 2019 - Trường THPT Quang Trung

Câu hỏi Trắc nghiệm (40 câu):

  • Câu 1:

    Mã câu hỏi: 103828

    Hàm và thủ tục khác nhau ở chỗ:

    • A.Hàm là chương trình con còn thủ tục thì không phải
    • B.Hàm và thủ tục giống nhau.
    • C.Hàm có giá trị trả về
    • D.Thủ tục có giá trị trả về
  • Câu 2:

    Mã câu hỏi: 103831

    Kiểu dữ liệu của hàm

    • A.Chỉ có thể là Real
    • B.chỉ có thể là các kiểu integer, real, char, boolean, string
    • C.chỉ có thể là integer, real, char, boolean, string, record, kiểu mảng
    • D.Chỉ có thể là kiểu integer
  • Câu 3:

    Mã câu hỏi: 103834

    Chương trình con là một dãy lệnh mô tả một số thao tác… và có thể được thực hiện từ nhiều vị trí khác nhau trong chương trình. Trong dấu ( …) là cụm từ?

    • A.Nhất định 
    • B.Hợp lý
    • C.Hữu hạn
    • D.Xác định
  • Câu 4:

    Mã câu hỏi: 103837

     Phần đầu của thủ tục được bắt đầu với từ dành riêng…

    • A.Begin
    • B.Program
    • C.Function
    • D.Procedure
  • Câu 5:

    Mã câu hỏi: 103839

    Trong khai báo danh sách tham số hình thức của chương trình con, các tham số có từ khóa var là:

    • A.Tham số biến
    • B.Tham số giá trị
    • C.Biến cục bộ
    • D.Tham số thực sự
  • Câu 6:

    Mã câu hỏi: 103841

    Các biến được khai báo trong chương trình con và chỉ có tác dụng trong chương trình con đó được gọi là các….

    • A.Biến cục bộ
    • B.Biến toàn cục
    • C.Biến tệp
    • D.Biến xâu.
  • Câu 7:

    Mã câu hỏi: 103843

    Giả sử có thủ tục Procedure Vidu(x: real; var y: integer); thì

    • A.x là tham biến, y là tham trị
    • B.x, y là tham biến
    • C.x, y là tham trị
    • D.x là tham trị, y là tham biến
  • Câu 8:

    Mã câu hỏi: 103845

    Các biến được khai báo trong chương trình chính được gọi là các…

    • A.biến tệp
    • B.biến xâu.
    • C.biến cục bộ
    • D.biến toàn cục
  • Câu 9:

    Mã câu hỏi: 103847

    Giả sử có hàm Function dientich(m,n: real); thì

    • A.m,n là tham trị
    • B.m,n là tham biến
    • C.m,n là tham só thực sự
    • D.Tất cả đều sai
  • Câu 10:

    Mã câu hỏi: 103849

    ….không trả về giá trị nào thông qua tên ….

    • A.Hàm
    • B.Chương trình con
    • C.thủ tục
    • D.Chương trình
  • Câu 11:

    Mã câu hỏi: 103851

    Từ khóa khai bào hàm là:

    • A.Procedure
    • B.Program
    • C.Function
    • D.Begin
  • Câu 12:

    Mã câu hỏi: 103853

    Cho đoạn chương trình sau:

    Program baitap;

    Var a,b,S :Byte;

    Procedure VD(x:byte; Var y:byte);

        Var i:byte;

        Begin

           i:=5;

           writeln(x , ‘  ‘, y);

           x:=x*i;

           y:=y*i;

           s:=x+y;

           writeln(x , ‘  ‘, y);

         end;

        Begin

             Write(‘nhap vao 2 so a,b ‘); Readln(a,b);

              VD(a,b);

              writeln(a , ‘  ‘, b, ‘  ’, S);

        Readln;

    End.

    Trong chương trình trên có các biến toàn cục là:

    • A.x và y
    • B.a và b
    • C.a, b, S
    • D.i
  • Câu 13:

    Mã câu hỏi: 103855

    Cho đoạn chương trình sau:

    Program baitap;

    Var a,b,S :Byte;

    Procedure VD(x:byte; Var y:byte);

        Var i:byte;

        Begin

           i:=5;

           writeln(x , ‘  ‘, y);

           x:=x*i;

           y:=y*i;

           s:=x+y;

           writeln(x , ‘  ‘, y);

         end;

        Begin

             Write(‘nhap vao 2 so a,b ‘); Readln(a,b);

              VD(a,b);

              writeln(a , ‘  ‘, b, ‘  ’, S);

        Readln;

    End.

    Giả sử khi chạy chương trình trên ta nhập a = 5, b = 7 thì kết quả:

    • A.5     7
    • B.5    7
    • C.5    7
    • D.5    7
  • Câu 14:

    Mã câu hỏi: 103857

    Cho chương trình con:

    Program Maxbaso;                                          

    Var a, b, c: integer;                                                      

    Function Max(a, b:integer)  : integer;                                                         

            Begin                                            

                            If a>b then max: = a else ….. ;

                    End;                      

    Begin                                                                   

                 Write(‘nhap 3 so: ’);readln(a, b, c);                         

                 Writeln(‘so lon nhat la: ‘, max(max(a, b), c)); 

                  Readln  

           End.

    Chương trình trên dùng để cho biết số lớn nhất trong ba số nhập từ bàn phím. Trong dấu (…) còn thiếu câu lệnh gì?

    • A.Min := c
    • B.Max := c
    • C.Max := b
    • D.Min := b
  • Câu 15:

    Mã câu hỏi: 103859

    Cho chương trình con:

    Program Maxbaso;                                          

    Var a, b, c: integer;                                                      

    Function Max(a, b:integer)  : integer;                                                         

            Begin                                            

                            If a>b then max: = a else ….. ;

                    End;                      

    Begin                                                                   

                 Write(‘nhap 3 so: ’);readln(a, b, c);                         

                 Writeln(‘so lon nhat la: ‘, max(max(a, b), c)); 

                  Readln  

           End.

    Kiểu dữ liệu trả về của hàm trên là?

    • A.Kiểu logic
    • B.Kiểu xâu
    • C.Số nguyên
    • D.Số thực
  • Câu 16:

    Mã câu hỏi: 103862

    Cho chương trình con:

    Program Maxbaso;                                          

    Var a, b, c: integer;                                                      

    Function Max(a, b:integer)  : integer;                                                         

    Begin                                            

                   If a>b then max: = a else ….. ;

              End;                      

          Begin                                                                   

                 Write(‘nhap 3 so: ’);readln(a, b, c);                         

             Writeln(‘so lon nhat la: ‘, max(max(a, b), c)); 

             Readln  

       End.

    Các biến a, b, c là các biến:

    • A.Biến toàn cục
    • B.Biến cục bộ
    • C.Tham số biến
    • D.Tham số giá trị
  • Câu 17:

    Mã câu hỏi: 103864

    Cho chương trình sau:

    Program  VD_thbien_thtri;

    Var a , b: Integer;

    Procedure  VD(x: Integer; Var  y : Integer);

    Begin

    x := x + y;

    y : = y + x;

    Writeln(x : 6, y : 6);

    End;

    Begin

    a := 20;   b := 6;

    Writeln(a : 5 , b : 5);

    VD(a , b);

    Writeln(a : 5 , b : 5);

    Readln;

    End.

    Trong chương trình trên, sử dụng:

    • A.x, y là tham số biến
    • B.x là tham số biến -  y là tham số giá trị
    • C.x là tham số giá trị -  y là tham số biến
    • D.x, y là tham số giá trị.
  • Câu 18:

    Mã câu hỏi: 103866

    Cho chương trình sau:

    Program  VD_thbien_thtri;

    Var a , b: Integer;

    Procedure  VD(x: Integer; Var  y : Integer);

    Begin

    x := x + y;

    y : = y + x;

    Writeln(x : 6, y : 6);

    End;

    Begin

    a := 20;   b := 6;

    Writeln(a : 5 , b : 5);

    VD(a , b);

    Writeln(a : 5 , b : 5);

    Readln;

    End.

    Kết quả sau khi thực hiện là:

    • A.20         6
    • B.20        6
    • C.20         6
    • D.20         6
  • Câu 19:

    Mã câu hỏi: 103868

    Cho chương trình sau:

    Program  VD_thbien_thtri;

    Var a , b: Integer;

    Procedure  VD(x: Integer; Var  y : Integer);

    Begin

    x := x + y;

    y : = y + x;

    Writeln(x : 6, y : 6);

    End;

    Begin

    a := 20;   b := 6;

    Writeln(a : 5 , b : 5);

    VD(a , b);

    Writeln(a : 5 , b : 5);

    Readln;

    End.

    Nếu trong chương trình trên,nếu thay thủ tục Procedure  VD(x :Integer; Var  y : Integer); bằng thủ tục Procedure  VD(x :Integer; y : Integer); thì kết quả sau khi thực hiện chương trình là:

    • A.20         6
    • B.20        6
    • C.20         6
    • D.20         6
  • Câu 20:

    Mã câu hỏi: 103870

    Cho chương trình sau:

    Program  VD_thbien_thtri;

    Var a , b: Integer;

    Procedure  VD(x: Integer; Var  y : Integer);

    Begin

    x := x + y;

    y : = y + x;

    Writeln(x : 6, y : 6);

    End;

    Begin

    a := 20;   b := 6;

    Writeln(a : 5 , b : 5);

    VD(a , b);

    Writeln(a : 5 , b : 5);

    Readln;

    End.

    Nếu trong chương trình trên,nếu thay thủ tục Procedure  VD(x :Integer; Var  y : Integer); bằng thủ tục Procedure  VD(var x :Integer; var y : Integer); thì kết quả sau khi thực hiện chương trình là:

    • A.20         6
    • B.20        6
    • C.20         6
    • D.20         6
  • Câu 21:

    Mã câu hỏi: 103872

    Cho biết chương trình sau dùng để làm gì?

    program inso;

    var m, n, i: integer;

    begin

           m:= 0; n:= 0;

           for i:= 1 to 10000 do

            begin

             if (i mod 3 = 0) then m:= m+1;

             if (i mod 3 = 0) and (i mod 5 = 0) then n:= n+1;

           end;

           writeln (m, ‘ ’, n);

    end.

    • A.Đếm các số nguyên trong khoảng từ 1 đến 10000 là bội số của 3
    • B.Đếm và thông báo ra màn hình số lượng các số nguyên trong khoảng từ 1 đến 10000 chia hết cho 3
    • C.Đếm và thông báo ra màn hình số lượng số nguyên trong khoảng từ 1 đến 10000 là bội số của 3 và 5
    • D.Đếm và thông báo ra màn hình trong khoảng từ 1 đến 10000 có bao nhiêu số là bội của 3 và bao nhiêu số là bội chung của 3 và 5
  • Câu 22:

    Mã câu hỏi: 103874

    Cho câu lệnh: For a:= 5 downto 1 do  write(a);  Kết quả thực hiện lệnh trên là:

    • A.5 4 3 2 1
    • B.12345    
    • C.54321         
    • D.1 2 3 4 5
  • Câu 23:

    Mã câu hỏi: 103876

    Cú pháp câu lệnh lặp với số lần chưa biết trước?

    • A.FOR <điều kiện> TO <câu lệnh>;   
    • B.FOR <điều kiện> DO <câu lệnh>;
    • C.WHILE <điều kiện> DO <câu lệnh>;   
    • D.WHILE <biểu thức> DO <câu lệnh>;
  • Câu 24:

    Mã câu hỏi: 103878

    Có mấy lỗi cú pháp trong đoạn chương trình sau?

    If 3*a >0 then a:=1; else a:=2

    • A.1
    • B.2
    • C.3
    • D.4
  • Câu 25:

    Mã câu hỏi: 103880

    Biểu thức nào sau đây có thể sử dụng làm biểu thức điều kiện trong cấu trúc rẽ nhánh?

    • A.a + b        
    • B.a > b    
    • C.n mod 100  
    • D.‘false’
  • Câu 26:

    Mã câu hỏi: 103882

    Câu lệnh nào sau đây là chưa đúng khi tìm giá trị nhỏ nhất (x) của a và b?

    • A.if a <= b then x:= a else x:= b;  
    • B.if a < b then x:= a;
    • C.x:= b; if a < b then x:= a;   
    • D.if a < b then x:= a else x:= b;
  • Câu 27:

    Mã câu hỏi: 103884

    Cho đoạn chương trình:

    A:=0; B:=0;

    IF A>0 then A:=1 ELSE Begin A:=2; B:=1; End;

    C:=A+B;

    Sau khi thực hiện, C có giá trị là:

    • A.0
    • B.1
    • C.2
    • D.3
  • Câu 28:

    Mã câu hỏi: 103886

    Trong ngôn ngữ lập trình Pascal, câu lệnh ghép nào sau đây là đúng cú pháp?

    • A.Begin A:=1; B:=5; End;   
    • B.Begin: A:=1 B:=5 End;
    • C.Begin: A:=1; B:=5; End;   
    • D.Begin A:=1; B:=5; End.
  • Câu 29:

    Mã câu hỏi: 103888

    Cấu trúc câu lệnh rẽ nhánh có dạng:

    • A.IF <điều kiện> THEN <Câu lệnh 1>; ELSE < Câu lệnh 2>;
    • B.IF <điều kiện> THEN <Câu lệnh 1> ELSE < Câu lệnh 2>;
    • C.IF <điều kiện>  DO  <Câu lệnh >;
    • D.IF <điều kiện> THEN <Câu lệnh >
  • Câu 30:

    Mã câu hỏi: 103890

    Trong ngôn ngữ lập trình Pascal, nhấn phím Alt + F3 có tác dụng:

    • A.Đóng cửa sổ chương trình   
    • B.Lưu chương trình hiện hành
    • C.Thoát khỏi Turbo Pascal    
    • D.Mở chương trình có trên đĩa
  • Câu 31:

    Mã câu hỏi: 103892

    Trong ngôn ngữ lập trình Pascal, nhấn phím F7 có tác dụng:

    • A.Mở cửa sổ hiệu chỉnh     
    • B.Thực hiện từng câu lệnh trong chương trình
    • C.Chạy chương trình  
    • D.Theo dõi giá trị của các biến trong cửa sổ Watches
  • Câu 32:

    Mã câu hỏi: 103894

    Tổ hợp phím để chạy chương trình trong Pascal?

    • A.Alt+F3       
    • B.Alt+X       
    • C.Ctrl+F9       
    • D.Shift+F9
  • Câu 33:

    Mã câu hỏi: 103896

    Cho biết kết quả sau khi thực hiện chương trình sau. Giả sử x:= 0; y:= -1;

    begin

    readln(x, y); T:= x; x:= y; y:= T;

    write(‘x = ‘, x, ‘, y = ‘, y);

    end.

    • A.x = 0, y = -1      
    • B.x = - 1, y = T     
    • C.x = T, y = T  
    • D.x = -1, y = 0
  • Câu 34:

    Mã câu hỏi: 103898

    Cho câu lệnh: write(‘1 + 3 + . . . + ‘ ,2*n - 1, ‘ = ‘, sqr(n)) và n = 5. Cho biết kết quả sau khi thực hiện câu lệnh:

    • A.1 + 3 + . . . + 9 = 25      
    • B.1 + 3 + . . . + = 25
    • C.1 + 3 + 4 + 5 + 6 + 7 + 8 + 9 = 25  
    • D.1 + 2 + 3 + 4 + 5 = 15
  • Câu 35:

    Mã câu hỏi: 103900

    Để nhập giá trị từ bàn phím cho 2 biến x, y không là kiểu Boolean ta dùng lệnh:

    • A.writeln[xy];      
    • B.Readln(x,y);      
    • C.Write(x,y);      
    • D.Read(‘x,y’);
  • Câu 36:

    Mã câu hỏi: 103902

    Biến Y có giá trị 7.593. Kết quả thực hiện câu lệnh Write('Tong la: Y = ',Y:6:2); là:

    • A.Tong la: Y = Y:6:2     
    • B.Tong la: Y =   7.59    
    • C.Tong la: Y =   7,59       
    • D.Tong la: Y =   7.593
  • Câu 37:

    Mã câu hỏi: 103904

    Ý nghĩa của thủ tục Write(<Danh sách kết quả>); trong Pascal?

    • A.Nhập danh sách kết quả vào từ bàn phím       
    • B.Xuất danh sách kết quả ra máy in.
    • C.Xuất danh sách kết quả ra màn hình.    
    • D.Xuất ra màn hình dòng chữ: Danh sách kết quả
  • Câu 38:

    Mã câu hỏi: 103906

     Biểu thức 0 < N ≤ 103 được biểu diễn trong Pascal là:

    • A.(N>=103) and (N>0)     
    • B.(N<=103) or (N>0)     
    • C.(N >= 103) or (N>0)      
    • D.(N <= 103) and (N>0)
  • Câu 39:

    Mã câu hỏi: 103908

    Cho  khai báo: Var c: char;  i,j: integer; x,y: real; p,q: Boolean;. Phép toán gán nào sau đây không hợp lệ:

    • A.c:='A';     
    • B.x:=0.5;      
    • C.q:=2;       
    • D.i:=2*i+1;
  • Câu 40:

    Mã câu hỏi: 103910

    Cho chương trình sau:

                Var c: char;  i,j: integer; x,y: real; p,q: Boolean;

                begin

                        i:= 3; j:=2* i+1;  c:='A';     x:=0.5; q:=j>i;

                end.

    Giá trị của q sau khi thực hiện chương trình là:

    • A.7 > 3      
    • B.2*i +1> i
    • C.FALSE     
    • D.TRUE

Bình luận

Có Thể Bạn Quan Tâm ?