Vững vàng nền tảng, Khai sáng tương lai Website HOC247 cung cấp một môi trường học trực tuyến sinh động, nhiều tiện ích thông minh, nội dung bài giảng được biên soạn công phu và giảng dạ[r]
Trang 1TRƯỜNG THCS CHU VĂN AN
ĐỀ THI HỌC KÌ 2 NĂM HỌC 2021 - 2022
MÔN TIN HỌC 8
Thời gian làm bài : 45 phút
(Không kể thời gian phát đề)
1 ĐỀ SỐ 1
I TRẮC NGHIỆM: Khoanh tròn chữ cái trước đáp án đúng
Câu 1 Trong Pascal, câu lệnh nào sau đây được viết đúng?
A For i:= 4 to 1 do writeln(‘A’);
B For i= 1 to 10 writeln(‘A’);
C For i:= 1 to 10 do writeln(‘A’);
D For i to 10 do writeln(‘A’);
Câu 2 Trong câu lệnh lặp: j:=0; For i := 1 to 10 do j:= j + 2;
Khi kết thúc câu lệnh lặp trên, câu lệnh j:=j+2 được thực hiện bao nhiêu lần?
A 10 lần
B 5 lần
C 2 lần
D Không thực hiện
Câu 3 Cho đoạn chương trình: J:= 0; For i:= 1 to 5 do J:= j + i;
Sau khi thực hiện đoạn chương trình trên, giá trị của biến j bằng bao nhiêu?
A 12
B 22
C 15
D 42
Câu 4 Trong Pascal, câu lệnh nào sau đây là đúng?
A S:=1;While S<10 do write(S);
Trang 2C n:=2; While n<5 do write(‘A’);
D S:=10; While S>9 do write(S);
Câu 5 Phần mềm quan sát hình không gian là
A finger Break out
B turbo pascal
C geogebra
D yenka
Câu 6 Khai báo biến mảng: A : array[1 7] of real; Sử dụng câu lệnh For i:= 1 to 5 do readln(A[i]); để
gán giá trị cho các phần tử trong biến A từ bàn phím, ta sẽ nhập được bao nhiêu giá trị?
A 1
B 5
C 6
D 7
Câu 7 Trong câu lệnh khai báo biến mảng, phát biểu nào sau đây sai?
A Chỉ số đầu và chỉ số cuối là 2 số thực
B Chỉ số đầu chỉ số cuối
C Kiểu dữ liệu có thể là integer hoặc real
D Chỉ số đầu cuối là số nguyên
Câu 8 Giả sử biến mảng A có 5 phần tử và giá trị của các phần tử lần lượt là 1, 4, 7, 2, 6 Khi thực hiện
câu lệnh sau: tong:= 0; For i:= 1 to 5 do tong := tong + A[i]; Giá trị của biến tong là bao nhiêu?
A 4
B 18
C 20
D 22
II TỰ LUẬN:
Câu 1 Viết cú pháp câu lệnh lặp với số lần chưa biết trước Nêu hoạt động của câu lệnh
Trang 3Câu 2 Viết chương trình nhập điểm kiểm tra học kỳ môn tin học cho N học sinh và in kết quả ra màn
hình Với N và điểm kiểm tra của từng học sinh được nhập từ bàn phím (sử dụng biến mảng)
ĐÁP ÁN
I TRẮC NGHIỆM:
II TỰ LUẬN:
Câu 1:
- Cú pháp câu lệnh: while <điều kiện> do <câu lệnh>;
- Hoạt động: Khi thực hiện câu lệnh chương trình kiểm tra điều kiện Nếu điều kiện đúng thực hiện câu
lệnh sau từ khóa do và quay lại kiểm tra điều kiện Nếu điều kiện sai bỏ qua câu lệnh sau từ khóa do và
kết thúc
Câu 2:
Program diem;
Uses crt;
Var N, i: integer;
Diem: array[1 50] of real;
Begin
Clrscr;
Write(‘Nhap so luong hoc sinh N = ‘); Readln(N);
Writeln(‘Nhap diem cho tung hoc sinh’);
For i := 1 to n do
Begin
Write(‘Diem HS ‘,i,’ = ‘); readln(Diem[i]);
End;
For i : = 1 to n do
Writeln(‘Diem cua HS ‘,i, ‘ = ‘,diem[i]);
Trang 4End
2 ĐỀ SỐ 2
Câu 1 Viết chương trình tính tổng 10 số tự nhiên đầu tiên
Câu 2 Viết chương trình tính tổng các số tự nhiên đầu tiên cho đến khi tổng đó bằng 100 thì dừng lại
Câu 3 Viết chương trình nhập điểm kiểm tra học kỳ môn tin cho N học sinh và in ra màn hình Với N và
điểm kiểm tra được nhập từ bàn phím (sử dụng biến mảng)
Câu 4 Viết chương trình tìm phần tử nhỏ nhất và lớn nhất của dãy n số nhập vào từ bàn phím
ĐÁP ÁN Câu 1:
Var s,i:integer;
begin
S:= 0;
For i:= 1 to 10 do s:=s+1;
Writeln (‘tong cua 10 so tu nhien dau tien la:’,s);
Readln
End
Câu 2:
Var s,n:integer;
Begin
S:=0; n:=1;
While (s<=100) do
Begin
S:=s+n; n:=n+1;
End;
Writen(‘tong cac so tu nhien dau tien:’,s);
Readln
End
Trang 5Câu 3:
Var n, i: integer;
Diem: array[1 50] of real;
Begin
Write(‘Nhap so luong hoc sinh N = ‘); Readln(n);
Writeln(‘Nhap diem cho tung hoc sinh’);
For i := 1 to n do
Begin
Write(‘Diem HS ‘,i,’ = ‘); readln(Diem[i]);
End;
For i : = 1 to n do
Writeln(‘Diem cua HS ‘,i, ‘ = ‘,diem[i]);
Readln;
End
Câu 4:
Var n,i: integer;
S,ptmax, ptmin: real;
A: array [1 100] of real;
Begin
Write (‘nhap so phan tu cua day:’); readln(n);
Writeln (‘hay nhap’,n,’ phan tu cua day:’);
For i:=1 to n do readln(a[i]);
Ptmax:=a[i]; ptmin:=a[i];
For i:=2 to n do
Begin
Trang 6If a[i] < ptmin then ptmin:=a[i];
End;
Writeln (‘phan tu max cua day la: ‘,ptmax:0:2);
Writeln(‘phan tu min cua day la: ‘,ptmin:0:2);
Readln
End
3 ĐỀ SỐ 3
Câu 1: Viết chương trình cho người dùng nhập số nguyên N Em hãy vẽ 1 tam giác vuông như hình bên
dưới, với N là số * trên mỗi cạnh của tam giác?
VD: khi người dùng nhập N=5, ta có tam giác được vẽ trên màn hình như sau:
*
* *
* * *
* * * *
* * * * *
Câu 2: Cho 1 đoạn chương trình pascal như bên dưới em hay thực hiện chạy từng bước để miêu tả sự
thay đổi của các biến sau mỗi vòng lặp?
N:=25;
i:=-25;
T:=0;
While i<=N do
Begin
If i Mod 10 = 0 then
T:=T+i;
i:=i+5;
End
Vd:
Hết vòng lặp 1: i = -25 ; T = -25 ; N = 25 Hết vòng lặp 2: i = -20 ; T = -20 ; N = 25 Hết vòng lặp 3: i = -15 ; T = -15 ; N = 25
…
ĐÁP ÁN
Trang 7Câu 1:
Program Tam_Giac_Vuong;
Uses CRT;
Var i,j,n:integer;
Begin
Write('Ban hay nhap do dai cua canh: ');
Read(n);
For i:=1 to n do
Begin
Writeln();
For j:=1 to n do
Begin
If j <=i then Write('* ')
Else write(' ');
End;
End;
End
Câu 2:
Hết vòng lặp 1: i = -20 ; T = 0 ; N = 25
Hết vòng lặp 2: i = -15 ; T = -20 ; N = 25
Hết vòng lặp 3: i = -10 ; T = -20 ; N = 25
Hết vòng lặp 4: i = -5 ; T = -30 ; N = 25
Hết vòng lặp 5: i = 0 ; T = -30 ; N = 25
Hết vòng lặp 6: i = 5 ; T = -30 ; N = 25
Hết vòng lặp 7: i = 10 ; T = -30 ; N = 25
Trang 8Hết vòng lặp 9: i = 20 ; T = -20 ; N = 25
Hết vòng lặp 10: i = 25 ; T = 0 ; N = 25
Hết vòng lặp 11: i = 30 ; T = 0 ; N = 25
Trang 9Website HOC247 cung cấp một môi trường học trực tuyến sinh động, nhiều tiện ích thông minh, nội dung bài giảng được biên soạn công phu và giảng dạy bởi những giáo viên nhiều năm kinh nghiệm, giỏi về kiến thức chuyên môn lẫn kỹ năng sư phạm đến từ các trường Đại học và các trường chuyên
danh tiếng
xây dựng các khóa luyện thi THPTQG các môn: Toán, Ngữ Văn, Tiếng Anh, Vật Lý, Hóa Học và
Sinh Học
trường PTNK, Chuyên HCM (LHP-TĐN-NTH-GĐ), Chuyên Phan Bội Châu Nghệ An và các trường Chuyên khác cùng TS.Trần Nam Dũng, TS Phạm Sỹ Nam, TS Trịnh Thanh Đèo và Thầy Nguyễn
Đức Tấn
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 và đạt điểm tốt ở các kỳ thi HSG
dành cho học sinh các 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 Phạm Sỹ Nam, TS Lưu Bá Thắng, Thầy Lê Phúc Lữ, Thầy Võ Quốc
Bá Cẩn cùng đôi HLV đạt thành tích cao HSG Quốc Gia
các môn học với nội dung bài giảng chi tiết, sửa bài tập SGK, luyện tập trắc nghiệm mễn phí, kho tư liệu tham khảo phong phú và cộng đồng hỏi đáp sôi động nhất
miễn phí từ lớp 1 đến lớp 12 tất cả các môn Toán- Lý - Hoá, Sinh- Sử - Địa, Ngữ Văn, Tin Học và Tiếng Anh
Vững vàng nền tảng, Khai sáng tương lai
Học mọi lúc, mọi nơi, mọi thiết bi – Tiết kiệm 90%
Học Toán Online cùng Chuyên Gia
HOC247 NET cộng đồng học tập miễn phí HOC247 TV kênh Video bài giảng miễn phí