Câu 14: Trong các cách viết câu lệnh lặp với số lần định trước như sau, cách nào đúng.. A..[r]
(1)TRƯỜNG THCS LÊ LỢI ĐỀ THI HỌC KÌ LỚP MƠN TIN HỌC NĂM HỌC 2018 - 2019 A Trắc nghiệm khách quan
Câu 1: Khi câu lệnh lặp For…do (dạng tiến) kết thúc?
A Khi biến đếm nhỏ giá trị cuối B Khi biến đếm lớn giá trị cuối C Khi biến đếm giá trị cuối D Khi biến đếm giá trị đầu Câu 2: Khi sử dụng lệnh lặp While…do cần ý `điều gì?
A Điều kiện dần đến sai B Số lần lặp
C Số lượng câu lệnh D Điều kiện dần đến
Câu 3: Kết phép so sánh:
A Có thể có giá trị giá trị sai B Chỉ có giá trị C Đồng thời nhận giá trị giá trị sai D Chỉ có giá trị sai Câu 4: Trong Pascal, câu lệnh lặp với số lần chưa xác định trước có dạng:
A While <điều kiện> <câu lệnh>; B While <điều kiện>; <câu lệnh>; C While <điều kiện> then <câu lệnh>; D While <điều kiện>; then <câu lệnh>; Câu 5: Việc mà câu lệnh lặp While…do cần thực gì?
A Thực <câu lệnh> sau từ khóa do B Kiểm tra giá trị <điều kiện> C Thực <câu lệnh> sau từ khóa then D Kiểm tra <câu lệnh>
Câu 6: Cho đoạn chương trình sau: N:=0;
While N>0 Begin N:=N+1;
Writeln(„Xin chao‟); End;
Khi thực chương trình, câu “Xin chao” viết hình lần?
A 10 B 9
C 0 D Vịng lặp vơ tận
Câu 7: Trước khai báo mảng A:array[1 n] of Real, phải khai báo điều trước?
A Const n=10; B Var n:integer;
C Cả A B D Cả A B sai
Câu 8: (0,25đ) Chỉ cú pháp khai báo biến mảng Turbo Pascal: A Var <tên biến>: array[<số phần tử>] of <kiểu liệu>;
B Var <tên biến>: array[<chỉ số đầu> <chỉ số cuối>]: <kiểu liệu>; C Var <tên biến>: array[<chỉ số đầu>:<chỉ số cuối>]: <kiểu liệu>; D Var <tên biến>: array[<chỉ số đầu> <chỉ số cuối>]of <kiểu liệu>;
(2)C Khoảng 10 lần D (<giá trị cuối> - <giá trị đầu> + 1) lần Câu 10: Các phần tử mảng:
A Phải khác kiểu liệu B Phải có giá trị
C Phải kiểu liệu D Có thể kiểu khác kiểu liệu Câu 11: Chỉ khai báo biến mảng cách khai báo sau:
A Var a:array[1 10] of integer; B Var a:array(1 10] of integer; C Var a:array(1 10) of integer; D Var a:array[1 10] of integer; Câu 12: Cho đoạn chương trình sau:
N:=1;
While N<10 Begin
N:=N+1;
Writeln(„Xin chao‟); End;
Khi thực chương trình, câu “Xin chao” viết hình lần?
A 10 B 0
C 9 D Vịng lặp vơ tận
Câu 13: <câu lệnh> sau từ khóa do trong câu lệnh lặp While…do thực nhất:
A 1 lần B 0 lần C 2 lần D Cịn tùy thuộc vào tốn Câu 14: Cho đoạn chương trình sau:
S:=0;
For i:=1 to S:=S+1;
Sau chạy đoạn chương trình trên, giá trị S là:
A S=100 B S=0 C S=1 D Không xác định
Câu 15: Chỉ câu lệnh lặp với số lần lặp biết trước câu lệnh rút gọn sau đây? A While…do B If – then – else C If – then D For…do Câu 16: Trong cách viết câu lệnh lặp với số lần định trước sau, cách đúng?
A For <biến đếm> := <giá trị đầu> to <giá trị cuối> ;do <câu lệnh> B For <biến đếm> := <giá trị đầu> to <giá trị cuối> <câu lệnh>; C For <biến đếm> := <giá trị đầu> to <giá trị cuối> <câu lệnh> D For <biến đếm> = <giá trị đầu> to <giá trị cuối> <câu lệnh>;
II Hãy điền đáp án vào cột C: Là kết ghép nối cột A với cột B:
A (tên chương trình) B (công dụng thu gọn) C (kết quả)
1.Finger Break Out 2.Sun Times 3.Geogebra 4.Yenka
a, Quan sát hình khơng gian b, Tìm hiểu thời gian c, Luyện gõ phím nhanh d, Học vẽ hình
e, Học lập trình
1+……… 2+……… 3+……… 4+………… B Tự luận
(3)Begin {1}
Write(„Tong cac so chan nho hon 50 la:‟,t ); {2} While i<50 {3}
Begin {4}
If i mod =0 then {5} t:=t + i; {6}
i:=i+1; {7} end; {8} Uses crt; {9} Var i, t:integer; {10} i:=1; t:=0; {11} Clrscr; {12} Readln; {13} End {14}
a, Chương trình bị sai vị trí dịng {2}, {9}, {10}, {11}, {12}, xếp lại vị trí dịng để chương trình
b, Hãy cho biết cơng dụng chương trình
Câu 2: Hãy vẽ hình nút lệnh nêu tên gọi tương ứng cơng cụ tạo mối quan hệ hình học có chương trình Geogebra
Câu 3: Viết chương trình (bằng ngơn ngữ Pascal) thực cơng việc nhập 10 phần tử có giá trị nguyên cho mảng A (mảng chiều) từ bàn phím tính tổng phần tử lẽ có mảng A
Đề tham khảo số 2:
A Trắc nghiệm khách quan
Câu 1: Khi câu lệnh lặp For…do (dạng tiến) kết thúc?
A Khi biến đếm nhỏ giá trị cuối B Khi biến đếm giá trị đầu C Khi biến đếm giá trị cuối D Khi biến đếm lớn giá trị cuối Câu 2: Cho đoạn chương trình sau:
S:=0;
For i:=1 to S:=S+1;
Sau chạy đoạn chương trình trên, giá trị S là:
A S=1 B S=0 C Không xác định D S=100
Câu 3: Việc mà câu lệnh lặp While…do cần thực gì?
A Thực <câu lệnh> sau từ khóa then B Thực <câu lệnh> sau từ khóa do C Kiểm tra giá trị <điều kiện> D Kiểm tra <câu lệnh>
Câu 4: Cho đoạn chương trình sau: N:=0;
(4)End;
Khi thực chương trình, câu “Xin chao” viết hình lần?
A 0 B Vịng lặp vơ tận
C 9 D 10.
Câu 5: Trong câu lệnh lặp với số lần định trước (for…do), <câu lệnh> thực lần? A (<giá trị cuối> - <giá trị đầu>) lần B Tùy thuộc vào toán biết số lần C Khoảng 10 lần D (<giá trị cuối> - <giá trị đầu> + 1) lần Câu 6: Chỉ cú pháp khai báo biến mảng Turbo Pascal:
A Var <tên biến>: array[<số phần tử>] of <kiểu liệu>;
B Var <tên biến>: array[<chỉ số đầu> <chỉ số cuối>]: <kiểu liệu>; C Var <tên biến>: array[<chỉ số đầu>:<chỉ số cuối>]: <kiểu liệu>; D Var <tên biến>: array[<chỉ số đầu> <chỉ số cuối>]of <kiểu liệu>; Câu 7: Kết phép so sánh:
A Chỉ có giá trị B Đồng thời nhận giá trị giá trị sai C Chỉ có giá trị sai D Có thể có giá trị giá trị sai Câu 8: Cho đoạn chương trình sau:
N:=1;
While N<10 Begin
N:=N+1;
Writeln(„Xin chao‟); End;
Khi thực chương trình, câu “Xin chao” viết hình lần?
A 10 B 0.
C 9 D Vòng lặp vô tận
Câu 9: Chỉ câu lệnh lặp với số lần lặp biết trước câu lệnh rút gọn sau đây?
A For…do B If – then C While…do D If – then – else
Câu 10: Trong Pascal, câu lệnh lặp với số lần chưa xác định trước có dạng:
A While <điều kiện> then <câu lệnh>; B While <điều kiện>; then <câu lệnh>; C While <điều kiện> <câu lệnh>; D While <điều kiện>; <câu lệnh>; Câu 11: Trước khai báo mảng A:array[1 n] of Real, phải khai báo điều trước?
A Var n:integer; B Const n=10;
C Cả A B D Cả A B sai
Câu 12: <câu lệnh> sau từ khóa do trong câu lệnh lặp While…do thực nhất:
A 1 lần B 0 lần C 2 lần D Còn tùy thuộc vào toán Câu 13: Khi sử dụng lệnh lặp While…do cần ý điều gì?
A Điều kiện dần đến sai B Số lượng câu lệnh
C Điều kiện dần đến D Số lần lặp
Câu 14: Trong cách viết câu lệnh lặp với số lần định trước sau, cách đúng? A For <biến đếm> := <giá trị đầu> to <giá trị cuối> ;do <câu lệnh>
(5)C For <biến đếm> := <giá trị đầu> to <giá trị cuối> <câu lệnh> D For <biến đếm> = <giá trị đầu> to <giá trị cuối> <câu lệnh>; Câu 15: Chỉ khai báo biến mảng cách khai báo sau:
A Var a:array[1 10] of integer; B Var a:array(1 10] of integer; C Var a:array(1 10) of integer; D Var a:array[1 10] of integer; Câu 16: Các phần tử mảng:
A Phải khác kiểu liệu B Phải có giá trị
C Phải kiểu liệu D Có thể kiểu khác kiểu liệu
II Hãy điền đáp án vào cột C: Là kết ghép nối cột A với cột B:
A (tên chương trình) B (cơng dụng thu gọn) C (kết quả)
1 Geogebra
2 Finger Break Out Yenka
4 Sun Times
a, Quan sát hình khơng gian b, Luyện gõ phím nhanh c, Tìm hiểu thời gian d, Học lập trình e, Học vẽ hình
1+……… 2+……… 3+……… 4+………… B Tự luận
Câu 1: Cho chương trình sau (bằng Turbo Pascal): Begin {1}
Write(„Tong cac so chan nho hon 50 la:‟,t ); {2} While i<50 {3}
Begin {4}
If i mod =0 then {5} t:=t + i; {6}
i:=i+1; {7} end; {8} Uses crt; {9} Var i, t:integer; {10} i:=1; t:=0; {11} Clrscr; {12} Readln; {13} End {14}
a, Chương trình bị sai vị trí dịng {2}, {9}, {10}, {11}, {12}, xếp lại vị trí dịng để chương trình
b, Hãy cho biết cơng dụng chương trình
Câu 2: Hãy vẽ hình nút lệnh nêu tên gọi tương ứng cơng cụ tạo mối quan hệ hình học có chương trình Geogebra
(6)ĐÁP ÁN Đề I:
Câu 10 11 12 13 14 15 16
Đ.án B A A A B C A D D C D C B C D B
A (tên chương trình) B (công dụng thu gọn) C (kết quả)
1 Finger Break Out Sun Times Geogebra Yenka
a/ Quan sát hình khơng gian b/ Tìm hiểu thời gian
c/ Luyện gõ phím nhanh d/ Học vẽ hình
e/ Học lập trình
1+ c 2+ b 3+ d 4+ a
B Tự luận: Câu 1:
a, Chương trình xếp lại thứ tự đúng: Uses crt; {9}
Var i, t:integer; {10} Begin
Clrscr; {12} i:=1; t:=0; {11} While i<50 Begin
If i mod =0 then t:=t + i;
i:=i+1; end;
Write(„Tong cac so chan nho hon 50 la:‟,t ); {2} Readln;
End
b, Công dụng: Dùng để tính tổng số chẵn có dãy số từ đến 49 (0,5 điểm) Câu 2:
1 Đường vng góc
2 Đường song song
3 Đường trung trực
4 Đường phân giác
(7)var i, t:integer;
A: array[1 10] of integer; begin
clrscr;
writeln('Nhap gia tri cho cac phan tu mang:'); for i:=1 to 10
begin
write('Phan tu thu ',i,': '); readln(A[i]);
end; t:=0;
for i:=1 to 10 if a[i] mod <>0 then t:=t+a[i];
write('Tong cac pahn tu le co mang la: ',t); readln;
end
Đề tham khảo số 2:
Câu 10 11 12 13 14 15 16
Đ.án D A C A D D D C A C B B A B D C
A (tên chương trình) B (công dụng thu gọn) C (kết quả)
1 Geogebra
2 Finger Break Out Yenka
4 Sun Times
a/ Quan sát hình khơng gian b/ Luyện gõ phím nhanh c/ Tìm hiểu thời gian d/ Học lập trình e/ Học vẽ hình
1+ e 2+ b 3+ a 4+ c
B Tự luận: Câu 1: a,
Uses crt; {9}
Var i, t:integer; {10} Begin
(8)If i mod =0 then t:=t + i;
i:=i+1; end;
Write(„Tong cac so chan nho hon 50 la:‟,t ); {2} Readln;
End
b, Công dụng: Dùng để tính tổng số chẵn có dãy số từ đến 49 (0,5 điểm) Câu 2:
1 Đường vng góc
2 Đường song song
3 Đường trung trực
4 Đường phân giác
Câu 3: uses crt; var i, t:integer;
A: array[1 10] of integer; begin
clrscr;
writeln('Nhap gia tri cho cac phan tu mang:'); for i:=1 to 10
begin
write('Phan tu thu ',i,': '); readln(A[i]);
end; t:=0;
for i:=1 to 10 if a[i] mod <>0 then t:=t+a[i];
write('Tong cac pahn tu le co mang la: ',t); readln;
end
(9)Website HOC247 cung cấp môi trường học trực tuyến sinh động, nhiều tiện ích thông minh, nội dung giảng biên soạn công phu giảng dạy giáo viên nhiều năm kinh nghiệm, giỏi kiến thức chuyên môn lẫn kỹ sư phạm đến từ trường Đại học trường chuyên danh tiếng
I. Luyện Thi Online
-Luyên thi ĐH, THPT QG: Đội ngũ GV Giỏi, Kinh nghiệm từ Trường ĐH THPT danh tiếng xây dựng khóa luyện thi THPTQG các mơn: Tốn, Ngữ Văn, Tiếng Anh, Vật Lý, Hóa Học Sinh Học
-Luyện thi vào lớp 10 chun Tốn: Ơn thi HSG lớp 9 luyện thi vào lớp 10 chuyên Toán trường PTNK, Chuyên HCM (LHP-TĐN-NTH-GĐ), Chuyên Phan Bội Châu Nghệ An trường Chuyên khác TS.Trần Nam Dũng, TS Pham Sỹ Nam, TS Trịnh Thanh Đèo Thầy Nguyễn Đức Tấn.
II Khoá Học Nâng Cao HSG
-Tốn Nâng Cao THCS: Cung cấp chương trình Tốn Nâng Cao, Toán Chuyên dành cho em HS THCS lớp 6, 7, 8, u thích mơn Tốn phát triển tư duy, nâng cao thành tích học tập trường đạt điểm tốt kỳ thi HSG
-Bồi dưỡng HSG Tốn: Bồi dưỡng phân mơn Đại Số, Số Học, Giải Tích, Hình Học và Tổ Hợp dành cho học sinh khối lớp 10, 11, 12 Đội ngũ Giảng Viên giàu kinh nghiệm: TS Lê Bá Khánh Trình, TS Trần Nam Dũng, TS Pham Sỹ Nam, TS Lưu Bá Thắng, Thầy Lê Phúc Lữ, Thầy Võ Quốc Bá Cẩn đơi HLV đạt thành tích cao HSG Quốc Gia
III. Kênh học tập miễn phí
-HOC247 NET: Website hoc miễn phí học theo chương trình SGK từ lớp đến lớp 12 tất môn học với nội dung giảng chi tiết, sửa tập SGK, luyện tập trắc nghiệm mễn phí, kho tư liệu tham khảo phong phú cộng đồng hỏi đáp sôi động
-HOC247 TV: Kênh Youtube cung cấp Video giảng, chuyên đề, ôn tập, sửa tập, sửa đề thi miễn phí từ lớp đến lớp 12 tất mơn Tốn- Lý - Hố, Sinh- Sử - Địa, Ngữ Văn, Tin Học Tiếng Anh
Vững vàng tảng, Khai sáng tương lai
Học lúc, nơi, thiết bi – Tiết kiệm 90%
Học Toán Online Chuyên Gia
- - - - -