Viết chương trình sử dụng biến mảng để nhập từ bàn phím các phần tử của một dãy số, độ dài của dãy cũng được nhập từ bàn phím... Nếu điều kiện sai, câu lệnh sẽ bị bỏ qua và việc thực hiệ[r]
(1)A/ MA TRẬN
Phòng GD&ĐT Đại Lộc Trường THCS Lê Quý Đôn
ĐỀ KIỂM TRA HỌC KỲ II (2015-2016) Môn : Tin học Lớp : 8
Người đề : Trần Đình Luận Đơn vị : THCS Lê Quý Đôn
MA TRẬN ĐỀ Mức độ
Nội dung
Nhận biết Thông hiểu Vận dụng Tống
số
TN TL TN TL VDT VDC
TN TL TN TL
Bài 7: Câu lệnh lặp
Biết cú pháp câu lệnh lặp với số lần lặp biết trước
Sử dung câu lệnh lặp để áp dụng tính số phép tốn đơn giản
Số câu 1 2 1 4
Số điểm 0,5 1 0,5 2
Bài 8: Lặp với số lần chưa biết trước
Biết viết cú pháp câu lệnh lặp while…do
Hiểu phép toán chia lấy phần nguyên, chia lấy phần dư
Sử dụng câu lệnh lặp với số lần chưa biết trước phù hợp cho trường hợp cụ thể
Số câu 1 1 1 1 4
Số điểm 1 0,5 1 0,5 3
Bài 9: Làm việc với dãy số
Biết cú pháp thành phần có biến mảng
Hiểu hoạt động câu lệnh kết hợp với biến mảng
Thực việc khai báo biến mảng Viết câu lệnh nhập giá trị cho biến mảng
Số câu 1 1 1 1 4
Số điểm 0,5 1 0,5 3 5
Tổng số câu 2 6 4 12
Tổng số điểm 1,5 4 4,5 10
(2)B/ Đề: Trương THCS Họ Tên HS Lớp
KIỂM TRA HỌC KÌ II ( 2015-2016) MƠN :
Thời gian làm bài:
Số báo danh : Phịng thi:
Điểm: Chữ kí GK : Chữ ký giám thị:
Đề:
I Trắc nghiệm (4 điểm) Hãy khoanh tròn đáp án câu sau: Câu Trong cú pháp khai báo biến mảng, phát biểu sau đúng:
a Chỉ số đầu số cuối số nguyên; b Chỉ số đầu số cuối; c Kiểu liệu integer real; d Cả ba ý trên;
Câu Trong hoạt động sau hoạt động lặp với số lần chưa biết trước số lần lặp?
a Tính tổng số tự nhiên từ đến 20
b Nhập số nguyên từ bàn phím đủ 50 số c Mỗi ngày học lần
d Nhập vào số số nhập vào số chẵn dừng
Câu 3:Cách khai biến mảng Pascal đúng:
a Var X: Array[10…13] of integer; b Var X: Array[10 13.6] of integer; c Var X: Array[10.4 13.6] of Real; d Var X: Array[10 13] of Real;
Câu 4: Câu lệnh pascal sau hợp lệ?
a For i:=100 to writeln(‘N’); b For i:=1.5 to 10.5 writeln(‘N’); c For i:= to 100 writeln(‘N’); d For i:= Downto 10 writeln(‘N’);
Câu Khi thực đoạn chương trình sau: i:=1; T:= 0;
While i<=50 begin i:=i+1; T:=T +i end; Hãy cho biết giá trị tổng T bao nhiêu?
A 5000 B 5020 C 5030 D 5050
Câu 6: Câu lệnh lặp For câu lệnh 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 <=100
Câu 7: Var i: integer;
Begin
For i:=1 to 20 writeln(‘Chao cac ban lop – LQD’); Readln;
End Đoạn chương trình in hình kết ?
a câu “ Chao cac ban lop – LQD”; b 20 câu “Chao cac ban lop – LQD”; c 10 câu “ Chao cac ban lop – LQD”; d Không in câu cả;
Câu Giả sử biến mảng A có phần tử giá trị phần tử 8, 4, 7, 2, Khi thực câu lệnh sau: S:= 0;
For i:= to S := S + A[i]; Giá trị biến S bao nhiêu?
A 25; B 18; C 27; D 28;
II/ Phần tự luận: (6 điểm)
Câu 1:(1 đ) Dữ liệu kiểu mảng gì? Hãy nêu cú pháp khai báo biến mảng chương trinh?
Câu : (2 đ)
a/ Em nêu cú pháp hoạt động câu lệnh lặp với số lần chưa biết trước (While do)
b/ Cho biết điều kiên, câu lệnh lặp kết in tổng S vòng lặp While sau đây: S:= 0;
(3)Writeln (S); Tổng S : ………
Câu 3:(3 đ). Viết chương trình sử dụng biến mảng để nhập từ bàn phím phần tử dãy số, độ dài dãy nhập từ bàn phím
(4)C/ĐÁP ÁN
I/ PHẦN TRẮC NGIỆM: (4đ)
I/ Trả lời câu 0.5 đ
ĐỀ
ĐÁP ÁN B D D C D A B C
II/ PHẦN TỰ LUẬN: (6đ)
Câu 1:(1 đ )
+ Dữ liệu kiểu mảng tập hợp hữu hạn phần tử có thứ tự, phần tử có một kiểu liệu, gọi kiểu phần tử
+ Cách khai báo mảng Pascal sau:
Var Tê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 biểu thức nguyên thoả mãn số đầu ≤ số cuối kiểu liệu integer real
Câu 2: (2 đ)
a + Cú pháp: (0.5 đ )
While <điều kiện> <câu lênh>; - Điều kiện thường phép so sánh
- Câu lệnh câu lệnh đơn hay câu lệnh ghép + Hoạt động: (0.5 đ )
B1 Kiểm tra điều kiện
B2 Nếu điều kiện sai, câu lệnh bị bỏ qua việc thực câu 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
b (1 đ) Trong : - i <=10 điều kiện
- Begin i:=i+1; S:=S+ i; end; câu lệnh (câu lệnh ghép phải có begin end;) - Kết in hình tổng S: 55
Câu :(3 đ) :
Program Mang ; Var
i, n : integer;
A: array[1 100] of integer; Begin
write('Hay nhap dai cua day so, N='); readln(n); writeln('Nhap cac phan tu cua day so:');
For i:=1 to n do Begin
write('Nhap phan tu a[',i,']='); readln(a[i]); End;
Readln End.