Câu 1 :

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

- Hoạt động : 

+ Biến đếm lần lượt nhận các giá trị từ giá trị đầu đến giá trị cuối

+ Qua mỗi vòng lặp giá trị biến đếm tăng 1 đơn vị

+ Câu lệnh sau từ khoá do sẽ được thực hiện qua mỗi vòng lặp

Câu 2 :

- Sắp xếp chương trình :

program tinh_tong;

var N, i : integer;

S : integer;

begin

write('Nhap so N = '); s := 0;

readln(n);

for i := 1 to n do

S := s + i;

writeln('Tong cua ', N ,' So tu nhien dau tien s = ', s);

readln

end.

Câu 1:

`@` Cú pháp: for <tên biến đếm>:=<giá trị đầu> to <giá trị cuối> do <câu lệnh>;

`@` Hoạt động:

`  -` Biến đếm sẽ nhận giá trị đầu `->` thực hiện câu lệnh

`  -` Sau mỗi lần lặp biến đếm sẽ tăng 1 dv

`  -` Khi biến đếm có giá trị > giá trị cuối thì kết thúc vòng lặp

Câu 2:

Program tinh_tong;

var N,i: integer;

     S: integer;

begin

write('Nhap so N = '); s:=0;

readln(n);

for i:=1 to n do

s:=s+i;

writeln('Tong cua ',N,' so tu nhin dau tin s=',s);

readln

end.