Page 16 - CHƯƠNG III - TIN HỌC LỚP 11 - NHÓM 4

Tin học 11 Tập 2

Ví dụ: Một người tỉ phú rất thích sách và ông luôn xem rằng số 7 là số may mắn của
ông. Một hôm, ông tổ chức tặng sách miễn phí cho các hộ dân trong vùng, các hộ dân
có số nhà từ 1 tới n. Mỗi hộ dân đều được ông tặng 1 cuốn sách, nhưng nếu hộ dân
nào có số nhà chia hết cho 7 thì hộ đó sẽ được ông tặng 2 cuốn sách. Viết chương
trình nhập vào số nguyên dương n, và xuất ra tổng số sách người tỉ phú tặng cho các
hộ dân.

Gợi ý:
sum:= 0;
for i:= 1 to n do

if (i mod 7 = 0) then sum:= sum+2
else sum:= sum+1;

writeln ('Tong so sach nguoi ti phu da tang: ', sum);

Lặp với số lần chưa biết trước và

câu lệnh while-do, repeat-until:

Câu lệnh Câu lệnh while-do Câu lệnh repeat-until
while <điều kiện> do <câu lệnh>; repeat <câu lệnh>;
Dạng câu lệnh until <điều kiện>;

Trong khi <điều kiện> vẫn đúng Lặp lại <câu lệnh> cho đến
Nguyên tắc thì lặp lại <câu lệnh>. khi <điều kiện> đúng.

Đúng
Điều Sai Câu lệnh
kiện

Sơ đồ Sai
Đúng

Điều
Câu lệnh kiện

16