`-` Ta có cú pháp câu lệnh For ... do 

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

`->`Lỗi sai từ khóa "Then" thay vì "Do" như trong cú pháp

`->` Lỗi ngữ nghĩa :

`+` Chưa xuất giá trị của biến s

`+` Khai báo S thuộc Integer : khi chạy, S sẻ trả về 0 nếu chạy với các giá trị 100,1000, ...

    `->` Ảnh 1 chứng minh

`***` Lưu ý : trước từ khóa End không cần chấm phẩy

`=>` Sửa + Test : ảnh 2 

var i: integer ; s : real ;
begin
s :=1 ;
for i:=1 to 100 do
s := s * i ;
writeln(s:0:0);
readln
end.

Sai ở dòng thứ 3 vì cú pháp là For..to..do chứ không phải then
Sai ở dòng thứ 4 vì chương trình này in ra giá trị của s chứ ko phải chữ "s" 
Các dòng còn lại đúng