DE THI HK 2 LOP 8 CHUẨN

Chia sẻ bởi Đức Tịnh | Ngày 17/10/2018 | 37

Chia sẻ tài liệu: DE THI HK 2 LOP 8 CHUẨN thuộc Tin học 8

Nội dung tài liệu:

Trường THCS Thành Cổ BÀI KIỂM TRA HỌC KÌ II năm học 2010-2011
Môn: Tin 8
Ngày thi ...........................
Họ và tên:………………………………………… Lớp 8

Điểm
Lời phê của giáo viên

( Từ câu 1 đến câu 4) (2 điểm) Khoanh tròn chữ cái đứng trước phương án em cho là đúng:
Câu 1: Chọn khai báo hợp lệ:
A. Var a,b: array[1 .. 6.5] of real; C. Var a,b: array[1 : 10] of Integer;
B. Var a,b: array[1 .. 100] of real; D. Var a;b: array[1 .. 100] of real;
Câu 2: Sau khi thực hiện đoạn chương trình sau, giá trị của biến S bằng bao nhiêu:
s:=0;
for i:=1 to 5 do s := s+i;
A. 11 B. 55 C. 15 D. Một kết quả khác
Câu 3: Để viết giá trị của các phần tử trong mảng a ra màn hình câu lệnh nào sau đây đúng
A) writeln(a[i]); B) writeln(a); C) write[a[i]]; B) write[a(i)];
Câu 4: Hãy tìm hiểu đoạn chương trình sau đây.
j:=3; k:=2; While i<=6 do
Begin j:=j+1; k:=k+j; end;
Write(k);
Sau khi thực hiện đoạn chương trình trên, lệnh Writeln in ra màn hình giá trị của k là:
A. 23 B. 30 C. 27 D. Một kết quả khác
Câu 5: (2 điểm) Để tính tổng S=1/2+1/4 + 1/6 + … +1/ n đoạn lệnh nào Đ (đúng), S (sai) :
A) i:=1 while iBegin if ( i mod 2)<> 0 then S:=S + 1/i;
i:= i +1; end;
B) i:=0 while iBegin S:=S + 1/i; i:= i +2; end;

C) For i:=1 to n do
if ( i mod 2)=1 then S:=S + i;
 D) i:=2 while iBegin if S:=S + 1/i; i:= i +2; end;

Câu 6: (2 điểm)Điền Đ (đúng) S (sai) các ô KQ, nếu câu nào sai thì giải thích vì sao?
Câu
Kết quả
Giải thích

a) if a>b then max:=a; else max:=b;



b) var X: Array[5..10] :Real;



c) x:=10; while x=10 do x := x*1;



d) for i:=1.5 to 10 do m:=m + 1.5;



Câu 7: (2 điểm) Viết chương trình tính tổng của các số chia hết cho 2 và tích các số không chia hết cho 5 trong các số từ 1 đến n. Trong đó n là số nguyên nhập từ bàn phím.
Câu 8: (2 điểm) Gạch chân dưới những câu lệnh em cho là sai rồi sửa lại chương trình đó cho đúng:
Program Tinhtich;
Uses crt
Var N. i: real;
S: integer;
BEGIN
Clrscr;
Write(‘Nhap vao so N =’ ); Readln(N);
S:=1;
For i:=1 to N do S=S*1/i;
Writeln(‘Tich cua’,N,’so dau tien s = ‘ s)
Readln
END.


























Trường THCS Thành Cổ BÀI KIỂM TRA HỌC KÌ II năm học 2010-2011
Môn: Tin 8
Ngày thi ...........................
Họ và tên:………………………………………… Lớp 8

Điểm
Lời phê của giáo viên

( Từ câu 1 đến câu 4) (2 điểm) Khoanh tròn chữ cái đứng trước phương án em cho là đúng:
Câu 1: Chọn khai báo hợp lệ:
A. Var a,b: array[1.5 .. 6.5] of real; C. Var a,b: array
* Một số tài liệu cũ có thể bị lỗi font khi hiển thị do dùng bộ mã không phải Unikey ...

Người chia sẻ: Đức Tịnh
Dung lượng: 73,00KB| Lượt tài: 1
Loại file: doc
Nguồn : Chưa rõ
(Tài liệu chưa được thẩm định)