Page 19 - Tin Học 11 - Chương III

Tin học 11 Tập 2

Gợi ý:

Cách 1: Cách 2:

while (t>0) and (a>0) do repeat

begin t:= t-5;

t:= t-5; a:= a-b;

a:= a-b; sum:= sum+b;
sum:= sum+b; until (t<=0) or (a<=0);

end;

writeln ('So tien toi da Chuong co the rut la: ', sum);

GHI NHỚ:

• Lặp là điều khiển công việc lặp đi lặp lại khi chưa đủ số lần lặp hoặc
khi có một điều kiện nào đó còn đúng.
• Cấu trúc lặp dùng để mô tả thao tác lặp được phân làm hai loại:
 Lặp với số lần biết trước: for-do.

 Lặp với số lần chưa biết trước: while-do, repeat-until.

Không phải con đường khó khăn, mà đúng hơn khó khăn mới chính là con
đường.

It is not the path which is the difficulty; rather, it is the difficulty which is the
path.

Soren Kierkegaard

19