Thi học kì I Năm học 2015 2016 môn: Tin 11 trường THPT Nguyễn Văn Cừ21861

Sở GD-ĐT Tỉnh BRVT Trường THPT Nguyễn Văn Cừ THI HKI - Năm học 2015-2016 Môn: Tin 11 Thời gian: 45 phút Họ tên học sinh: Lớp: 11A Mã đề: 144 I Lý thuyết (3đ) Câu Cho câu lệnh IF: IF a>b then x:=a+b ELSE x:=a-b; Hỏi x a=3, b=6? A -3 B C D Câu Khai báo sau cú pháp? A Type mang1c = array (1 100) of byte; B Type mang1c = array [1 100] of byte; C Type mang1c = array [1-100] of byte; D Type 1mang = array [1 100] of byte; Câu Có loại tên ngơn ngữ lập trình Pascal? A B C D Câu Cho câu đoạn lệnh sau: For i= to N if A[i]>max then Begin Max=A[i];smax=i;end; Đoạn lệnh sai đâu? A Lệnh If B Vịng lặp For C Khơng có sai D lệnh gán = Câu Chọn phát biểu sai nói vòng lặp FOR :=csd TO csc DO ; A Được sử dụng để lặp với số lần biết trước B Biến đếm tự động tăng đơn vị sau lần lặp C Có thể thay đổi giá trị Biến đếm Câu lệnh sau DO D Câu lệnh sau DO thực Biến đếm > csc Câu Có lỗi đoạn chương trình sau: S=0; IF S>0 THEN write(S, la so duong); ELSE write(S, la so am); A B C D Câu Để xuất mảng A vừa nhập vào từ bàn phím ta thực lệnh sau đây? A Read(A[i]); B Write(A[i]:4); C Readln(A[i]); D Write('A[i]:4'); Câu Cho biểu thức A = (x DIV 2) MOD x để A = 3? A 37 B 33 C 29 D 25 Câu Một biến x nhận giá trị nguyên khoảng từ -200000 đến 200000 Kiểu liệu thích hợp x là: A Word B Byte C Integer D Longint Câu 10 Hình vng có độ dài cạnh a có giá trị nằm khoảng số nguyên từ 100 đến 200 Biến S dùng để lưu giá trị diện tích hình vng kiểu liệu S là: A Longint B Integer C Word D Byte Câu 11 Cho B = NOT((x-3)) B nhận giá trị x=7? A TRUE B -3 C FALSE D Câu 12 Tên viết ngơn ngữ lập trình Pascal? A 20/11 B _45 C 60baitap D dien tich II Bài tập (7đ) Viết câu lệnh rẻ nhánh tính (2đ) a) Nếu a>b a = a-b ngược lại b = b-a ���� + ���� �ế� ‒ � ≤ � ≤ � b) Z= � � �ế� � > � ��ặ� � b then x:=a+b ELSE x:=a-b; Hỏi x a=3, b=6? A B -3 C D Câu Hình vng có độ dài cạnh a có giá trị nằm khoảng số nguyên từ 100 đến 200 Biến S dùng để lưu giá trị diện tích hình vng kiểu liệu S là: A Longint B Word C Integer D Byte Câu Cho B = NOT((x-3)) B nhận giá trị x=7? A -3 B FALSE C D TRUE Câu Khai báo sau cú pháp? A Type mang1c = array [1 100] of byte; B Type mang1c = array (1 100) of byte; C Type mang1c = array [1-100] of byte; D Type 1mang = array [1 100] of byte; Câu Có lỗi đoạn chương trình sau: S=0; IF S>0 THEN write(S, la so duong); ELSE write(S, la so am); A B C D Câu Cho câu đoạn lệnh sau: For i= to N if A[i]>max then Begin Max=A[i];smax=i;end; Đoạn lệnh sai đâu? A lệnh gán = B Lệnh If C Khơng có sai D Vịng lặp For Câu 10 Chọn phát biểu sai nói vịng lặp FOR :=csd TO csc DO ; A Biến đếm tự động tăng đơn vị sau lần lặp B Được sử dụng để lặp với số lần biết trước C Có thể thay đổi giá trị Biến đếm Câu lệnh sau DO D Câu lệnh sau DO thực Biến đếm > csc Câu 11 Một biến x nhận giá trị nguyên khoảng từ -200000 đến 200000 Kiểu liệu thích hợp x là: A Longint B Integer C Byte D Word Câu 12 Có loại tên ngơn ngữ lập trình Pascal? A B C D II Bài tập (7đ) Viết câu lệnh rẻ nhánh tính (2đ) a) Nếu a>b a = a-b ngược lại b = b-a ���� + ���� �ế� ‒ � ≤ � ≤ � b) Z= � � �ế� � > � ��ặ� � max then Begin Max=A[i];smax=i;end; Đoạn lệnh sai đâu? A Lệnh If B Vịng lặp For C lệnh gán = D Khơng có sai Câu Có lỗi đoạn chương trình sau: S=0; IF S>0 THEN write(S, la so duong); ELSE write(S, la so am); A B C D Câu Một biến x nhận giá trị nguyên khoảng từ -200000 đến 200000 Kiểu liệu thích hợp x là: A Byte B Word C Integer D Longint Câu Cho B = NOT((x-3)) B nhận giá trị x=7? A B -3 C TRUE D FALSE Câu Tên viết ngơn ngữ lập trình Pascal? A _45 B dien tich C 20/11 D 60baitap Câu Chọn phát biểu sai nói vịng lặp FOR :=csd TO csc DO ; A Được sử dụng để lặp với số lần biết trước B Câu lệnh sau DO thực Biến đếm > csc C Biến đếm tự động tăng đơn vị sau lần lặp D Có thể thay đổi giá trị Biến đếm Câu lệnh sau DO Câu Hình vng có độ dài cạnh a có giá trị nằm khoảng số nguyên từ 100 đến 200 Biến S dùng để lưu giá trị diện tích hình vng kiểu liệu S là: A Longint B Byte C Word D Integer Câu Cho biểu thức A = (x DIV 2) MOD x để A = 3? A 37 B 29 C 33 D 25 Câu Khai báo sau cú pháp? A Type 1mang = array [1 100] of byte; B Type mang1c = array [1 100] of byte; C Type mang1c = array (1 100) of byte; D Type mang1c = array [1-100] of byte; Câu 10 Để xuất mảng A vừa nhập vào từ bàn phím ta thực lệnh sau đây? A Readln(A[i]); B Read(A[i]); C Write('A[i]:4'); D Write(A[i]:4); Câu 11 Cho câu lệnh IF: IF a>b then x:=a+b ELSE x:=a-b; Hỏi x a=3, b=6? A B -3 C D Câu 12 Có loại tên ngơn ngữ lập trình Pascal? A B C D II Bài tập (7đ) Viết câu lệnh rẻ nhánh tính (2đ) a) Nếu a>b a = a-b ngược lại b = b-a ���� + ���� �ế� ‒ � ≤ � ≤ � b) Z= � � �ế� � > � ��ặ� � csc C Được sử dụng để lặp với số lần biết trước D Biến đếm tự động tăng đơn vị sau lần lặp Câu Có loại tên ngơn ngữ lập trình Pascal? A B C D Câu Cho câu đoạn lệnh sau: For i= to N if A[i]>max then Begin Max=A[i];smax=i;end; Đoạn lệnh sai đâu? A Khơng có sai B Lệnh If C Vòng lặp For D lệnh gán = Câu Hình vng có độ dài cạnh a có giá trị nằm khoảng số nguyên từ 100 đến 200 Biến S dùng để lưu giá trị diện tích hình vng kiểu liệu S là: A Word B Integer C Longint D Byte Câu Cho biểu thức A = (x DIV 2) MOD x để A = 3? A 25 B 37 C 29 D 33 Câu Khai báo sau cú pháp? A Type 1mang = array [1 100] of byte; B Type mang1c = array (1 100) of byte; C Type mang1c = array [1 100] of byte; D Type mang1c = array [1-100] of byte; Câu Cho câu lệnh IF: IF a>b then x:=a+b ELSE x:=a-b; Hỏi x a=3, b=6? A B -3 C D Câu Một biến x nhận giá trị nguyên khoảng từ -200000 đến 200000 Kiểu liệu thích hợp x là: A Byte B Word C Integer D Longint Câu 10 Tên viết ngơn ngữ lập trình Pascal? A _45 B 20/11 C dien tich D 60baitap Câu 11 Có lỗi đoạn chương trình sau: S=0; IF S>0 THEN write(S, la so duong); ELSE write(S, la so am); A B C D Câu 12 Cho B = NOT((x-3)) B nhận giá trị x=7? A FALSE B C TRUE D -3 II Bài tập (7đ) Viết câu lệnh rẻ nhánh tính (2đ) a) Nếu a>b a = a-b ngược lại b = b-a ���� + ���� �ế� ‒ � ≤ � ≤ � b) Z= � � �ế� � > � ��ặ� �