Câu 1:

Lệnh lặp với số lần biết trước:

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, giá trị đầu, giá trị cuối là các số nguyên với giá trị cuối phải lớn hơn hoặc bằng giá trị cuối

For,to,do là các từ khóa

Biến đếm,Giá trị đầu, Giá trị cuối, câu lệnh là các dữ liệu do người lập trình tạo ra

VD: For i:=1 to 5 do s:=s+i;  `->` Đây là câu lệnh tính tổng 5 số tự nhiên đầu tiên

Lệnh lặp với số lần chưa biết trước:

Cú pháp: While <điều kiện> do <câu lệnh>;

Hoạt động: Câu lệnh sẽ được thực hiện lặp đi lặp lại khi điều kiện cho giá trị đúng và dừng lại khi điều kiện sai thì dừng

While,do là các từ khóa

Điều kiện: Là các phép so sánh toán học

VD: While n<>0 do begin n:=n div 10; d:=d+1; end; `->` Đây là câu lệnh đếm xem n có bao nhiêu chữ số

Câu 2:

uses crt;

var i,n,s: integer;

begin

clrscr;

write ('nhap n: ');  readln (n);

s:=0;

for i:=1 to n do s:=s+i;

writeln ('Tong la: ',s);

readln;

end.

$#Trumtinhoc$

câu 1: 

* cấu trúc câu lệnh lặp với số lần biết trước:

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

trong đó:

for,to,do là các từ khóa

<biến đếm>,<giá trị đầu> và <giá trị cuối> là kiểu số nguyên

ở lần lặp đầu, biến đếm sẽ nhận giá trị bằng <giá trị đầu> sau mỗi lần lặp biến đếm sẽ tự tăng thêm 1 đơn vị cho đến khi bằng <giá trị cuối>

<câu lệnh> là phần được lặp, số lần lặp được biết trước và bằng <giá trị cuối>-<giá trị đầu>+1

VD: for i:=1 to 10 do write('a');

* cấu trúc câu lệnh lặp với số lần chưa biết trước:

while <điều kiện> do <câu lệnh>;

trong đó:

while, do là các từ khóa

<điều kiện> thường là phép so sánh (trả về 1 trong 2 kết quả, đúng hoặc sai)

<câu lệnh> là phần được lặp nếu <điều kiện> trả về giá trị đúng

VD: a:=2; while a<5 do a:=a+1;

câu 2:

uses crt;

var n,i,s: integer;

begin

clrscr;

write('nhap n: '); readln(n);

for i:= 1 to n do

s:=s+i;

write('tong ',n,' so tu nhien dau tien la: ',s);

readln;

end.