- Dữ liệu kiểu mảng là một tập hợp hữu hạn các phần tử có thứ tự, mọi phần tử đều có cùng một kiểu dữ liệu, gọi là kiểu của phần tử.. Việc sắp thứ tự được thực hiện bằng cách gán cho.[r]
(1)TRƯỜNG THCS VĨNH THỊNH ==========
ĐỀ KIỂM TRA HỌC KỲ II NĂM HỌC 2017 - 2018
Môn: Tin học 8 Phần I Trắc nghiệm:
Chọn phương án trả lời câu sau: Câu 1 Chọn khai báo hợp lệ khai báo sau:
A Const n = 5;
Var a, b : Array[1 n] of Real;
B Var n: Real;
a, b : Array[1 n] of Real; C Var a, b: Array[100 1] of Real; D Var a,b: Array[1.5 10] of Real; Câu 2 Câu lệnh Pascal sau hợp lệ?
A For i= to 10 writeln(‘A’); B For i:= 100 to writeln(‘A’); C For i:= to 10 writeln(‘A’); D For i:= 1.5 to 10.5 writeln(‘A’); Câu 3 Sau thực đoạn chương trình sau:
J:= 0; For i:= to J:= J + 2; Giá trị J bao nhiêu?
A 4 B 6 C 8 D 10
Câu 4 Giả sử biến mảng A có phần tử giá trị phần tử 1, 4, 7, 2, Khi thực câu lệnh sau:
T:= 0; For i:= to T := T + A[i]; Giá trị biến T bao nhiêu?
A 20 B 18 C 21 D 22
Phần II Tự luận
Câu 5 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âu lệnh.
Câu Dữ liệu kiểu mảng gì? Hãy nêu cách khai báo biến mảng Pascal và các thành phần nó?
(2)TRƯỜNG THCS VĨNH THỊNH ==========
ĐÁP ÁN VÀ THANG ĐIỂM ĐỀ KIỂM TRA HK II NĂM HỌC 2017 - 2018
Môn: Tin học 8 Phần I Trắc nghiệm (2 điểm)
Câu Câu Câu Câu
Đáp án A C B A
Điểm 0,5 0,5 0,5 0,5
Phần II Tự luận (8 điểm)
Câu 5.(2 điểm)
- Cú pháp câu lệnh: while <điều kiện> <câu lệnh>; 1đ - Hoạt động: Khi thực câu lệnh chương trình kiểm tra điều kiện Nếu điều kiện thực câu lệnh sau từ khóa do 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 kết thúc 1đ
Câu (2 điểm)
- 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ó kiểu liệu, gọi kiểu phần tử Việc thứ tự thực cách gán cho
mỗi phần tử số: 1đ
- Cách khai báo biến mảng Pascal:
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 biểu thức nguyên thoả mãn chỉ số đầu ≤ số cuối kiểu liệu integer real. 1đ
Câu (4 điểm)
Chương trình viết sau: Program Cau8;
Uses CRT;
Var N, i : Integer; T : Real;
A: Array[1 100] of Integer; Begin
Clrscr;
Write(‘Nhap so luong phan tu: ’); Readln(N); Writeln(‘Nhap cac phan tu: ’);
For i:= to n Begin
Write(‘A[’, i, ‘]= ‘); Readln(A[i]); End;
T := 0;
For i:= to N T:= T + A[i];
Write(‘Tong cua cac so da nhap la:’,T:8:2); Readln;
End
Phần khai báo: điểm
Phần nhập dãy số nguyên: điểm
(3)