Cú pháp: For <biến đếm> := <giá trị đầu> to <giá trị cuối> do <câu lệnh>;

- Ví dụ: Tính tổng các số từ 1 đến n

For i:=1 to n do s:=s+i;

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

- Mô tả thuật toán: Giải quyết bài toán theo trình tự các bước (Các câu lệnh) cần thực hiện

- Viết chương trình: Từ thuật toán đã có, viết chương trình hoàn chỉnh

vd: tinh chu vi hình chữ nhật với chiều dài chiều rộng nhập từ bàn phím
input: chiều dài chiều rộng HCN
output: chu vi hình chữ nhật

Cú pháp: For < Biến đếm > := < Giá trị đầu > to < Giá trị cuối > do < Câu lệnh >;

Giải thích: 

- For, to, do là các từ khóa

- Biến đếm là biến kiểu nguyên

- Giá trị đầu, giá trị cuối là các giá trị nguyên

Ví dụ

Program BTH;

Uses crt;

var a,b,c;longint;

Begin

clrscr;

Write('Nhap so a: ');readln(a);

For b:=1 to a do

c:=c+b;

write(c);

readln;

end.