TRÖÔØNG THCS SUOÁI DAÂY TIN HOÏC 8 Câu 11: 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?)[r]
(1)TRƯỜNG THCS SUỐI DÂY TIN HỌC 8
Tuần :29 Ngày dạy:29/3/2010
Tiết:56
KIỂM TRA 1TIẾT
MƠN: TIN 8
A /MA TRẬN ĐỀ
Các cấp độ tư Nội dung
Nhận biết Thông hiểu Vận dụng Tổng
TN TL TN TL TN TL
Câu lệnh điều kiện
2 0
.5ñ
2 0
.5đ
4 1đ Câu lệnh lặp
3 0
.75ñ
2 0
.5ñ
1 0
.25ñ 2
3.5ñ
8 5đ Lặp với số lần chưa biết trước 1 0
.25ñ
1 0.25ñ
2 3.5ñ
4 4
ñ
Tổng 6
1.5đ 5
1.25đ 5
7.25ñ 16
10đ B
NỘI DUNG ĐỀ
I / Trắc nghiệm(3 đ)
Khoanh trịn chữ đầu câu trả lời mà em cho nhất
Câu 1: Sau thực chương trình sau, giá trị biến j bao nhiêu? j := 0;
For i := to j := j + 2; A B C D 10
Câu 2: Câu lệnh hợp lệ câu lệnh pascal sau? A for i := 10 to writeln(‘A’);
B for i := 1.5 to 10.5 writeln(‘A’); C for i = to 10 writeln(‘A’);
D for i:= to 10 writeln(‘A’);
Câu 3: Trong đoạn chương trình sau, có câu lệnh lặp lại? S := 0; dem := 0; n := 10;
While dem > n Begin
dem := dem +1;
Write(‘ Nhap so X’,dem,’=’);Readln(X); S := S + X ;
(2)TRƯỜNG THCS SUỐI DÂY TIN HỌC 8 end;
A B C D
Câu 4: Câu lệnh hợp lệ câu lệnh pascal sau? A X:= 10; While X := 10 X:= X + 5;
B X:= 10; While X = 10 X = X + 5; C X:= 10; While X = 10 X:= X + 5;
D X:= 10 While X = 10 X:= X + 5;
Câu 5: Trong ngôn ngữ lập trình Pascal câu lệnh sau đúng: A If <điều kiện> then <câu lệnh 1> else <câu lệnh 2>
B If <điều kiện> then <câu lệnh 1>; else <câu lệnh 2>; C If <điều kiện> then <câu lệnh 1> else <câu lệnh 2>; D If <điều kiện> ; then <câu lệnh 1> else <câu lệnh 2>;
Câu 6: Trong ngơn ngữ lập trình Pascal, phát biểu sau với câu lệnh rẽ nhánh If…then…?
A Nếu sau then muốn thực nhiều câu lệnh lệnh phải đặt hai dấu ngoặc đơn
B Nếu sau then muốn thực nhiều câu lệnh lệnh phải đặt Begin End
C Nếu sau then muốn thực nhiều câu lệnh lệnh phải đặt
Begin End;
D Nếu sau then muốn thực nhiều câu lệnh lệnh phải đặt Begin End.
Câu 7: Trong ngôn ngữ lập trình Pascal câu lệnh sau đúng: A If a=5 then a:=d+1; else a:=d+2;
B If a=5 then a:=d+1else a:=d+2; C If a=5 then a=d+1; else a=d+2; D If a=5 then a:=d+1else a:=d+2
Câu 8: Trong ngôn ngữ Pascal, muốn kiểm tra đồng thời ba giá trị A, B, C có lớn hay không ta viết câu lệnh If cho nhất?
A If A, B, C > then…
B IF (A>0) and (B>0) and (C>0) then… C IF A>0 and B>0 and c>0 then… D IF (A>0) or (B>0) or (c>0) then…
Câu 9: Trong ngôn ngữ Pascal, mặt cú pháp câu lệnh sau với cấu trúc lặp For có lệnh con?
A For i:=1 to 100 a:=a-1; B For i:=1 to 100 do; a:=a-1; C For i:=1 to 100 a:=a-1 D For i:=1; to 100 a:=a-1; Câu 10: Trong lệnh lặp For…to…do Pascal, vòng lặp biến đếm thay đổi nào?
A +1; B -1;
C Một giá trị bất kì; D Một giá trị khác 0;
(3)TRƯỜNG THCS SUỐI DÂY TIN HỌC 8 Câu 11: Trong câu lệnh lặp for i:=1 to 10 begin…end; câu lệnh ghép thực lần (nĩi cách khác, vịng lặp thực hiện?)
A Không lần B lần
C lần D lần
Câu 12: Trong ngơn ngữ Pascal, đoạn chương trình sau đưa hình kết gì?
For i:=10 to write (i,’ ‘);
A 10 B 10 C Đưa 10 dấu cách D Khơng đưa kết II/ Tự luận (7 điểm)
Câu 13: (2đ) Hãy nêu tác dụng câu lệnh lặp lập trình? Cho ví dụ hoạt động lặp sống mà em biết
Câu 14: (2đ) Hãy tìm hiểu thuật tốn sau, máy tính thực vòng lặp? Khi kết thúc giá trị S bao nhiêu? Viết chương trình pascal thể thuật toán
Thuật toán:
Bước 1: S 10, X 0.5
Bước 2: Nếu S ≤ 5.5, chuyển sang bước Bước 3: S S – X quay lại bước
Bước 4: Thơng báo S kết thúc thuật tốn
Câu 15:
Em viết chương trình tính tổng số tự nhiên từ 100 đến 1000 ( Sử
dụng vòng lặp xác định vịng lặp khơng xác định)(
3đ)
III/ HƯỚNG DẪN CHẤM A/ Trắc nghiệm(3 đ)
Caâu 10 11 12
Đáp
aùn D D A C C C B B A A
Khơng có đáp án D Điểm 0,25 0,25 0,25 0,25 0,25 0,25 0,25 0,5 0,25 0,25 0,25 0,25 II/Tự luận (7 điểm)
Câu
Nội dung
Điểm
13 Tác dụng câu lệnh lặp lập trình làm đơn giản giảm nhẹ cơng sức người viết chương trình
Cho ví dụ hoạt động lặp sống
1đ 1đ 14 vòng lặp ,
S= 5.5
program Tinh_toan; var X, S, Dem : integer; Begin
S:=10; X:=0.5 While S >5.5
0.25ñ 0.25ñ 0.25ñ 0.25ñ
(4)TRƯỜNG THCS SUỐI DÂY TIN HỌC 8 Begin
S:= S – X
Dem := Dem + 1; End;
Writeln(‘thuc hien’,dem,’vong lap va S=’,S); Readln
End
0.25ñ 0.25đ 0.25đ 0.25đ 15
Viết chương trình tính tổng số tự nhiên từ 100 đến 1000
* Vòng lặp xác định:
Program tinh_tong;
Var i, S: Integer;
Begin
For i:= 100 to 1000 do
S:= S + i;
Wirteln(‘ tong cac so tu nhien tu 100 den 1000 la:’,S);
Readln;
End.
* Vịng lặp khơng xác định:
Program tinh_tong;
Var i, S: Integer;
Begin
i:= 100;
S:= 0;
While i > 1000 do
S:= S + i;
i:= i + 1;
Writeln(‘ Tong cac so tu nhien tu 100 den 1000
la:’,S);
Readln;
End.
0.25ñ 0.25ñ 0.25ñ 0.25ñ 0.25ñ 0.25ñ 0.25ñ 0.25ñ 0.25ñ 0.25ñ 0.25ñ 0.25ñ