Trắc nghiệm: Khoanh tròn vào đáp án đúng Câu 1: Lệnh lặp nào sau đây là đúng?. 2 Câu 6: Trong câu lệnh lặp for i:=1 to 10 do begin…end; câu lệnh ghép đợc thực hiện bao nhiêu lần nói các
Trang 1Trờng THCS Nga Thuỷ Kiểm tra học kì II: 45 phút
Họ và tên: Lớp: Môn: Tin học 8
Điểm Nhận xét của thầy cô giáo
I Trắc nghiệm: Khoanh tròn vào đáp án đúng
Câu 1: Lệnh lặp nào sau đây là đú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ị cuôí> to <giá trị đầu> do <câu lệnh>;
C For <biến đếm>: <giá trị đầu> to <câu lệnh> do <giá trị cuối>;
D For <biến đếm>= <giá trị đầu> to <giá trị cuối> do <câu lệnh>;
Câu 2: Câu lệnh lặp while…do có dạng đúng là:
A While <điều kiện> do; <câu lệnh>; B While <điều kiện> do <câu lệnh>;
C While <điều kiện> <câu lệnh> do; D While <câu lệnh>; do <điều kiện>
Câu 3: Chọn khai báo biến mảng hợp lệ:
A Var a, b: array[1…100] of real; C Var a, b: array[1 100] of real;
B Var a, b: array[1 n] of real; D Var a, b: array[1:n] of real;
Câu 4: Trong lệnh lặp For…to…do của Pascal, sau mỗi vòng lặp biến đếm thay đổi
nh thế nào?
Câu 5: Sau khi thực hiện đoạn chơng trình sau, giá trị của biến a bằng bao nhiêu?
a:=2 ; for i:= 1 to 3 do a:= a+1;
A 5 B 4 C 3 D 2
Câu 6: Trong câu lệnh lặp for i:=1 to 10 do begin…end; câu lệnh ghép đợc thực hiện bao
nhiêu lần (nói cách khác, bao nhiêu vòng lặp đợc thực hiện?)
A Không lần nào B 10 lần C 1 lần D 2 lần
II Tự luận:
1) Viết cú pháp khai báo biến mảng? Nêu ý nghĩa các thành phần?
2) Hãy chỉ ra lỗi trong các câu lệnh sau đây:
a while i := 1 do T := 10;
b while a< = b; do write(‘a khong nho hon b’);
c For i := 15 to 1 do writeln(‘A’);
d For i := 1.5 to 10.5 do writeln(‘A’);
3) Viết chơng trình Pascal 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ố nguyên Đa ra màn hình trung bình cộng của dãy số vừa nhập
………
………
………
…
………
………
………
Trang 2………
………
………
………
… ………
………
………
………
………
………
………
………
………
………
………
………
………
………
………
………
………
………
………
Đáp án:
I Trắc nghiệm: 3 điểm (Mỗi câu đúng đợc 0,5 điểm)
1 – A; 2 – B; 3 – C; 4 – D; 5 – A; 6 – B;
II Tự luận:
1 Cách khai báo biến mảng: 2 điểm
Tên mảng: array[<chỉ số đầu chỉ số cuối>] of <kiểu dữ liệu>
Trong đó: Chỉ số đầu và chỉ số cuối là hai số nguyên thỏa mãn điều kiện chỉ số đầu nhỏ hơn chỉ số cuối Kiểu dữ liệu có thể là integer hoặc real
2 2 điểm: (Mỗi câu đúng đợc 0,5 điểm)
a Sai, thừa dấu hai chấm đầu tiên
b Sai, thừa dấu chấm phẩy trớc từ khóa do
c Sai, chỉ số đầu lớn hơn chỉ số cuối
d Sai, biến đếm có kiểu dữ liệu real
3 Viết chơng trình: 3 điểm
Program BT3;
Uses crt;
Var i, N :integer;
TB: real;
Trang 3a: array[1 100] of integer;
Begin CLRSCR;
Write(‘ Nhap do dai day so N=’); readln(N); Write(‘ Nhap cac phan tu mang’);
for i:= 1 to N do
Write(‘a[‘,i,’]=’); readln(a[i]);
TB:=0;
for i:= 1 to N do
TB:=(TB+i)/N;
Write(‘ Trung binh cua day so la=’, TB:4:1); Readln
End