Ôn tập môn Tin học Lớp 8 - Bài thực hành 5 : Sử dụng lệnh lặp for ... do

1 
NỘI DUNG HỌC TẬP MÔN TIN HỌC KHỐI 8 
( DÀNH CHO CÁC EM HỌC SINH 
TRONG THỜI GIAN NGHỈ PHÒNG DỊCH CORONA ). 
BÀI THỰC HÀNH 5 . SỬ DỤNG LỆNH LẶP FOR ... DO 
2 
* Ví dụ 2: Tính tổng của 100 số tự nhiên đầu tiên: S= 1 + 2 + ... + 100 
3 
4 
3. ÁP DỤNG : 
a) BÀI TẬP 1: Viết chuong trình tính tổng N số tự nhiên đầu tiên, với N được nhập 
vào từ bàn phím. ( trong ví dụ 2 là N = 100) 
b) BÀI TẬP 2 : Viết chương trình ghi nhận các vị trí của quả trứng rơi từ trên cao 
xuống như trong hình vẽ sau đây: 
ta dùng lệnh lặp FOR .. DO như sau: 
5 
Program Tinh_Giai_Thua; 
uses CRT; 
var N, i : Integer; 
 P : longint; 
Begin 
 clrscr; 
 writeln(‘ Nhap vao so tu nhien N = ‘ ) ; readln(N); 
 P:=1; 
For i:=1 to N do P := P * i ; 
writeln( ‘ Ket qua’, N, ’ ! = ’ , P ); 
readln; 
End. 
c) 
BÀI TẬP 3: Viết chuong trình tính tích sau đây Tích = 1.2.3.4....N = N ! (đọc là N giai 
thừa). Với số tự nhiên N được nhập vào từ bàn phím. 
N ! = 1.2.3 ... N 
 = N. (N-1). (N-2) ... 3 .2 .1 
VD: 1! = 1; 2 != 2.1=2; 
3 != 3.2.1=6; 4 != 4.3.2.1=24 
100 ! = 100.99.98... 3.2.1 
* Trong đoạn chương trình ta sẽ 
dùng biến P để tính tích N ! và 
gán kết quả vào biến P. 
6 
a) BÀI TẬP 1: Em hãy gõ chuong trình trong Bài tập 1 mục áp dụng ở trên và 
thay vào lần lượt N =3; 4; 5 và viết lại vào vở : Chương trình + Kết quả . 
b) BÀI TẬP 2: Em hãy gõ chuong trình trong Bài tập 3 ở mục áp dụng ở trên và 
thay vào lần lượt N = 1; 2; 3; 4; 5; 6; 7 . viết lại vào vở : Chương trình + Kết quả 
tính ra được trong các lần thay đó. 
c) BÀI TẬP 3: Viết chuong trình In ra màn hình bảng cửu chuong nhân 8 như 
trong hình vẽ bên. 
Nhap so N = 8 
Bang nhan 8 
 8 x 1 = 8 
8 x 2 = 16 
8 x 3 = 24 
8 x 4 = 32 
8 x 5 = 40 
8 x 6 = 48 
8 x 7 = 56 
8 x 8 = 64 
8 x 9 = 72 
 8 x 10 = 80 
4) LUYỆN TẬP: 
7 
d) BÀI TẬP 4: 
c) Chạy chương trình trên với giá trị nhập vào lần lượt là: N =1; 2; 3; ... ;10 
Viết vào vở kết quả thu được trên màn hình.