- Cú pháp: While <điều kiện> do <câu lệnh>;

- Cú pháp: While <điều kiện> do <câu lệnh>;

*Câu lệnh này được thực hiện như sau:
- Bước 1: Kiểm tra điều kiện.
- Bước 2: Nếu điều kiện sai, câu lệnh sẽ bị bỏ qua và việc thực hiện lệnh lặp kết thúc. Nếu điều kiện đúng, thực hiện câu lệnh và quay lại bước 1

- Ví dụ: Tìm n sao cho 1+2+3+...+n < S với S nhập từ bàn phím

sum:=0; res:=1;

While sum<S do
Begin

     sum:=sum+res;

     res:=res+1;

End;

- Xác định bài toán:
     + INPUT: Thông tin đề cho
     + OUTPUT: Đáp án cần tìm

- Cú pháp : While < điệu kiện> do < câu lệnh>;

- Giải thích: điều kiện thường là 1 phép so sánh; câu lệnh có thể là câu lệnh đơn giản hay câu lệnh ghép

- Nguyên tắc hoạt động: b1: kiểm tra điều kiện

                     b2: nếu điều kiện Sai, câu lệnh sẽ bị bỏ qua và việc thực hiện lêngj lặp kết thúc. Nếu điều kiện đúng, thực hiện câu lệnh và quay lại bc 1 

-VD :Để viết chương trình tính tổng T= 1+1/2+1/3+...+1/100 ta có thể sử dụng lệnh lặp vs số lần lặp cho trước:

    T:=0;

    While i<=100 do begin T+1/i; i:=i+1 end;

    Writeln ( T);