câu 1: 

lệnh lặp với số lần biết trước:

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

VD: for i:=1 to n do s:=s+i;

lệnh lặp với số lần chưa biết trước:

while <điều kiện> do <câu lệnh>;

VD: while k>0 do k:=k div 10;

câu 2:

a. for i:=1 to 10 do writeln('A');   `->` đúng 

b. X:=10; while X=10 do X := X+5;   `->` đúng

c. for i=1.5 to 10.3 do writeln('A');  `->`  sai  `->`  for i:=1 to 10 do writeln ('A');

d. if a>b then max:=a; else max:=b;  `->`  sai  `->`  if a>b then max:=a else max:=b;

Câu 3: Tính số lần lặp lại của các câu lệnh sau:

Công thức tính số lần lặp: giá trị cuối - giá trị đầu + 1

a) For i:=0 to 11 do S:= S + i;    `->`  11-0+1 `->` 12 lần lặp

b) For i:=1 to 20 do S:= S + i;   `->`  20-1+1  `->`  20 lần lặp

c) For i:=100 to 10 do S:= S + i;   `->`  10-100+1  `->`  không hợp lệ 

d) i := 10; While i<=1 do i := i – 1;   `->`  i<=1 thì thực hiện mà i=10  `->` vòng lặp ko thực hiện `->` 0 lần lặp

1. - cú pháp câu lệnh lặp với số lần biết trước:

for(điều kiện):= (giá trị đầu) to (giá trị cuối) do (câu lệnh);

vd: for i:=1 to 10 do writeln('A');

- chưa biết trước:

while (điều kiện) do (câu lệnh);

vd: while i<=1 do i := i – 1;

2. a) đúng

b) đúng

c) sai vì không chứa số thập phân

sửa lại 1,5 → 1 và 10,3 → 10

d) đúng

3. a) 66 vì i=0 → s = 1 .... i=11 → s=66

b) 210 (như câu a)

c) k thực hiện dc vì sai cú pháp

d) 0 vòng lặp