[r]
Trang 1ÔN TẬP KIỂM TRA 1 TIẾT LỚP 8 -HKII
Năm học 2016 - 2017 1) Sau khi thực hiện đoạn chương trình:
s:=0; i:=1;
while i<10 do
Begin
i:=i*2;
s:=s+i;
End;
Thì i=?, s= ?
A) 27; 6
B) 8; 14
C) 16; 30
D) 4; 9
2) Trong đoạn chương trình sau, không đúng ở chỗ nào?
var s, i: integer;
begin
s := 15;
for i := 10 to 10 do
begin
s := s+i;
i:=i+1;
end;
write ('gia tri cua s la',s);
readln
end
A) Dư lệnh gán i:=i+1;
B) Thiếu program
C) Giá trị cuối không được bằng giá trị đầu
D) Tất cả đều sai
3) Sau khi thực hiện xong đoạn chương trình
S := 0;
for i := 1 to 4 do s := s* i; thì kết quả của s là:
A) 1
B) 0
C) 25
D) 24
4) Trong đoạn chương trình sau:
x := 10; while x >5 do x := x - 2;
Vòng lặp thực hiện bao nhiêu lần?
A) 3
B) vô tận
C) 2
D) 1
5) Sau khi thực hiện xong đoạn chương trình
Trang 2S := 1;
for i := 1 to 4 do s := s + i; thì kết quả của s là:
A) 5
B) 11
C) 10
D) 1
6) Sau khi thực hiện xong đoạn chương trình
S := 5;
for i := -10 to 10 do s := s+i; thì kết quả của s là: A) 6
B) 0
C) 10
D) 5
7) Trong đoạn chương trình sau:
x := 5; while (x mod 2<> 0) do x := x+2;
Vòng lặp thực hiện bao nhiêu lần?
A) 0
B) 2
C) vô tận
D) 1
8) Trong đoạn chương trình sau:
var a:integer;
Begin
a:=6;
while a < 7 do writeln(‘b’);
End
Vòng lặp thực hiện bao nhiêu lần?
A) 1
B) vô tận
C) 2
D) 0
9) Sau khi thực hiện đoạn chương trình:
s:=10; i:=8;
while i<8 do
Begin
i:=i+1;
s:=s+2*i;
End;
Thì s=?, i= ?
A) 8; 10
B) 28; 9
C) 10; 8
D) 0; 0
10) Kết quả khi thực hiện đoạn chương trình sau là?
s:=4;
Trang 3While s<7 do
begin
s:=s+1;
write(s);
end;
A) In ra số 4
B) In ra số 7
C) In ra từ số 5 đến số 7
D) In ra từ số 4 đến số 7
11) Sau khi thực hiện xong đoạn chương trình
s := 2;
for i := 1 to 3 do s := s*i; thì kết quả của s là: A) 6
B) 11
C) 10
D) 12
12) Chương trình sau thực hiện điều gì?
Var i: integer;
Begin
For i:=10 to 2009 do
Writeln('Lap trinh Pascal');
End
A) In 2000 câu Lap trinh Pascal lên màn hình B) In 2009 câu Lap trinh Pascal lên màn hình C) In 1999 câu Lap trinh Pascal lên màn hình D) In 10 câu Lap trinh Pascal lên màn hình
13) Trong đoạn chương trình sau:
s:=-9; i:=1;
while s<=5 do
Begin
i:=i+3;
s:=s+i;
End;
Vòng lặp chạy bao nhiêu lần?
A) 1
B) 3
C) vô tận
D) 2
14) Câu lệnh nào sau đây là hợp lệ?
A) For i := 1.5 to 10.5 do writeln('A');
B) For i := 1 to 10 do writeln('A');
C) For i = 1 to 10 do writeln('A');
D) For i := 100 to 1 do writeln('A');
15) Sau khi thực hiện xong đoạn chương trình
S := 5;
Trang 4for i := 1 to 2 do; s := s+2; thì kết quả của s là:
A) 9
B) 2
C) 6
D) 0
16) Sau khi thực hiện xong đoạn chương trình
S := 2;
for i := 3 to 1 do s := s+2; thì kết quả của s là:
A) 6
B) 0
C) 4
D) Chương trình bị lỗi không chạy
17) Sau khi thực hiện đoạn chương trình:
s:=0; i:=1;
while i<=10 do
Begin
i:=i*3;
s:=s+2;
End;
Thì s=?, i= ?
A) 2; 3
B) 4; 9
C) 6; 27
D) 27; 6
18) Câu lệnh While do hoạt động như thế nào?
A) Chương trình kiểm tra điều kiện, nếu điều kiện đúng thì thực hiện câu lệnh, nếu điều kiện sai bỏ qua câu lệnh và kết thúc
B) Chương trình kiểm tra điều kiện, nếu điều kiện đúng hoặc sai thì vẫn thực hiện câu lệnh
C) Chương trình kiểm tra điều kiện, nếu điều kiện đúng thì thực hiện câu lệnh sau
đó quay lại kiểm tra điều kiện tiếp, nếu điều kIện sai bỏ qua câu lệnh và kết thúc
D) Tất cả đều sai
19) Chương nào sau đây không sai
A) Var i: string;
Begin For i:= 1 to 100 do writeln('A'); End
B) Var i: integer;
Begin For i:= 1 to 100 do writeln('A'); End
C) Var i: real;
Begin For i:= 1 to 100 do writeln('A'); End
20) Sau khi thực hiện xong đoạn chương trình
S := 0;
for i := 0 to 0 do s := s+2; thì kết quả của s là:
A) 2
B) 0
C) 4
Trang 5D) 6
21) Trong đoạn chương trình sau:
s:=0; n:=0;
while s>=0 do
Begin
n:=n+1;
s:=s+n;
End;
Vòng lặp chạy bao nhiêu lần?
A) vô tận
B) 1
C) 0
D) 2
22) Sau khi thực hiện đoạn chương trình j := 0; for i := 3 to 3 do j := j + 10; thì giá trị của
j là?
A) 0
B) 6
C) 10
D) 9
23) Trong đoạn chương trình sau, không đúng ở chỗ nào?
var s, i: integer;
begin
s := 15; i:=0;
while s<=15 do
begin
s := s+i;
write ('gia tri cua s la',s);
end;
readln
end
A) Lỗi lặp trình vì điều kiện luôn đúng
B) Thiếu program
C) Tất cả đều sai
24) Chọn câu trả lời đúng nhất?
A) Biến đếm trong câu lệnh for do tự động tăng 1 đơn vị sau mỗi vòng lặp
B) Biến đếm trong câu lệnh While do tự động tăng 1 đơn vị sau mỗi vòng lặp C) Có thể thay thế lệnh lặp For do thay cho lệnh lặp while do
D) Tất cả đều đúng
25) Đoạn chương trình sau in bao nhiêu chữ A trên màn hình: For i := 1 to 10 do
writeln('A');
A) 10
B) 1
C) 9
D) 11
Trang 626) Trong đoạn chương trình sau:
s:=-10; i:=1;
while s<=5 do
Begin
i:=i+3;
s:=s+i;
End;
Vòng lặp chạy bao nhiêu lần?
A) 2
B) 3
C) vô tận
D) 1
27) Trong đoạn chương trình sau:
s:=1; n:=0;
while s<1 do
Begin
n:=n+1;
s:=s+n;
End;
Vòng lặp chạy bao nhiêu lần?
A) 2
B) 0
C) vô tận
D) 1
28) Trong đoạn chương trình sau:
x := 6; while (x mod 2= 0) do x := x+2;
Vòng lặp thực hiện bao nhiêu lần?
A) 2
B) 0
C) vô tận
D) 1
29) Trong đoạn chương trình sau:
s:=0; n:=0;
while s>1 do
Begin
n:=n+10;
s:=s+n;
End;
Vòng lặp chạy bao nhiêu lần?
A) 1
B) 2
C) vô tận
D) 0
30) Trong câu lệnh lặp for i := 1 to 10 do <câu lệnh>; thì câu lệnh được thực hiện bao
nhiêu lần
Trang 7A) 1 lần
B) 0 lần
C) 10 lần
D) 2 lần
31) Vòng lặp For to do là vòng lặp:
A) Vô hạn
B) Biết trước số lần lặp
C) Chưa biết trước số lần lặp
D) Một đáp án khác
32) Trong đoạn chương trình sau:
s:=-2; i:=1;
while s<=15 do
Begin
i:=i+3;
s:=s+i;
End;
Vòng lặp chạy bao nhiêu lần?
A) 1
B) 2
C) vô tận
D) 3
33) Sau khi thực hiện xong đoạn chương trình
s := 2;
for i := 0 to 2 do s := s*2; thì kết quả của s là: A) 6
B) 10
C) 11
D) 16
34) Chọn câu đúng nhất
A) While x=10 do x=8;
B) While x=10 do x:=8;
C) While x=10 do x:=8
D) While x:=10 do x:=8;
35) Trong đoạn chương trình sau:
s:=0; i:=1;
while i<=10 do
Begin
i:=i+12;
s:=s+i;
End;
Vòng lặp chạy bao nhiêu lần?
A) vô tận
B) 2
C) 3
D) 1
Trang 836) Lệnh lặp For to do, trong mỗi vòng lặp, biến đếm thay đổi như thế nào?
A) Tăng 1;
B) Không thay đổi;
C) Tăng một giá trị bất kì;
D) Giảm 1;
37) Câu lệnh GotoXY(a,b) trong Pascal có tác dụng gì?
A) Đưa con trỏ về cột a hàng b
B) Đưa con trỏ về hàng a cột b
C) Không có tác dụng gì
38) Cú pháp vòng lặp While do là?
A) While <Câu lệnh > do <điều kiện >;
B) While <điều kiện> do <Câu lệnh>;
C) While <điều kiện> do <Câu lệnh>
D) Tất cả đều sai
39) Đoạn chương trình sau in bao nhiêu chữ A trên màn hình: For i := 10 to 1 do
writeln('A');
A) Chương trình bị lỗi không chạy được
B) 1
C) 2
D) 10
40) Câu lệnh For to do đúng là:
A) For <biến đếm> := <Giá trị cuối> to <giá trị đầu> do <câu lệnh>;
B) For <biến đếm> = <Giá trị đầu> to <giá trị cuối> do <câu lệnh>;
C) For <biến đếm> := <Giá trị đầu> to <giá trị cuối> do <câu lệnh>;
D) For <biến đếm> := <Giá trị đầu> to <giá trị cuối> do; <câu lệnh>;
41) Lần lượt thực hiện câu lệnh for i := 1 to 3.5 do writeln(i:3:1); sẽ viết ra màn hình?
A) Thứ tự của biến đếm, chiếm 3 chỗ và lấy 1 chữ số sau phần thập phân
B) Chỉ viết số 3.5 mà thôi
C) Viết số 1 rồi viết số 3.5
D) Không thực hiện được vì giá trị của biến đếm có kiểu là Real
42) Sau khi thực hiện xong đoạn chương trình
s := 1;
for i := 1 to 3 do s := s*i; thì kết quả của s là:
A) 10
B) 6
C) 12
D) 11
43) Trong đoạn chương trình sau:
x := 10; while x = 10 do x := x+0;
Vòng lặp thực hiện bao nhiêu lần?
A) 1
B) 2
Trang 9C) vô tận
D) 0
44) Sau khi thực hiện đoạn chương trình j := 0; for i := 2 to 3 do j := j + 3; thì giá trị của j
là?
A) 9
B) 18
C) 3
D) 6
1.C 2.A 3.B 4.A 5.B 6.D 7.C 8.B 9.C 10.C 11.D 12.A 13.B 14.B 15.A 16.D 17.C 18.C 19.B 20.A 21.A 22.C 23.A 24.A 25.A 26.B 27.B 28.C 29.D 30.C 31.B 32.D 33.D 34.B 35.D 36.A 37.A 38.B 39.A 40.C 41.D 42.B 43.C 44.D