`a)`

`-` Từ While sai chính tả

`-` Sau While là một điều kiện

`-` Câu lệnh gán sai chính tả

`-` Thiếu chấm phẩy

`->` S:= 7 ;  While S=10 do S := S + 2 ;

`b)`

`-` Giá trị đầu phải nhỏ hơn hoặc bằng giá trị cuối

`->` For i := 1 to 100 do Writeln('a') ;

`c)`

`-` Sau do là một câu lệnh

 `-` (Trong câu lệnh C, sau While là phép so sánh (Dấu bằng = ))

`->` a := 5 ;  While a=5 do a := a + 1 ;

`d)`

`-`Có nhiều câu lệnh sao Do thì ta dùng câu lệnh ghép gộp các câu lệnh lại với nhau

`-`Thiếu chấm phẩy

`->` S := 0 ; n := 0 ; While s <= 15 do  begin n := n + 1; s  := s + n ; end ;

a. s := 7; whiel s := 10 do s ;= s + 2

- Sai từ khoá while

- Sai điều kiện s := 10

- Sai dấu gán s ;= s + 2

- Thiếu chấm phẩy cuối lệnh

⇒ s := 7; while s = 10 do s := s + 2;

b. for i := 100 to 1 do writeln ('a);

- Giá trị đầu (100) > Giá trị cuối (1)

- Thiếu dấu nháy đơn in 'a'

⇒ for i := 1 to 100 do writeln ('a');

c. a := 5; while a = 5 do a = a + 1;

- Sai dấu gán a = a + 1

⇒ a := 5; while a = 5 do a := a + 1;

d. s := 0; n = 0; while s <= 15 do n := n + 1; s := s + n

- Thiếu dấu chấm phẩy cuối lệnh

- Chưa đưa 2 lệnh sau do vào begin .. end, nếu ko xảy ra lặp vô hạn

⇒ s := 0; n = 0; while s <= 15 do begin n := n + 1; s := s + n; end;