Đoạn chương trình 2, sau khi thực hiện xong kết quả của biến “tong” có giá trị bằng bao nhiêu.. Để khai báo biến mảng a gồm 10 phần tử, mỗi phần tử có kiểu dữ liệu là real ta khai báo:[r]
(1)Trường THCS Trần Quang Diệu
Họ Tên :………
Lớp: ……
ĐỀ KIỂM TRA HỌC KỲ II Môn học Tin 8
Thời gian làm bài: 45’
I Phần trắc nghiệm: Khoanh tròn vào chữ A, B, C, D trước đáp án đúng.
Câu Trong ngơn ngữ lập trình Pascal muốn chạy chương trình ta nhấn tổ hớp phím
A CTRL+F9 B ALT +F9 C SHIFT+F9 D
CTRL+F10
Câu 2: Em hiểu câu lệnh lặp theo nghĩa đây?
A Các câu lệnh viết lặp lặp lai nhiều lần C Vì câu lệnh có tên lệnh lặp
B Một lệnh thay cho nhiều lệnh D Cả a, b, c sai Câu Cách viết câu lệnh lặp với số lần biết trước sau:
A For <biến đếm> = <giá trị đầu> to <giá trị cuối> <câu lệnh>; B For <biến đếm>: = <gía trị cuối> to <giá trị đầu> <câu lệnh>; C For <biến đếm> := <giá trị đầu> to <giá trị cuối> <câu lệnh>; D For <biến đếm> = <giá trị cuối> to <giá trị đầu> <câu lệnh> Câu Đoạn chương trình 1, sau thực xong kết là:
A 24 B C D
Câu 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> <câu lệnh 2>; D While <điều kiện> <câu lệnh>;
Câu Đoạn chương trình 2, sau thực xong kết biến “tong” có giá trị bao nhiêu?
A B 10 C 15 D 21
Câu Để khai báo biến mảng a gồm 10 phần tử, phần tử có kiểu liệu real ta khai báo:
A var a: array[10] of real; B var a: array[1 10] of real; C var a: array[1:10]: of real; D var a: array[1;10] of real; Câu Cho đoạn chương trình 3:
Khi thực chương trình câu “ xin chao” viết hình lần?
A B 10 C 11 D Vịng lặp vơ hạn II Phần tự luận
Câu 1 Viết chương trình nhập n số nguyên từ bàn phím In hình giá trị
trung bình cộng dãy số vừa nhập Biết n giá trị nguyên nhập từ bàn phím?
Đoạn chương trình S:=0;
for i:=1 to S:=S* i;
Đoạn chương trình 2
i:=1; tong:=0; While i<=5 Begin
tong:= tong + i; i:= i + 1; End; Đoạn chương trình 3
n:=1;
(2)(3)ĐÁP ÁN – THANG ĐIỂM
Đáp án Thang điểm
I Phần trắc nghiệm:
Câu 1 2 3 4 5 6 7 8
Đáp án A B C D D C B A
4 điểm
II Phần tự luận: Câu 2:
Chương trình viết sau: Program tbc;
Var a: array[1 100] of integer; i, n, tong: integer;
tbc: real; Begin
Write(‘Nhap vao so phan tu cua mang n= ’); readln(n); Write(‘Nhap so nguyen:’);
For i:=1 to n do Begin
write(‘a[‘,i,’]:’); readln(a[i]); end;
Tong:=0;
For i:=1 to n tong:=tong+a[i]; tbc:=tong/n;
Writeln(‘Trung binh cong cua mang la:’, tbc:10:2); Readln;
End.
Phần khai báo: điểm
Phần nhập số nguyên n phần tử cho mảng: điểm Phần tính tổng phần tử mảng: điểm
Phần tinh in hình giá trị tbc: điểm
(4)