bất cứ ngôn ngữ lập trình nào mà có thể diễn đạt thuật toán để giao cho máy tính thực hiện.?. diễn đạt thuật toán để có thể giao cho máy tính thực hiệnA[r]
(1)SỞ GIÁO DỤC VÀ ĐÀO TẠO ĐỀ KIỂM TRA HKI- NĂM HỌC 2020-2021
THÀNH PHỐ HỒ CHÍ MINH MƠN: TIN HỌC- KHỐI 11
TRƯỜNG THPT TÂN TÚC Thời gian làm :45 phút
Mã đề thi 111 Họ tên học sinh: SBD: Câu 1: Cho a:=3; b:=2 Câu lệnh IF a > b Then x:=a - b Else y:=b – a;
Sau thực đoạn chương trình đáp án đúng?
A x= B x= -1 C y= -1 D y=
Câu 2: Kết đoạn chương trình sau bao nhiêu? a := 9; b := 7; c:=8;
if a > b then c:=7 else c := 5; Write(c);
A B C D
Câu 3: Hãy cho biết giá trị M sau thực đoạn chương trình sau với a=9 b=9? M := a;
If a < b then M := b; Writeln(M);
A M nhận hai giá trị trên; B M = 9;
C M không nhận giá trị nào; D M = 20;
Câu 4: Trong NNLT Pascal, muốn kiểm tra đồng thời ba giá trị A, B, C có lớn hay không ta viết câu lệnh If cho đúng?
A If (A>0) and (B>0) and (C>0) then B If (A>0) or (B>0) or (C>0) then C If A>0 and B>0 or C>0 then D If A, B, C >0 then
Câu 5: Khai báo biến a, b thuộc kiểu logic
A Var a, b: Word; B Var a, b: integer; C Var a, b: Boolean; D Var a, b: Real; Câu 6: Trong NNLT, đoạn chương trình sau đưa kết gì?
For i:=10 downto write(i,' ');
A 10 B 10
C Đưa 10 dấu cách D Không đưa kết
Câu 7: Xét biểu thức (m mod <>0) And (m div >=5) Với giá trị m để biểu thức cho giá trị True?
A B 500 C 455 D
Câu 8: Chương trình dịch khơng có khả khả sau ? A Phát lỗi ngữ nghĩa B Tạo chương trình đích C Thông báo lỗi cú pháp D Phát lỗi cú pháp Câu 9: Cấu trúc IF – THEN, sau IF <điều kiện> Điều kiện
A biểu thức quan hệ; B câu lệnh; C biểu thức số học D biểu thức lôgic; Câu 10: Xác định giá trị biểu thức: S = (350 div 100) + (150 mod 100) div 10
A S = 9; B S = 5; C S = 7; D S =
Câu 11: Cho biết kết đoạn chương trình sau? N:=5; Tong:=0;
For i:=1 to n
If (i mod 3=0) then Tong:=Tong+1; Write(Tong);
A B C 10 D
Câu 12: Khi chạy chương trình với lệnh Write(3:2); kết nào?
A B 3.00 C 3.5+01 D 3.75E+01
Câu 13: Hãy cho biết biểu diễn biểu diễn Pascal?
A 4.07E-15 B ‘3.1416’ C 120 D ‘thpt
(2)A B C D Câu 15: Kiểu liệu sau cấp phát nhớ lưu trữ byte?
A Real B longint C integer D Boolean
Câu 16: Cho S, i N>0 biến nguyên Để tính S=N! chọn câu lệnh đây? A S:=1; For i:=1 To N Do S:=S+i; B S:=1; For i:=1 To N Do S:=S*N; C S:=0; For i:=1 To N Do S:=S*i; D S:=1; For i:=1 To N Do S:=S*i; Câu 17: Đoạn chương trình sau cho kết gì?
For i:=M to N If (i mod = 0) or (i mod = 0) then T:=T+i; A Tính tổng số chia hết cho cho phạm vi B Tính tổng số chia hết cho phạm vi M N
C Tính tổng số chia hết cho cho phạm vi M N D Tính tổng số chia hết cho phạm vi M N
Câu 18: Trong Pascal, khai báo sau sai?
A CONST Lop= ‘Lop 11’; B CONST Max=1000;
C CONST Truong= “Nguyen Trai”; D CONST pi=3.1416; Câu 19: Các lệnh sau đây, lệnh lệnh đúng?
A For i:=10 To Do B For i:=1 To 10 Do
C For i:=1 DownTo 10 Do D For i:='z' To 'a' Do
Câu 20: Trong Turbo Pascal, cửa số chương trình nguồn,muốn xem lại hình output, ta nhấn tổ hợp phím nào?
A Atl+F5 B Alt+F7 C Atl+F6 D Alt+F8
Câu 21: Cho a:=5; b:=3 Câu lệnh IF a>b Then a:=4 Else b:=1 Sau thực đoạn chương trình đáp án đúng?
A b=1 B a=3; C b=5; D a=4;
Câu 22: Trong Turbo Pascal, để lưu chương trình ta dùng phím?
A Ctrl+F2 B Alt+F2 C F2 D Shift+F2
Câu 23: Trong Pascal, biểu thức (66 div 13) bằng:
A B C D
Câu 24: Đối với ngôn ngữ lập trình có kỹ thuật dịch?
A loại B loại C loại D loại
Câu 25: Hãy chọn phương án ghép Ngôn ngữ máy
A ngơn ngữ mà chương trình viết chúng sau dịch hệ nhị phân máy chạy
B ngơn ngữ lập trình mà diễn đạt thuật tốn để giao cho máy tính thực C diễn đạt thuật tốn để giao cho máy tính thực
D ngơn ngữ để viết chương trình mà chương trình dãy lệnh máy hệ nhị phân Câu 26: Phần mềm sau ngôn ngữ lập trình ?
A MS Excel B C/C++ C MS Word D MS Powerpoint
Câu 27: Cho S i biến nguyên
S:=1;
For i:=3 To 10 Do S:=S+i; Writeln(S);
Khi chạy đoạn chương trình trên, kết hình bao nhiêu?
A 54 B 55 C 53 D 52
Câu 28: (1) Chương trình dịch, (2) chương trình nguồn , (3) chương trình đích Quy trình để dịch chương trình ngơn ngữ máy là:
A (1), (3),(2) B (2), (1),(3) C (2), (3),(1) D (1), (2),(3) Câu 29: Trong vòng lặp For (Biến:=Giá trị đầu) To (Giá trị cuối) Do
Biến, Giá trị đầu, Giá trị cuối phải có kiểu liệu nào?
(3)Câu 30: Cho S i biến nguyên Khi chạy chương trình
S:=0;
For i:=1 To 10 Do S:=S+i; Writeln(S);
Kết in lên hình
A 11 B 55 C 100 D 101
Câu 31: Hãy cho biết biểu diễn biểu diễn Pascal?
A 120 B 4.07E-15 C ‘3.1416’ D ‘thpt
Câu 32: Cho S=12 + 22 + +1002 Chọn nhóm lệnh tính sai giá trị S? A S:=0; For i:=1 To 100 Do S:=S+Sqr(i);
B S:=0; For i:=1 To 100 Do S:=S+i*i; C S:=1; For i:=1 To 100 Do S:=S+i*i; D S:=0; For i:=100 DownTo Do S:=S+i*i; Câu 33: Trong phát biều sau phát biểu sai ?
A phần thân chương trình bắt buộc phải có B phần thân chương trình có khơng C phải có phần phần thân chương trình D phần khai báo có khơng
Câu 34: Chạy đoạn chương trình sau:
Program GiaiThua; Var i,s: Integer; Begin
S:=0; For i:=1 To Do S:=S*i; Writeln(S);
End
Kết in bao nhiêu?
A B C 60 D 120
Câu 35: Trong NNLT Pascal biểu diễn sai?
A (a-b)>(c-d); (1/x-y)>=2*x; b*b>a*c; B (a-b)>(c-d); (a-b)<>(b-a); 12*a>5a; C Sqrt(a-b)>x; (1/x-y)>=2*x; 15*a>5; D b*b>a*c; a*(1-a)+(a-b)>=0; 1/x-x<0; Câu 36: Tên không ngôn ngữ Pascal
A _123abc B abc 123 C abc_123 D abc123
Câu 37: Đoạn chương trình sau cho kết gì?
For i:=1 to 999 If (i mod <>0) and (i mod = 0) then writeln(i); A Tính tổng số lẻ chia hết cho phạm vi từ đến 999
B Tính tổng số chẳn chia hết cho phạm vi từ đến 999 C Liệt kê số lẻ chia hết cho phạm vi từ đến 999 D Liệt kê số chẳn chia hết cho phạm vi từ đến 999
Câu 38: Cho đoạn chương trình sau: x := 10; y := 20; writeln('x + y'); kết hình gì?
A x+y B 10 C 20 D 30
Câu 39: Kiểu liệu sau có miền giá trị lớn nhất?
A Integer B Byte C Word D Longint
Câu 40: Để biểu diễn x3 , ta viết?
A SQRT(x*x)*x B SQR(x*x*x) C SQR(SQRT(X)*X) D SQRT(x*x*x) -
(4)SỞ GIÁO DỤC VÀ ĐÀO TẠO ĐỀ KIỂM TRA HKI- NĂM HỌC 2020-2021
THÀNH PHỐ HỒ CHÍ MINH MƠN: TIN HỌC- KHỐI 11
TRƯỜNG THPT TÂN TÚC Thời gian làm :45 phút
Mã đề thi 333 Họ tên học sinh: SBD: Câu 1: Hãy chọn phương án ghép Ngôn ngữ máy
A ngơn ngữ mà chương trình viết chúng sau dịch hệ nhị phân máy chạy
B ngơn ngữ để viết chương trình mà chương trình dãy lệnh máy hệ nhị phân C ngơn ngữ lập trình mà diễn đạt thuật tốn để giao cho máy tính thực D diễn đạt thuật tốn để giao cho máy tính thực
Câu 2: Kiểu liệu sau cấp phát nhớ lưu trữ byte?
A integer B Real C Boolean D longint
Câu 3: Hãy cho biết giá trị M sau thực đoạn chương trình sau với a=9 b=9? M := a;
If a < b then M := b; Writeln(M);
A M không nhận giá trị nào; B M = 9;
C M nhận hai giá trị trên; D M = 20; Câu 4: Trong Pascal, khai báo sau sai?
A CONST Truong= “Nguyen Trai”; B CONST Lop= ‘Lop 11’;
C CONST pi=3.1416; D CONST Max=1000;
Câu 5: Trong Turbo Pascal, cửa số chương trình nguồn,muốn xem lại hình output, ta nhấn tổ hợp phím nào?
A Atl+F5 B Alt+F8 C Atl+F6 D Alt+F7
Câu 6: Xét biểu thức (m mod <>0) And (m div >=5) Với giá trị m để biểu thức cho giá trị True?
A B 500 C 455 D
Câu 7: Kết đoạn chương trình sau bao nhiêu? a := 9; b := 7; c:=8;
if a > b then c:=7 else c := 5; Write(c);
A B C D
Câu 8: Cấu trúc IF – THEN, sau IF <điều kiện> Điều kiện
A biểu thức quan hệ; B câu lệnh; C biểu thức số học D biểu thức lơgic; Câu 9: Chạy đoạn chương trình sau:
Program GiaiThua; Var i,s: Integer; Begin
S:=0; For i:=1 To Do S:=S*i; Writeln(S);
End
Kết in bao nhiêu?
A B 120 C D 60
Câu 10: Trong NNLT Pascal biểu diễn sai?
A (a-b)>(c-d); (a-b)<>(b-a); 12*a>5a; B b*b>a*c; a*(1-a)+(a-b)>=0; 1/x-x<0; C Sqrt(a-b)>x; (1/x-y)>=2*x; 15*a>5; D (a-b)>(c-d); (1/x-y)>=2*x; b*b>a*c; Câu 11: Cho S i biến nguyên Khi chạy chương trình
(5)For i:=1 To 10 Do S:=S+i; Writeln(S);
Kết in lên hình
A 11 B 55 C 100 D 101
Câu 12: Hãy cho biết biểu diễn biểu diễn Pascal?
A 4.07E-15 B ‘3.1416’ C 120 D ‘thpt
Câu 13: Kết biểu thức sqr((ABS(25-30) mod 3) ) là?
A B C D
Câu 14: Trong NNLT, đoạn chương trình sau đưa kết gì? For i:=10 downto write(i,' ');
A 10 B 10
C Đưa 10 dấu cách D Không đưa kết
Câu 15: Đoạn chương trình sau cho kết gì?
For i:=M to N If (i mod = 0) or (i mod = 0) then T:=T+i; A Tính tổng số chia hết cho phạm vi M N
B Tính tổng số chia hết cho cho phạm vi M N C Tính tổng số chia hết cho phạm vi M N
D Tính tổng số chia hết cho cho phạm vi Câu 16: Cho S i biến nguyên
S:=1;
For i:=3 To 10 Do S:=S+i; Writeln(S);
Khi chạy đoạn chương trình trên, kết hình bao nhiêu?
A 55 B 54 C 53 D 52
Câu 17: (1) Chương trình dịch, (2) chương trình nguồn , (3) chương trình đích Quy trình để dịch chương trình ngơn ngữ máy là:
A (1), (3),(2) B (2), (3),(1) C (2), (1),(3) D (1), (2),(3) Câu 18: Các lệnh sau đây, lệnh lệnh đúng?
A For i:=10 To Do B For i:=1 To 10 Do
C For i:=1 DownTo 10 Do D For i:='z' To 'a' Do Câu 19: Khai báo biến a, b thuộc kiểu logic
A Var a, b: Word; B Var a, b: Boolean; C Var a, b: integer; D Var a, b: Real; Câu 20: Cho đoạn chương trình sau: x := 10; y := 20; writeln('x + y'); kết hình gì?
A x+y B 10 C 20 D 30
Câu 21: Trong Pascal, biểu thức (66 div 13) bằng:
A B C D
Câu 22: Khi chạy chương trình với lệnh Write(3:2); kết nào?
A 3.5+01 B 3.75E+01 C D 3.00
Câu 23: Xác định giá trị biểu thức: S = (350 div 100) + (150 mod 100) div 10
A S = B S = 7; C S = 9; D S = 5;
Câu 24: Cho a:=3; b:=2 Câu lệnh IF a > b Then x:=a - b Else y:=b – a; Sau thực đoạn chương trình đáp án đúng?
A y= -1 B x= -1 C x= D y=
Câu 25: Đối với ngơn ngữ lập trình có kỹ thuật dịch?
A loại B loại C loại D loại
Câu 26: Trong Turbo Pascal, để lưu chương trình ta dùng phím?
A Alt+F2 B Ctrl+F2 C Shift+F2 D F2
(6)A If (A>0) and (B>0) and (C>0) then B If (A>0) or (B>0) or (C>0) then C If A, B, C >0 then D If A>0 and B>0 or C>0 then Câu 28: Trong vòng lặp For (Biến:=Giá trị đầu) To (Giá trị cuối) Do
Biến, Giá trị đầu, Giá trị cuối phải có kiểu liệu nào?
A Kiểu số nguyên B Kiểu Real C Kiểu Single D Kiểu Extended Câu 29: Cho biết kết đoạn chương trình sau?
N:=5; Tong:=0; For i:=1 to n
If (i mod 3=0) then Tong:=Tong+1; Write(Tong);
A B C 10 D
Câu 30: Hãy cho biết biểu diễn biểu diễn Pascal?
A 120 B 4.07E-15 C ‘3.1416’ D ‘thpt
Câu 31: Cho S=12 + 22 + +1002 Chọn nhóm lệnh tính sai giá trị S? A S:=0; For i:=1 To 100 Do S:=S+Sqr(i);
B S:=1; For i:=1 To 100 Do S:=S+i*i; C S:=0; For i:=100 DownTo Do S:=S+i*i; D S:=0; For i:=1 To 100 Do S:=S+i*i; Câu 32: Trong phát biều sau phát biểu sai ?
A phần thân chương trình bắt buộc phải có B phần thân chương trình có khơng C phải có phần phần thân chương trình D phần khai báo có khơng
Câu 33: Cho a:=5; b:=3 Câu lệnh IF a>b Then a:=4 Else b:=1 Sau thực đoạn chương trình đáp án đúng?
A a=3; B b=1 C b=5; D a=4;
Câu 34: Phần mềm sau ngơn ngữ lập trình ?
A C/C++ B MS Powerpoint C MS Excel D MS Word
Câu 35: Tên không ngôn ngữ Pascal
A _123abc B abc 123 C abc_123 D abc123
Câu 36: Đoạn chương trình sau cho kết gì?
For i:=1 to 999 If (i mod <>0) and (i mod = 0) then writeln(i); A Tính tổng số lẻ chia hết cho phạm vi từ đến 999
B Tính tổng số chẳn chia hết cho phạm vi từ đến 999 C Liệt kê số lẻ chia hết cho phạm vi từ đến 999 D Liệt kê số chẳn chia hết cho phạm vi từ đến 999 Câu 37: Chương trình dịch khơng có khả khả sau ?
A Phát lỗi cú pháp B Phát lỗi ngữ nghĩa C Tạo chương trình đích D Thơng báo lỗi cú pháp Câu 38: Để biểu diễn x3 , ta viết?
A SQRT(x*x)*x B SQR(SQRT(X)*X) C SQR(x*x*x) D SQRT(x*x*x) Câu 39: Cho S, i N>0 biến nguyên Để tính S=N! chọn câu lệnh đây?
A S:=1; For i:=1 To N Do S:=S+i; B S:=0; For i:=1 To N Do S:=S*i; C S:=1; For i:=1 To N Do S:=S*i; D S:=1; For i:=1 To N Do S:=S*N; Câu 40: Kiểu liệu sau có miền giá trị lớn nhất?
A Byte B Word C Integer D Longint
-
(7)SỞ GIÁO DỤC VÀ ĐÀO TẠO ĐỀ KIỂM TRA HKI- NĂM HỌC 2020-2021
THÀNH PHỐ HỒ CHÍ MINH MÔN: TIN HỌC- KHỐI 11
TRƯỜNG THPT TÂN TÚC Thời gian làm :45 phút
Mã đề thi 555 Họ tên học sinh: SBD: Câu 1: Cho a:=3; b:=2 Câu lệnh IF a > b Then x:=a - b Else y:=b – a;
Sau thực đoạn chương trình đáp án đúng?
A y= B x= -1 C x= D y= -1
Câu 2: Đối với ngơn ngữ lập trình có kỹ thuật dịch?
A loại B loại C loại D loại
Câu 3: Đoạn chương trình sau cho kết gì?
For i:=1 to 999 If (i mod <>0) and (i mod = 0) then writeln(i); A Tính tổng số lẻ chia hết cho phạm vi từ đến 999
B Tính tổng số chẳn chia hết cho phạm vi từ đến 999 C Liệt kê số lẻ chia hết cho phạm vi từ đến 999 D Liệt kê số chẳn chia hết cho phạm vi từ đến 999 Câu 4: Chạy đoạn chương trình sau:
Program GiaiThua; Var i,s: Integer; Begin
S:=0; For i:=1 To Do S:=S*i; Writeln(S);
End
Kết in bao nhiêu?
A B C 120 D 60
Câu 5: Khi chạy chương trình với lệnh Write(3:2); kết nào?
A 3.5+01 B 3.75E+01 C D 3.00
Câu 6: Trong NNLT Pascal biểu diễn sai?
A (a-b)>(c-d); (a-b)<>(b-a); 12*a>5a; B b*b>a*c; a*(1-a)+(a-b)>=0; 1/x-x<0; C Sqrt(a-b)>x; (1/x-y)>=2*x; 15*a>5; D (a-b)>(c-d); (1/x-y)>=2*x; b*b>a*c; Câu 7: Cấu trúc IF – THEN, sau IF <điều kiện> Điều kiện
A biểu thức lôgic; B câu lệnh; C biểu thức quan hệ; D biểu thức số học Câu 8: Kết biểu thức sqr((ABS(25-30) mod 3) ) là?
A B C D
Câu 9: Trong phát biều sau phát biểu sai ? A phần thân chương trình có khơng B phải có phần phần thân chương trình C phần khai báo có khơng
D phần thân chương trình bắt buộc phải có
Câu 10: Hãy cho biết biểu diễn biểu diễn Pascal?
A ‘3.1416’ B 4.07E-15 C 120 D ‘thpt
Câu 11: Xác định giá trị biểu thức: S = (350 div 100) + (150 mod 100) div 10
A S = 9; B S = 7; C S = D S = 5;
Câu 12: Đoạn chương trình sau cho kết gì?
For i:=M to N If (i mod = 0) or (i mod = 0) then T:=T+i; A Tính tổng số chia hết cho phạm vi M N
(8)D Tính tổng số chia hết cho cho phạm vi Câu 13: Trong NNLT, đoạn chương trình sau đưa kết gì?
For i:=10 downto write(i,' ');
A 10 B Đưa 10 dấu cách
C 10 D Không đưa kết
Câu 14: Kiểu liệu sau có miền giá trị lớn nhất?
A Word B Integer C Byte D Longint
Câu 15: Kết đoạn chương trình sau bao nhiêu? a := 9; b := 7; c:=8;
if a > b then c:=7 else c := 5; Write(c);
A B C D
Câu 16: Cho S, i N>0 biến nguyên Để tính S=N! chọn câu lệnh đây? A S:=1; For i:=1 To N Do S:=S+i; B S:=0; For i:=1 To N Do S:=S*i; C S:=1; For i:=1 To N Do S:=S*i; D S:=1; For i:=1 To N Do S:=S*N;
Câu 17: Cho đoạn chương trình sau: x := 10; y := 20; writeln('x + y'); kết hình gì?
A 10 B 20 C x+y D 30
Câu 18: Khai báo biến a, b thuộc kiểu logic
A Var a, b: Real; B Var a, b: Boolean; C Var a, b: integer; D Var a, b: Word; Câu 19: Trong Pascal, biểu thức (66 div 13) bằng:
A B C D
Câu 20: Trong Turbo Pascal, để lưu chương trình ta dùng phím?
A Alt+F2 B Ctrl+F2 C Shift+F2 D F2
Câu 21: Trong Turbo Pascal, cửa số chương trình nguồn,muốn xem lại hình output, ta nhấn tổ hợp phím nào?
A Atl+F5 B Alt+F8 C Atl+F6 D Alt+F7
Câu 22: Phần mềm sau ngơn ngữ lập trình ?
A C/C++ B MS Word C MS Excel D MS Powerpoint
Câu 23: Xét biểu thức (m mod <>0) And (m div >=5) Với giá trị m để biểu thức cho giá trị True?
A 500 B C D 455
Câu 24: Hãy chọn phương án ghép Ngôn ngữ máy
A ngơn ngữ để viết chương trình mà chương trình dãy lệnh máy hệ nhị phân B ngơn ngữ mà chương trình viết chúng sau dịch hệ nhị phân máy chạy
C ngơn ngữ lập trình mà diễn đạt thuật tốn để giao cho máy tính thực D diễn đạt thuật tốn để giao cho máy tính thực
Câu 25: Cho biết kết đoạn chương trình sau? N:=5; Tong:=0;
For i:=1 to n
If (i mod 3=0) then Tong:=Tong+1; Write(Tong);
A B 10 C D
Câu 26: Kiểu liệu sau cấp phát nhớ lưu trữ byte?
A Boolean B longint C integer D Real
Câu 27: Trong vòng lặp For (Biến:=Giá trị đầu) To (Giá trị cuối) Do Biến, Giá trị đầu, Giá trị cuối phải có kiểu liệu nào?
A Kiểu số nguyên B Kiểu Real C Kiểu Single D Kiểu Extended Câu 28: Trong Pascal, khai báo sau sai?
A CONST pi=3.1416; B CONST Truong= “Nguyen Trai”;
(9)Câu 29: Hãy cho biết biểu diễn biểu diễn Pascal?
A 120 B 4.07E-15 C ‘3.1416’ D ‘thpt
Câu 30: Cho S=12 + 22 + +1002 Chọn nhóm lệnh tính sai giá trị S? A S:=0; For i:=1 To 100 Do S:=S+Sqr(i);
B S:=1; For i:=1 To 100 Do S:=S+i*i; C S:=0; For i:=100 DownTo Do S:=S+i*i; D S:=0; For i:=1 To 100 Do S:=S+i*i;
Câu 31: (1) Chương trình dịch, (2) chương trình nguồn , (3) chương trình đích Quy trình để dịch chương trình ngôn ngữ máy là:
A (1), (3),(2) B (2), (3),(1) C (1), (2),(3) D (2), (1),(3) Câu 32: Cho S i biến nguyên
S:=1;
For i:=3 To 10 Do S:=S+i; Writeln(S);
Khi chạy đoạn chương trình trên, kết hình bao nhiêu?
A 54 B 55 C 53 D 52
Câu 33: Các lệnh sau đây, lệnh lệnh đúng?
A For i:=1 DownTo 10 Do B For i:=1 To 10 Do
C For i:='z' To 'a' Do D For i:=10 To Do
Câu 34: Tên không ngôn ngữ Pascal
A _123abc B abc 123 C abc_123 D abc123
Câu 35: Hãy cho biết giá trị M sau thực đoạn chương trình sau với a=9 b=9? M := a;
If a < b then M := b; Writeln(M);
A M = 9; B M không nhận giá trị nào;
C M nhận hai giá trị trên; D M = 20; Câu 36: Cho a:=5; b:=3 Câu lệnh IF a>b Then a:=4 Else b:=1
Sau thực đoạn chương trình đáp án đúng?
A a=3; B b=5; C b=1 D a=4;
Câu 37: Để biểu diễn x3 , ta viết?
A SQRT(x*x)*x B SQR(SQRT(X)*X) C SQR(x*x*x) D SQRT(x*x*x) Câu 38: Cho S i biến nguyên Khi chạy chương trình
S:=0;
For i:=1 To 10 Do S:=S+i; Writeln(S);
Kết in lên hình
A 100 B 11 C 55 D 101
Câu 39: Chương trình dịch khơng có khả khả sau ? A Phát lỗi cú pháp B Phát lỗi ngữ nghĩa C Tạo chương trình đích D Thơng báo lỗi cú pháp
Câu 40: Trong NNLT Pascal, muốn kiểm tra đồng thời ba giá trị A, B, C có lớn hay khơng ta viết câu lệnh If cho đúng?
A If (A>0) and (B>0) and (C>0) then B If (A>0) or (B>0) or (C>0) then C If A, B, C >0 then D If A>0 and B>0 or C>0 then -
(10)SỞ GIÁO DỤC VÀ ĐÀO TẠO ĐỀ KIỂM TRA HKI- NĂM HỌC 2020-2021
THÀNH PHỐ HỒ CHÍ MINH MƠN: TIN HỌC- KHỐI 11
TRƯỜNG THPT TÂN TÚC Thời gian làm :45 phút
Mã đề thi 777 Họ tên học sinh: SBD: Câu 1: Xác định giá trị biểu thức: S = (350 div 100) + (150 mod 100) div 10
A S = 5; B S = C S = 9; D S = 7;
Câu 2: Trong vòng lặp For (Biến:=Giá trị đầu) To (Giá trị cuối) Do Biến, Giá trị đầu, Giá trị cuối phải có kiểu liệu nào?
A Kiểu số nguyên B Kiểu Real C Kiểu Single D Kiểu Extended Câu 3: Khi chạy chương trình với lệnh Write(3:2); kết nào?
A 3.5+01 B 3.75E+01 C D 3.00
Câu 4: Phần mềm sau ngơn ngữ lập trình ?
A MS Excel B C/C++ C MS Powerpoint D MS Word
Câu 5: Hãy cho biết giá trị M sau thực đoạn chương trình sau với a=9 b=9? M := a;
If a < b then M := b; Writeln(M);
A M nhận hai giá trị trên; B M không nhận giá trị nào;
C M = 20; D M = 9;
Câu 6: Hãy cho biết biểu diễn biểu diễn Pascal?
A ‘thpt B ‘3.1416’ C 120 D 4.07E-15
Câu 7: Khai báo biến a, b thuộc kiểu logic
A Var a, b: Word; B Var a, b: Boolean; C Var a, b: Real; D Var a, b: integer; Câu 8: Trong Pascal, biểu thức (66 div 13) bằng:
A B C D
Câu 9: Cho S=12 + 22 + +1002 Chọn nhóm lệnh tính sai giá trị S? A S:=0; For i:=1 To 100 Do S:=S+Sqr(i);
B S:=1; For i:=1 To 100 Do S:=S+i*i; C S:=0; For i:=100 DownTo Do S:=S+i*i; D S:=0; For i:=1 To 100 Do S:=S+i*i;
Câu 10: Trong NNLT Pascal biểu diễn sai?
A b*b>a*c; a*(1-a)+(a-b)>=0; 1/x-x<0; B (a-b)>(c-d); (a-b)<>(b-a); 12*a>5a; C (a-b)>(c-d); (1/x-y)>=2*x; b*b>a*c; D Sqrt(a-b)>x; (1/x-y)>=2*x; 15*a>5; Câu 11: Đoạn chương trình sau cho kết gì?
For i:=M to N If (i mod = 0) or (i mod = 0) then T:=T+i; A Tính tổng số chia hết cho phạm vi M N
B Tính tổng số chia hết cho cho phạm vi M N C Tính tổng số chia hết cho phạm vi M N
D Tính tổng số chia hết cho cho phạm vi Câu 12: Cho a:=3; b:=2 Câu lệnh IF a > b Then x:=a - b Else y:=b – a;
Sau thực đoạn chương trình đáp án đúng?
A x= -1 B y= -1 C y= D x=
Câu 13: Kết biểu thức sqr((ABS(25-30) mod 3) ) là?
A B C D
Câu 14: (1) Chương trình dịch, (2) chương trình nguồn , (3) chương trình đích Quy trình để dịch chương trình ngôn ngữ máy là:
(11)A S:=1; For i:=1 To N Do S:=S+i; B S:=0; For i:=1 To N Do S:=S*i; C S:=1; For i:=1 To N Do S:=S*i; D S:=1; For i:=1 To N Do S:=S*N;
Câu 16: Cho đoạn chương trình sau: x := 10; y := 20; writeln('x + y'); kết hình gì?
A 10 B 20 C x+y D 30
Câu 17: Các lệnh sau đây, lệnh lệnh đúng?
A For i:=10 To Do B For i:=1 DownTo 10 Do
C For i:='z' To 'a' Do D For i:=1 To 10 Do
Câu 18: Trong Pascal, khai báo sau sai?
A CONST Lop= ‘Lop 11’; B CONST pi=3.1416;
C CONST Truong= “Nguyen Trai”; D CONST Max=1000; Câu 19: Trong Turbo Pascal, để lưu chương trình ta dùng phím?
A Alt+F2 B Ctrl+F2 C Shift+F2 D F2
Câu 20: Cho biết kết đoạn chương trình sau? N:=5; Tong:=0;
For i:=1 to n
If (i mod 3=0) then Tong:=Tong+1; Write(Tong);
A B C D 10
Câu 21: Kết đoạn chương trình sau bao nhiêu? a := 9; b := 7; c:=8;
if a > b then c:=7 else c := 5; Write(c);
A B C D
Câu 22: Xét biểu thức (m mod <>0) And (m div >=5) Với giá trị m để biểu thức cho giá trị True?
A 500 B C D 455
Câu 23: Để biểu diễn x3 , ta viết?
A SQRT(x*x)*x B SQR(SQRT(X)*X) C SQR(x*x*x) D SQRT(x*x*x) Câu 24: Cho S i biến nguyên
S:=1;
For i:=3 To 10 Do S:=S+i; Writeln(S);
Khi chạy đoạn chương trình trên, kết hình bao nhiêu?
A 55 B 54 C 52 D 53
Câu 25: Chương trình dịch khơng có khả khả sau ? A Thông báo lỗi cú pháp B Phát lỗi cú pháp C Phát lỗi ngữ nghĩa D Tạo chương trình đích Câu 26: Đối với ngơn ngữ lập trình có kỹ thuật dịch?
A loại B loại C loại D loại
Câu 27: Trong NNLT Pascal, muốn kiểm tra đồng thời ba giá trị A, B, C có lớn hay không ta viết câu lệnh If cho đúng?
A If (A>0) and (B>0) and (C>0) then B If (A>0) or (B>0) or (C>0) then C If A, B, C >0 then D If A>0 and B>0 or C>0 then Câu 28: Đoạn chương trình sau cho kết gì?
For i:=1 to 999 If (i mod <>0) and (i mod = 0) then writeln(i); A Liệt kê số chẳn chia hết cho phạm vi từ đến 999
B Tính tổng số chẳn chia hết cho phạm vi từ đến 999 C Tính tổng số lẻ chia hết cho phạm vi từ đến 999 D Liệt kê số lẻ chia hết cho phạm vi từ đến 999 Câu 29: Hãy chọn phương án ghép Ngôn ngữ máy
(12)B diễn đạt thuật tốn để giao cho máy tính thực
C ngơn ngữ mà chương trình viết chúng sau dịch hệ nhị phân máy chạy
D ngơn ngữ để viết chương trình mà chương trình dãy lệnh máy hệ nhị phân Câu 30: Kiểu liệu sau cấp phát nhớ lưu trữ byte?
A longint B integer C Boolean D Real
Câu 31: Trong phát biều sau phát biểu sai ? A phần khai báo có khơng
B phần thân chương trình bắt buộc phải có C phần thân chương trình có khơng D phải có phần phần thân chương trình
Câu 32: Cấu trúc IF – THEN, sau IF <điều kiện> Điều kiện
A biểu thức quan hệ; B biểu thức lôgic; C biểu thức số học D câu lệnh; Câu 33: Tên không ngôn ngữ Pascal
A _123abc B abc 123 C abc_123 D abc123
Câu 34: Trong NNLT, đoạn chương trình sau đưa kết gì? For i:=10 downto write(i,' ');
A 10 B Khơng đưa kết
C 10 D Đưa 10 dấu cách
Câu 35: Cho a:=5; b:=3 Câu lệnh IF a>b Then a:=4 Else b:=1 Sau thực đoạn chương trình đáp án đúng?
A a=3; B a=4; C b=1 D b=5;
Câu 36: Hãy cho biết biểu diễn biểu diễn Pascal?
A ‘thpt B ‘3.1416’ C 4.07E-15 D 120
Câu 37: Kiểu liệu sau có miền giá trị lớn nhất?
A Longint B Byte C Integer D Word
Câu 38: Trong Turbo Pascal, cửa số chương trình nguồn,muốn xem lại hình output, ta nhấn tổ hợp phím nào?
A Alt+F7 B Atl+F6 C Atl+F5 D Alt+F8
Câu 39: Cho S i biến nguyên Khi chạy chương trình
S:=0;
For i:=1 To 10 Do S:=S+i; Writeln(S);
Kết in lên hình
A 100 B 11 C 55 D 101
Câu 40: Chạy đoạn chương trình sau:
Program GiaiThua; Var i,s: Integer; Begin
S:=0; For i:=1 To Do S:=S*i; Writeln(S);
End
Kết in bao nhiêu?
A B C 60 D 120
-