- Toán Nâng Cao THCS: Cung cấp chương trình Toán Nâng Cao, Toán Chuyên dành cho các em HS THCS lớp 6, 7, 8, 9 yêu thích môn Toán phát triển tư duy, nâng cao thành tích học tập ở trường[r]
(1)TRƯỜNG THCS ĐỀ KIỂM TRA HỌC KỲ II – NĂM HỌC 2017 -2018 Họ tên: ……… MÔN: TIN HỌC
Lớp 8A Thứ ngày tháng năm 2018
Câu 1: ( điểm) Hãy nêu ý nghĩa câu lệnh sau:
a)Writeln(‘25+5= ‘); b) Writeln(25+6); c) Readln(b); d) Writeln(‘b’); e) Clrscr; d) Var j,i: Integer;
Câu 2: (3 điểm) Hãy cho biết liệu in hình thực đoạn chương trình sau: A[1]:=12; A[2]:=4; A[3]:=15; A[4]:= 8; T:= 2;
For j:= to Write (j:3);
Writeln(‘A[1] + A[2] = ‘,A[1]+B[2] ); For i:= to Writeln(‘i’);
IF T > Then Writeln(T-2) else Writeln(T+2); While i>1
Begin
Write (‘*’); i:=i-1; End
Writeln (i+3);
Câu 3: (4 điểm) Hãy viết chương trình thực cơng việc sau:
a) Nhập vào điểm Toán lớp 8A1 (Sỉ số lớp 30 HS Các số phần tử mảng ngầm định tên học sinh)
b) In điểm nhập hình
(2)TRƯỜNG THCS BẢO NINH ĐỀ KIỂM TRA HỌC KỲ II NĂM HỌC 2017 - 2018 MÔN: TIN – KHỐI (Đề lí thuyết)
Thời gian: 45 phút (Khơng kể thời gian giao đề)
A PHẦN TRẮC NGHIỆM: (6 điểm) Khoanh tròn vào đáp án đúng: Câu 1: Câu lệnh viết cú pháp là:
A While <điều kiện> to <câu lệnh>; B While <điều kiện> <câu lệnh>; C While <điều kiện> to <câu lệnh1> do; D While <điều kiện>; <câu lệnh>; Câu 2: Cú pháp câu lệnh lặp for … … ?
A If (điều kiện) then (câu lệnh); B Var n, i:interger; C Phải kết hợp a, b c D For <biến đếm>:=<giá trị đầu> to <giá trị cuối> <câu lệnh>;
Câu 3: Hoạt động sau tính toán số lần làm việc: A Múc gáo nước đến đầy bể
B Đi lên tầng, đến tầng 10 dừng C Học thuộc D Nhặt cọng rau xong Câu 4: Vòng lặp while vòng lặp:
A Biết trước số lần lặp B Biết trước số lần lặp giới hạn <=100 C Chưa biết trước số lần lặp D Biết trước số lần lặp giới hạn >=10 Câu 5: Trong ngơn ngữ Pascal, đoạn chương trình sau đưa hình kết gì? For i:=1 to 10 write (i,’ ‘);
A 10 B 10 C Đưa 10 dấu cách D Khơng đưa kết Câu 6: Phần mềm giúp em học vẽ hình học là?
A Sun Times B Yenka C Finger Break Out D Geogebra Câu 7: Khai báo biến mảng đúng:
(3)C Var Y: Array[10,50] of Integer; D Var Y: Array[30 15] of Real;
Câu 8: Để vẽ đường trung trực đoạn thẳng em phải dùng công cụ sau đây?
A B C D E
Câu 9: Để nhập giá trị vào phần tử a[3] mảng a ta viết là:
A Readln(a) B Readln(a[3]) C Readln(a[i]) D Readln(a(3)) Câu 10: Đoạn lệnh sau cho kết gì?
so:=1;
While so < 10 writeln(so); so:=so + 1;
A In vô hạn số 1, số dịng; B Khơng phương án C In số từ đến 9; D In số từ đến 10; Câu 11: Câu lệnh sau lặp vô hạn lần
A s:=5; i:=0;
While i<=s s:=s + 1;
C s:=5; i:=1;
While i<=s i:=i + 1; B s:=5; i:=1;
While i> s i:=i + 1;
D s:=0; i:=0; n:=5; While i<=n Begin
If (i mod 2)=1 Then S:=S + i; Else i:=i+1;
End;
Câu 12: Để tính tổng S=1/2+1/4 + 1/6 + … +1/ n; em chọn đoạn lệnh: A for i:=1 to n
if ( i mod 2)=0 then S:=S + 1/i;
C for i:=1 to n
if ( i mod 2) < > then S:=S + i; B for i:=1 to n
if ( i mod 2)=0 then S:=S – 1/i Else S:= S + 1/i;
D for i:=1 to n
(4)B TỰ LUẬN: (4 điểm)
Câu 1: Viết chương trình cho người dùng nhập số nguyên N Em vẽ tam giác vng hình bên dưới, với N số * cạnh tam giác?
VD: người dùng nhập N=5, ta có tam giác vẽ sau: *
* *
* * *
* * * *
* * * * *
Câu 2: Cho đoạn chương trình pascal bên em hay thực chạy từng bước để miêu tả thay đổi biến sau vòng lặp?
N:=25; i:=-25; T:=0;
While i<=N Begin
If i Mod 10 = then T:=T+i;
i:=i+5; End
Vd:
(5)ĐÁP ÁN VÀ BIỂU ĐIỂM
MÔN TIN HỌC - LỚP – Năm học 2017 - 2018 (Lí thuyết)
A Trắc nghiệm: (6 điểm) (Mỗi câu 0,5đ)
1 10 11 12
B D B C A D A C B A A A
B Tự Luận: (4 điểm) Câu 1:
Program Tam_Giac_Vuong; Uses CRT;
Var i,j,n:integer; Begin
Write('Ban hay nhap dai cua canh: '); Read(n);
For i:=1 to n Begin
Writeln(); For j:=1 to n Begin
If j <=i then Write('* ') Else write(' ');
(6)End; End
Câu 2:
(7)PHÒNG GD & ĐT BẢO LÂM TRƯỜNG THCS PÁC MIẦU
ĐỀ KIỂM TRA HỌC KÌ II NĂM HỌC 2017-2018 Môn: Tin học
Thời gian: 90 phút (Không kể thời gian giao đề)
A LÝ THUYẾT: (5điểm) (45’)
Câu 1: (2,0 điểm) Hãy cho biết số lệnh tính tốn với đa thức giải phương trình ý nghĩa lệnh đó?
Câu 2: (2,0 điểm) Viết cú pháp câu lệnh lặp với số lần chưa biết trước? Nêu bước thực câu lệnh cú pháp trên?
Câu 3: (1,0 điểm) Cho biết cú pháp khai báo biếm mảng? Giải thích thành phần cú pháp?
B THỰC HÀNH: (5điểm) (45’)
Câu 1: (2,0 điểm) Sử dụng GeoGebra thực yêu cầu sau: a) Giải phương trình sau: (x+1)2 = 4(x2-2x+1)
b) Vẽ lăng trụ đa giác sau:
Câu (3,0 điểm) Sử dụng Free Pascal viết chương trình Pascal sử dụng biến mảng để nhập từ bàn phím phần tử dãy N số tự nhiên, xét tìm số lớn đưa hình? Độ dài dãy nhập từ bàn phím?
(8)HƯỚNG DẪN CHẤM VÀ THANG ĐIỂM A Lý thuyết: (5điểm) (45’)
Câu Nội dung Điểm
1
Cú pháp lệnh Ý nghĩa
Factor[<đa thức>]
Khai triển đa thức thành tích thừa số phạm vi số hữu tỉ
iFactor[<đa thức>]
Khai triển đa thức thành tích thừa số phạm vi số vô tỉ
Expand[<đa thức>] Khai triển biểu thức tính tốn đa thức
Simplify[<đa thức>] Rút gọn biểu thức tính đa thức
Div[<đa thức>, <đa thức 2>] Cho thương phép chia đa thức cho đa thức
Mod[<đa thức>, <đa thức 2>] Cho số dư phép chia đa thức cho đa thức
Division[<đa thức>, <đa thức 2>] Cho thương số dư phép chia đa thức cho đa thức Solve[<phương trình x>]
Solve[<bất phương trình x>] Cho kết nghiệm phương trình bất phương trình
Solutions[<phương trình>] Solutions[<bất phương trình>]
Cho kết tất giá trị nghiệm phương trình, bất phương trình
0,2
0,2
0,2
0,2
0,2
0,2
0,2
0,2
(9)2
*Cú pháp câu lệnh lặp với số lần chưa biết trước: While <điều kiện> <câu lệnh>;
Trong đó: - While, là từ khóa
- <điều kiện> thường phép so sánh
- <câu lệnh> câu lệnh đơn giản hay câu lệnh ghép * Câu lệnh lặp với số lần chưa biết trước thực sau: Bước 1: Kiểm tra điều kiện
Bước 2: Nếu điều kiện sai, câu lệnh bị bỏ qua việc thực lệnh lặp kết thúc
Nếu điều kiện đúng, thực câu lệnh quay lại bước
0,5
0,5
0,5 0,5
3
Cú pháp:
Var<tên biến mảng>: array[<chỉ số đầu> <chỉ số cuối>] of <kiểu liệu>
Trong số đầu số cuối hai số nguyên thỏa mãn số đầu <= số cuối kiểu liệu integer real
0,5
0,5
B THỰC HÀNH: (5 điểm) (5’)
Câu Nội dung Điểm
1
a)
1
b)
(10)2
Program Tim_so_nho_nhat; Uses crt;
Var N,i, min: integer;
A:array[1 100] of integer; Begin
Clrscr;
Write(‘Nhap chieu dai day N=: ‘); Readln(N); Writeln(‘Nhap day so’);
For i:=1 to N Begin
Write(‘A[‘,i,’]=’); Readln(A[i]); End;
Min:= A[1]; For i:=2 to N Begin
If > A[i] then min:= A[i]; End;
Write(' So nho nhat day so la ', ); Readln;
End
0,25 0,5
0,25
0,25 0,25 0,25 0,25
0,25 0,25
0,25
(11)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
- Toá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ý - Hoá, 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
Kê