TRU?NG THPT KHÁNH SƠN
GIÁO ÁN ĐIỆN TỬ
GV: TẠ HOÀNG MINH
KIỂM TRA BÀI CŨ
? Viết chương trình điều tra (nhập số người) tình hình dân số các hộ dân trên đường Lê Duẫn. (100 hộ dân).
Hãy tìm xem 1hộ nào đó có bao nhiêu người?�
Program Dso;
Uses cst;
Var x,S,i: integer;
Begin
Writeln(` Nhap so nguoi tung ho`);
S:=0;
For i:=1 to 100 do
Begin
Write(`ho `,i); readln(x);
S:=S+x;
End;
Writeln(`So dan vua dieu tra la`,S);
Readln;End.
CHƯƠNG IV:
KIỂU DỮ LIỆU CÓ CẤU TRÚC
Tiết 21-22-23-24:
Bài 11: KIỂU MẢNG
CẤU TRÚC BÀI HỌC:
I. Kiểu mảng một chiều.
II. Kiểu mảng hai chiều.
I. Kiểu mảng một chiều.
?1. Khái niệm:
Mảng một chiều là dãy hữu hạn các phần tử cùng kiểu. Mảng được đặt tên và mỗi phần tử của nó có chỉ số.
Với mảng một chiều cần quan tâm đến:
Tên kiểu mảng một chiều.
Số lượng phần tử.
Kiểu dự liệu của phần tử.
Cách khai báo biến mảng.
Cách tham chiếu đến phần tử.
CẤU TRÚC
BÀI HỌC:
I. Kiểu mảng một chiều.
II. Kiểu mảng hai chiều.
dãy hữu hạn
cùng kiểu
?2. Khai báo:
Cách 1: Khai báo trực tiếp:
VAR : ARRAY{kiểu chỉ số} OF ;
Cách 2: Khai báo gián tiếp:
TYPE= ARRAY{kiểu chỉ số} OF ;
VAR :;
Trong đó: kiểu chỉ số là một đoạn số nguyên liên tục n1..n2 và n1<=n2. Kiểu phần tử là kiểu của các phần

I. Kiểu mảng một chiều.
?1. Khái niệm:
Mảng một chiều là dãy hữu hạn các phần tử cùng kiểu. Mảng được đặt tên và mỗi phần tử của nó có chỉ số.
Với mảng một chiều cần quan tâm đến:
Tên kiểu mảng một chiều.
Số lượng phần tử.
Kiểu dự liệu của phần tử.
Cách khai báo biến mảng.
Cách tham chiếu đến phần tử.
Ví dụ: Viết chương trình điều tra tình hình dân số các hộ dân trên đường Lê Duẫn và tìm số người một hộ dân bất kỳ nào trong các hộ vừa nhập. (100 hộ dân).
CẤU TRÚC
BÀI HỌC:
I. Kiểu mảng một chiều.
II. Kiểu mảng hai chiều.
dãy hữu hạn
cùng kiểu
Program Dso;
Uses cst;
Var x,S,i: integer;
Begin
Writeln(` Nhap so nguoi tung ho`);
S:=0;
For i:=1 to 100 do
Begin
Write(`Ho `,i);readln(h[i]x);
S:=S+x;
End;
Writeln(`So dan vua dieu tra la`,S);
Readln;End.
CẤU TRÚC
BÀI HỌC:
I. Kiểu mảng một chiều.
II. Kiểu mảng hai chiều.
Write(`Ho `,i);readln(h[i]x);
Program Dso;
Uses cst;
Var x,S,i: integer;
Begin
Writeln(` Nhap so nguoi tung ho`);
S:=0;
For i:=1 to 100 do
Begin
readln(x);
S:=S+x;
End;
Writeln(`So dan vua dieu tra la`,S);
Readln;End.
CẤU TRÚC
BÀI HỌC:
I. Kiểu mảng một chiều.
II. Kiểu mảng hai chiều.
Bài tập:

Chúc các em học tập tốt.