- điều kiện:
+ Dạng thiếu: if <điều kiện> then <câu lệnh>;
VD: If a>b then write(a);
+ Dạng đầy đủ: if <điều kiện> then <câu lệnh 1> else <câu lệnh 2>;
VD:
If (a mod 2=0) then writeln(a,' la so chan') else writeln(a,' khong chia het cho 2');
- Lặp: For <biến điếm>:= <giá trị đầu> to <giá trị cuối> do <câu lệnh>
VD: for i:=1 to 10 do write(i);
- lặp: while <điều kiện> do <câu lệnh>;
VD:
while i<=100 do
begin
tong:=tong+1/i;
i:=i+1;
end;
- Kiểu mảng:
var <tên biến mảng>:array[<chỉ số đầu..<chỉ số cuối>] of <kiểu dữ liệu>;
VD: var so:array[1..100] of integer;
