2/
a. Sai, dư dấu ";" sau số "10"
b. Sai, vì "10" lớn hơn "1" nên phải dùng "downto"
c. Đúng
d. Sai, giữa số "10" và chữ "for" thứ hai thiếu chữ "do"
e. Đúng
3/
a) j=7,k=10
b) Chương trình lỗi
4/
var i,s:longint;
begin
for i:=1 to 100 do
s:=s+i;
write('Tong la: ',s);
readln
end.
5/
var n,i,s:longint
begin
s:=1;
write('Nhap n: '); readln(n);
for i:=1 to n do
s:=s*i;
write('Tong la: ',s);
readln
end.