I, Trắc nhiệm:
câu 1 - D
câu 2 - A
II, Tự luận:
Câu 1
Cú pháp : for <biến đếm> :=<giá trị đầu> to <giá trị cuối> do <câu lệnh>;
Sử dụng khi cần lặp lại công việc với số lần thực hiện biết trước
Câu 2
program tinh_tong;
var n,i:integer;
s:longint;
begin
write('nhap so n= ');read(n);
for i:=1 to n do
s:=s+i;
writeln('tong cua ',n,' so tu nhien dau tien s= ',s);
readln;
end.
