Lợi ích đó là:

- rút gọn việc viết phương trình

- có thể sử dụng câu lệnh lặp để thay thế nhiều câu lệnh

- tiết kiệm thời gian và công sức viết chương trình

Lợi ích của việc sử dụng khai báo biến mảng:
– Rút gọn việc viết chương trình.
– Tiết kiệm nhiều thời gian và công sức viết chương trình.
– Lưu trữ và xử lí nhiều dữ liệu có nội dung liên quan đến nhau một cách hiệu quả.

Phần tử trong mảng nha mn ghi nhầm

vd: 

Program chuongtrinhnhapmang;

var n:integer;

begin

write('Nhap n='); readln(n);

end;

Những từ in đậm là từ khóa

in nghiêng là tên chương trình

uses crt;
var a:array[1..100]of integer;
i,n,t:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
t:=0;
for i:=1 to n do
t:=t+a[i];
writeln('Tong cua day so la: ',t);
readln;
end.

uses crt;

var a:array[1..10]of integer;

n,i,t:integer;

begin

clrscr;

n:=10;

for i:=1 to n do 

  begin

write('A[',i,']='); readln(a[i]);

end;

t:=0;

for i:=1 to n do 

  t:=t+a[i];

writeln(t);

readln;

end.

Biến là đại lượng được đặt tên, dùng để lưu trữ giá trị và giá trị có thể được thay đổi trong quá trình thực hiện chương trình

Cách khai báo biến:

Var <tập biến>: <kiểu dữ liệu>;

Ví dụ:

Var a,b: integer;

t: real;

Bài 1 :

- Giống nhau:

+Biến và hằng điều là đại lượng lưu trữ dữ liệu.

+Hai đại lượng này phải khai báo mới sử dụng được.

Khác nhau:

- Hằng: Giá trị của hằng không thể thay đổi trong quá trình thực hiện chương trình.

- Cách khai báo biến:

Var<tên biến>:<kiểu dữ liệu>;

VD: Var a,b:integer;

C:string;

-Biến: giá trị của biến có thể thay đổi trong quá trình thực hiện chương trình.

_ Cách khai báo hằng:

const <tên hằng>=<giá trị của hằng>;

VD: Const pi=3.14;

Bài2. Giả sử ta đã khai báo một hằng Pi với giá trị 3.14. Có thể gán lại giá trị 3.1416 cho Pi trong phần thân chương trình được không, tại sao?
Trả lời
Không thể gán được, vì một tên hằng không thể nhận một lúc hai giá trị.

uses crt;

var a:array[1..100]of integer;

i,n:integer;

begin

clrscr;

write('n='); readln(n);

for i:=1 to n do 

begin

write('A[',i,']='); readln(a[i]);

end;

readln;

end.