Bài 11. Kiểu mảng

Chia sẻ bởi Lê Hữu Phước | Ngày 10/05/2019 | 111

Chia sẻ tài liệu: Bài 11. Kiểu mảng thuộc Tin học 11

Nội dung tài liệu:

KIỂU MẢNG
BÀI 11
I/KIỂU MẢNG MỘT CHIỀU 
Định Nghĩa
Dãy hữu hạn các phần tử cùng kiểu
Mỗi phần tử có một chỉ số
Cách thức xác định:
Tên mảng
Số lượng phần tử
Kiểu dữ liệu của PT
Cách khai báo
Cách tham chiếu
Cách khai báo:
Trực tiếp: var :array [kiểu chỉ số] of ;
Td: var A : array[1..5] of integer;
Gián tiếp: type = array[kiểu chỉ số] of
Var :;
Td : type Mang1 = array[1..5] of integer;
Var A : Ma ng1;
Môt số ví dụ:
Nhập và xuất một mảng gồm n phần tử:
Cách khai báo trực tiếp
program Mang5;
uses crt;
const N = 5;
var Mang: array[1..N] of integer;
i:integer;
begin
clrscr;
for i:=1 to N do
begin
write(`Nhap phan tu thu `,i,` = `);
readln(Mang[i]);
end;
write(`Cac phan tu trong mang: `);
for i:=1 to N do
write(Mang[i]:3);
readln
end.
Cách khai báo gián tiếp
program Mang5;
uses crt;
const N = 5;
type Mang1 = array [1..N] of integer
var Mang: Mang1;
i:integer;
begin
clrscr;
for i:=1 to N do
begin
write(`Nhap phan tu thu `,i,` = `);
readln(Mang[i]);
end;
write(`Cac phan tu trong mang: `);
for i:=1 to N do
write(Mang[i]:3);
readln
end.
II/KIỂU MẢNG HAI CHIỀU
Mỗi phần tử có một chỉ số
Bảng các phần tử cùng kiểu
Cách thức xác định:
Tên
Số lương phần tử
Kiểu dữ liệu
Cách khai báo
Cách tham chiếu
Khai báo:
Trực tiếp:
Var : array [,] of ;
Td: var A: array[1..3,1..4]of integer;
Gián tiếp:
type =array [,] of kiểu phần tử;
var : ;
td: type Bang1 = array[1..3,1..4] of integer
var A : Bang1;
Một số ví dụ:
Đưa ra màn hình bảng nhân
Cách khai báo trực tiếp:
program BangNhanA;
uses crt;
const N = 4;
M = 5;
var B : array[1..N,1..M] of integer;
i,j:integer;
begin
clrscr;
for i:=1 to N do
for j:=1 to M do
B[i,j] := i*j;
writeln(`Bang Nhan : `);
for i:=1 to N do
begin
for j:=1 to M do
write(B[i,j]:3);
writeln;
end;
readln
end.
Cách khai báo gián tiếp
program BangNhanB;
uses crt;
const N = 4;
M = 5;
type BangNhan = array[1..N,1..M] of integer;
var B: BangNhan;
i,j:integer;
begin
clrscr;
for i:=1 to N do
for j:=1 to M do
B[i,j] := i*j;
writeln(`Bang Nhan : `);
for i:=1 to N do
begin
write(B[i,j]:3);
for j:=1 to M do
writeln;
end;
readln
end.
Bài tập ôn :
Nhập và xuất mảng B gồm 7số
* Một số tài liệu cũ có thể bị lỗi font khi hiển thị do dùng bộ mã không phải Unikey ...

Người chia sẻ: Lê Hữu Phước
Dung lượng: | Lượt tài: 0
Loại file:
Nguồn : Chưa rõ
(Tài liệu chưa được thẩm định)