Kiem tra 45 HKII-Tin 8(so 1)

Trường THCS Đông Thành KIỂM TRA 45’
Lớp: 8/ … Môn: Tin 8
Họ và tên: ……………………………………………………
Điểm
Lời phê




Bài 1: Khoanh tròn chữ cái đứng trước câu đúng nhất: (3đ)
Trong câu lệnh lặp: For i:=1 to 10 do begin … end;
Có bao nhiêu vòng lặp được thực hiện?
A. Không lần nào B. 1 lần C. 10 lần D. 2 lần
Sau khi thực hiện đoạn chương trình Pascal: For i:=1 to 10 do begin … end;
Giá trị của i là:
A. 0 B. 10 C. 11 D. Không xác định
Sau khi thực hiện đoạn chương trình Pascal sau:
For i:=1 to m do
begin
y:=x;
x:=y – 1;
end;
chúng ta sẽ nhận được kết quả nào dưới đây?
A. x=x – m; B. x=i – x; C. x:=x – i; D. i = 0 và x=y – 1;
Trong các hoạt động dưới đây, hoạt động nào sẽ được thực hiện lặp lại với số lần chưa biết trước?
Tính tổng của 20 số tự nhiên đầu tiên.
Nhập các số nguyên từ bàn phím cho đến khi đủ 50 số.
Trừ một số nguyên dương a nhiều lần cho một số nguyên dương b (tức tính các hiệu a – b, a – 2b, a – 3b, …, a ( b > 0) cho đến khi hiệu thu được nhỏ hơn b.
Nhập các số từ bàn phím và tính tổng cho đến khi lần đầu tiên nhận được tổng lớn hơn 1000 thì kết thúc.
Đoạn lệnh sau đây sẽ cho kết quả gì?
so:=1;
While so < 10 do writeln(so);
so:=so + 1;
A. In ra các số từ 1 đến 9; B. In ra các số từ 1 đến 10;
C. In ra vô hạn các số 1, mỗi số trên một dòng; D. Không phương án nào đúng
Sau khi đoạn chương trình sau được thực hiện, giá trị của x bằng bao nhiêu?
x:=0; tong:=0;
While tong <= 20 do
Begin
Writeln(tong);
tong:=tong + 1;
End;
x:=tong;
 A. 20 B. 21 C. Không xác định được D. 0
Bài 2: Hãy điền Đ/ S (Đúng/Sai) vào ô vuông cho các phát biểu sau đây: (1đ)
( Trong câu lệnh lặp: for := to do ; nếu giá trị đầu nhỏ hơn giá trị cuối thì chương trình dịch sẽ báo lỗi để ta chỉnh sửa lại.
( Không nên thay đổi giá trị của “biến đếm” trong câu lệnh lặp for .. do, ví dụ câu lệnh lặp sau đây là không nên sử dụng: for i:=1 to n do i:=i + 2;
( Câu lệnh sau do trong câu lệnh lặp While .. do có thể không được thực hiện một lần nào nếu ngay từ đầu, điều kiện điều khiển vòng lặp có giá trị “Sai”.
( Mọi câu lệnh lặp for .. do đều có thể thay thế một cách thích hợp bởi câu lệnh lặp While .. do
Bài 3: Hãy ghép mỗi ý ở cột A (Đoạn chương trình Pascal) với một ý ở cột B (Kết quả) sao cho thích hợp (1đ)
A (Đoạn chương trình Pascal)
B (Kết quả)
Cách ghép

1) j:=2; k:=3;
For i:=1 to 5 do j:=j + 1; k:=k + j;
Writeln(j,’ ‘,k);
a) j = 7, k = 28;
1 với …..

2) j:=2; k:=3;
For i:=1 to 5 do
Begin j:=j + 1; k:=k + j; end;
Writeln(j,’ ‘,k);
b) i = 6; j = 7, k = 28;
2 với …..

3) i:=1; j:=2; k:=3;
While i < 6 do i:=i + 1; j:=j + 1; k:=k + j;
Writeln(i:2, j:2,