Bài giảng Tin học Lớp 8 - Bài: Ôn tập lệnh "For ... do", "While ... do"

ÔN TẬP 
LỆNH FORDO, WHILEDO 
TRƯỜNG THCS PHONG PHÚ 
TIN HỌC 8 
Câu 1 : Giá trị trả về của a khi thực hiện khối lệnh sau là gì? 
	 a := 1; 
	while a < 3 do a:= a+ 1; 
a. 2.	 b . 3. 	 c . 4.	 d. 5 
a 
2 
3 
1 
a := 1; 
while a < 3 do a:= a+ 1; 
= 1 +1 
< 3 
 
2 
2 
= 2 +1 
< 3 
 
3 
3 
< 3 
 
Sai 
Kết quả: a=3 
Câu 2 : Giá trị trả về của s khi thực hiện khối lệnh sau là gì? 	 	 s := 0; 
	For i:=1 to 3 do s:= s+ i; 
a. 5.	 b . 6. 	 c . 4.	 d . 7 
i 
s 
1 
2 
Kết quả: s=6 
s := 0; 
For i:=1 to 3 do s:= s+ i; 
1 
1 
= 0 + 1 
3 
= 1 + 2 
+ 
3 
6 
= 3 + 3 
3 
+ 
6 
i = 1 
i = 2 
i = 3 
Câu 3: Giá trị trả về của b khi thực hiện khối lệnh sau là gì? 	 	 b := 0; 
	while b < 2 do writeln(b); 
a. 1.	 b . 2. 	 c . 3.	 d . Lặp vô hạn 
Khối lệnh sau "do" không làm thay đổi giá trị của biến b 
 Lặp vô hạn 
b := 0; 
while b < 2 do writeln(b); 
0 < 2 
 
0 
Kết quả: 
0 
0 
0 
0 
0 
. 
Câu 4: Giá trị trả về của b khi thực hiện lần lặp thứ nhất của khối lệnh sau là gì? 
	 a:= 2; b := 0; 
	while b < 2 do b:= b+ a; 
a. 1.	b. 2. 	c. 3.	d. Lặp vô hạn 
a:= 2; b := 0; 
while b < 3 do b:= b + a; 
0 
= 0 +2 
< 3 
 
2 
2 
= 2 +2 
< 3 
 
4 
4 
< 3 
 
Sai 
b 
2 
4 
Kết quả giá trị của b khi thực hiện lần lặp thứ nhất là: b=2 
i 
tong 
Câu 5: Biết m:=1; n:=3; tong:=0 . Sau khi thực hiện câu lệnh sau thì biến t o ng có kết quả là bao nhiêu? 
for i:=m to n do tong := tong + i ; 
	a. 10 	 	 b. 7 	 	 c. 6 	 	 d. 5 
for i:= to do	 	; 
1 
3 
1 
1 
t ong:=0 
3 
2 
1 
6 
3 
0 
= 
+ 
1 
tong := tong + i 
+ 
+ 
i = 1 
3 
1 
= 
+ 
2 
i = 2 
6 
3 
= 
+ 
3 
i = 3 
Câu 6 : Cho biết lệnh "Writeln" in ra  màn hình giá trị a và b là bao nhiêu? 
a:=1; b:=2; 
for i:=1 to 5 do a:=a+1; 
b:=b+a; 
writeln( a , '   ' , b ); 
a=4  ;   b=9 	 B. a=4  ;   b=10 	 	 C. a=7  ;   b=10 	 D. a=6  ;  b=8 
b=b+a  b= 2+ 6 =8 
a = 6 
i 
a 
1 
3 
2 
2 
4 
3 
4 
5 
5 
6 
a:=1; b:= 2; 
for i:= 1 to 5 do a := a + 1 ; 
2 
= 1 + 1 
3 
= 2 + 1 
4 
= 3 + 1 
i = 1 
i = 2 
i = 3 
5 
= 4 + 1 
i = 4 
6 
= 5 + 1 
i = 5 
n 
Câu 7: Kết quả của đoạn chương trình dưới đây là gì ? 
n :=5; 
while n>0 do 
       Begin 
          write( n:3 ); 
          n := n - 1; 
     end; 
5  4  3  2  1 	 B. 4 3 2 1 	 C. 1 2 3 4 5 	 D. 1 2 3 4 
5 
3 
4 
2 
1 
n:=5; 
while n>0 do n := n - 1 ; 
5 
= 5 - 1 
> 0 
 
4 
4 
= 4 - 1 
> 0 
 
3 
3 
> 0 
 
Sai 
= 3 - 1 
2 
2 
> 0 
 
= 2 - 1 
1 
1 
> 0 
 
= 1 - 1 
0 
0 
> 0 
 
Program BT1; 
uses crt; 
var i: integer; 
tich: real; 
Begin 
clrscr; 
tich:=1; i:=1; 
while i<=10 do  
Begin 
tich:=tich*i; 
i:=i+1; 
end; 
writeln('Ket qua la: ', tich:10:2); 
readln; 
end . 
( 1)Program BT1; 
(2)   uses crt; 
(3)   var i:integer;  
(4)   tich: real; 
(5)Begin 
(6)   clrscr; 
(7)   tich:=1; 
(8)   for i:=1 to 10 do tich :=tich*i; 
(9)   writeln('Ket qua la: ', tich:10:2); 
(10)readln; 
(11)end . 
Câu 8 : Cho đoạn chương trình Tính tích các số từ 1 đến 10. Viết lại chương trình cho đề bài trên sử dụng câu lệnh lặp While ...do.  
Hướng dẫn: Xem xét, chỉnh sửa lại dòng lệnh (7), (8), có sử dụng câu lệnh ghép 
Câu 9 : Viết chương trình in ra màn hình các số từ 1 đến 20 mà không cần nhập từ bàn phím (sử dụng vòng lặp While...do) 
program BT2; 
uses crt; 
var i: integer; 
Begin 
i:=1; 
while i<=20 do  
Begin 
writeln( i , '     ' ); 
i:=i+1; 
end; 
readln; 
end. 
KIỂM TRA ONLINE 
(LẤY ĐIỂM KT 15P) 
10 CÂU Trắc nghiệm 
Nội dung: Câu điều kiện , 2 dạng câu lệnh lặp và làm việc với dãy số. 
Thời gian làm bài kiểm tra: Từ ngày 13 đến hết ngày 14/04/2020 
Làm bài online qua đường link 
https://forms.gle/iJzWKNbWiKjVYcXb9 
Mỗi HS làm 1 lần. Nộp nhiều lần cũng chỉ tính lần nộp đầu tiên.