Tin học 8 - Tiết 46, 47 - Bài 9. Làm việc với dãy số

Bạn đang xem bản rút gọn của tài liệu. Xem và tải ngay bản đầy đủ của tài liệu tại đây (820.99 KB, 24 trang )

(1)<div class='page_container' data-page=1></div>
(2)<div class='page_container' data-page=2>

KiĨm tra bµi cị

Dữ liệu mảng và biến của mảng gọi là gì ?

- Dữ liệu kiểu mảng: là một tập hợp các phần tử có thứ tự, và mọi
phần tử đều có cùng một kiểu dữ liệu

- Biến mảng: khi khai báo một biến có kiểu dữ
liệu là kiểu mảng, biến đó được gọi là biến

</div>
(3)<div class='page_container' data-page=3>

2. Ví dụ về biến mảng

a.Cách khai báo mảng trong Pascal:

Tuoi

7 6 8 ….

1 2 3 4 …. 40

Var Tuoi :

Chieuca

o

2 3 4 5 …. 20
Var chieucao: array[2..20] of Real;
Chỉ số

array[1..40] of Integer;

Chỉ số

Var Tên mảng : array [<chỉ số đầu> .. <chỉ số cuối>] of <kiểu dữ liệu>;

1.7

1.5 1.65 1.75 …. 1.8

</div>
(4)<div class='page_container' data-page=4>

2. Ví dụ về biến mảng

a. Khai báo mảng một chiều trong Pascal:

Var Tên mảng : array[<chỉ số đầu> .. <chỉ số cuối>] of <kiểu dữ liệu>;

Trong đó:

- Tên mảng: Do người lập trình đặt

- array, of: Là từ khóa của chương trình

- Chỉ số đầu, chỉ số cuối: Là 2 số nguyên, thỏa mãn:

chỉ số đầu ≤ chỉ số cuối giữa hai chỉ số là dấu ..

- Kiểu dữ liệu: Là kiểu của các phần tử, là Integer hoặc Real

- Số phần tử = chỉ số cuối – chỉ số đầu + 1

</div>
(5)<div class='page_container' data-page=5>

2. Ví dụ về biến mảng

a) Cách khai báo mảng trong Pascal:

Ví dụ: Cách khai báo đơn giản một biến mảng trong

ngôn ngữ Pascal như sau:

var Tuoi: array[21..80] of integer;

Tên biến Số lượng phần tử Kiểu dữ liệu chung

Chỉ số đầu Chỉ số cuối

var Chieucao: array[1..50] of real;

</div>
(6)<div class='page_container' data-page=6>

Var Tênmảng: array [<chỉ số đầu>..<chỉ số cuối>] of <kiểu dữ liệu>;

Var Tênmảng: array [<chỉ số đầu>..<chỉ số cuối>] of <kiểu dữ liệu>;
2. Ví dụ về biến mảng

a) Cách khai báo mảng trong Pascal:

Var diem : array[1..40] of real;

Var A: array[1..10] of integer;
B: array[1..10] of integer;

Ví dụ:

Var A ,B: array[1..10] of integer;

2/ Mảng A, B gồm 10 phần tử thuộc kiểu dữ liệu số nguyên?
Hãy khai báo các mảng sau:

1/ Mảng Diem gồm 40 phần tử thuộc kiểu dữ liệu số thực?

</div>
(7)<div class='page_container' data-page=7>

Câu lệnh khai báo biến mảng sau đây máy tính có thực

hiện được khơng?

Var N : integer;

A : array[1..N] of real;

Khơng xác định

2. Ví dụ về biến mảng

KHƠNG

Lưu ý:

- Kích thước của mảng phải được khai báo bằng một con số

cụ thể

a) Cách khai báo mảng trong Pascal:

</div>
(8)<div class='page_container' data-page=8>

Lưu ý:

Kích thước của mảng phải
được khai báo bằng một con

số cụ thể

</div>
(9)<div class='page_container' data-page=9>

2. Ví dụ về biến mảng

a) Cách khai báo mảng trong Pascal:

b) Truy cập đến giá trị phần tử trong mảng:

Tên mảng [Chỉ số]

Cú pháp:

Tênmảng: array [<chỉ số đầu>..<chỉ số cuối>] of <kiểu dữ liệu>;

VD: DiemTin[1]

 Tham chiếu tới phần tử thứ nhất của mảng DiemTin

</div>
(10)<div class='page_container' data-page=10>

2. Ví dụ về biến mảng

b) Truy cập đến giá trị phần tử trong mảng:

Tên mảng [Chỉ số]

Cú pháp:

2 5 7 1 10

3 4 5 6 7

Cho mảng A chứa các giá trị sau:
Ví dụ1:

- Xác định các giá trị của: A[1], A[3], A[5], A[10] ?

A[1], A[10]: khơng xác định

A[3]=2; A[5]=4

</div>
(11)<div class='page_container' data-page=11>

2. Ví dụ về biến mảng

b) Truy cập đến giá trị phần tử trong mảng:

Tên mảng [Chỉ số]

Cú pháp:

A[3]:=2;
A[4]:=5;

A[6]:=A[3]+A[4];

Ví dụ 2:

Cho các câu lệnh sau:

Giá trị của các phần A[3], A[4], A[6] sẽ là bao nhiêu?

A[3]=2
A[4]=5
A[6]=7

- Có thể gán giá trị, đọc giá trị và thực hiện tính tốn với các

phần tử trong mảng

Có thể thực hiện các 
thao tác nào với các 
phần tử trong mảng?

</div>
(12)<div class='page_container' data-page=12>

2. Ví dụ về biến mảng

For i:=1 to 40 do Readln(DiemTin[i]);

Ví dụ: Gán giá trị cho 40 phần tử của mảng DiemTin

For i := … to … do Readln(Tenmang[i]);

DiemTin[1]:=5;

DiemTin[2]:=7;

……… DiemTin[40]:=10;

Hoặc Readln(DiemTin[1]);
Readln(DiemTin[2]);

……… Readln(DiemTin([40]);

Viết chương trình khá dài

Bài 9:

Làm việc với dãy số

</div>
(13)<div class='page_container' data-page=13>

A

n

1. Nhập số phần 
tử của mảng.

Write(‘ Nhap vao so HS:’);
Readln(n);

2. Nhập vào giá trị 
từng phần tử của 
mảng (A[i]).

For i:=1 to n do 
 Begin

write(‘Diem cho HS thu ’ ,i, ’ : ’);
 readln(A[i]);

end;

...

Các bước Thể hiện bằng pascal

với n = 7

9

10

9

6

8

5

7

Sử dụng cấu trúc 
lặp để nhập dữ liệu

- Sử dụng lệnh Read (Readln) kết hợp với For ... do.

2. Ví dụ về biến mảng
c. Nhập giá trị cho mảng

</div>
(14)<div class='page_container' data-page=14>

2. Ví dụ về biến mảng

d. In giá trị các phần tử của mảng:

For i:= … to … do Writeln(Tenmang[i]);

For i:=1 to 40 do Writeln(DiemTin[i]);

8

6

7

6 …. …. …. ….

1 2 3 4 …. i …. 40

DiemTin

Chỉ số

DiemTin[1] = 8

8

Ví dụ: In giá trị của 40 phần tử trong mảng DiemTin

DiemTin[4] = 6

6

</div>
(15)<div class='page_container' data-page=15>

Writeln(‘ Điểm của lớp : ’);
For i:=1 to n do

Write(A[i]:7);

Điểm của lớp:

- Thông báo

- In giá trị của 
từng phần tử

7 5 8 6 9 10 9

Kết quả trên màn hình:

- Sử dụng cấu trúc lặp để in dữ liệu

Sử dụng lệnh Write (Writeln) kết hợp với For ... do.

2. Ví dụ về biến mảng

d. In giá trị các phần tử của mảng:

</div>
(16)<div class='page_container' data-page=16>

Bài 9:

Làm việc với dãy số

3. Tìm giá trị lớn nhất và giá trị nhỏ nhất của dãy số:

Bài tốn: Viết chương trình nhập N số ngun

từ bàn phím và in ra màn hình số nhỏ nhất 
và số lớn nhất.

Em hãy nêu 
thuật tốn để tìm

số nhỏ nhất và 
số lớn nhất trong

dãy số?

THUẬT TỐN

• B1: max:=a; min:=a; i:=1;
• B2: i:= i+1;

• B3: Nếu i > n, chuyển đến

bước 5.

• B4: Nếu ai > max thì max:=ai;

ai < min thì

min :=ai.Quay lai bước 2.

</div>
(17)<div class='page_container' data-page=17>

Program vd1;

Uses crt;

Var

i, n, Max, Min: integer ;
A: Array[1..100] of Integer ;

BEGIN

Clrscr;

write(‘ Nhap so phan tu cua day so: n= ’) ; readln(n) ;

For i := 1 to n do 
Begin

write(‘ Nhap so thu ‘,i,’ : ‘) ;
 readln(A[i]) ;

End;

Max:=A[1];

For i := 2 to n do

If A[i]>Max Then Max := A[i];

Writeln(‘ So lon nhat la max = ', Max) ;
 Min:=A[1];

For i := 2 to n do

If A[i]<Min Then Min := A[i];

Writeln(‘ So nho nhat la Min = ', Min) ;
 Readln ;

END.

Khai báo biến mảng

Nhập giá trị cho mảng

</div>
(18)<div class='page_container' data-page=18>

Nhap so phan tu cua day so: n= 7

Nhap so thu 1 : 7

Nhap so thu 2 : 9

Nhap so thu 3 : 4

Nhap so thu 4 : 6

Nhap so thu 5 : 9

Nhap so thu 6 : 8

Nhap so thu 7 : 5

So lon nhat la Max = 9
So nho nhat la Min = 4

</div>
(19)<div class='page_container' data-page=19>

Củng cố

</div>
(20)<div class='page_container' data-page=20>

Bài tập củng cố

Bài 1: Em hãy chọn đáp án đúng:

A. Dữ liệu kiểu mảng là tập hợp các phần tử
khơng có thứ tự và mọi phần tử có cùng một
kiểu dữ liệu.

B. Dữ liệu kiểu mảng là tập hợp các phần tử có
thứ tự và mỗi một phần tử trong mảng có thể
có các kiểu dữ liệu khác nhau .

C. Dữ liệu kiểu mảng là tập hợp các phần tử có
thứ tự và mọi phần tử có cùng một kiểu dữ

liệu.

</div>
(21)<div class='page_container' data-page=21>

b) Var X: Array[3.. 4.8] of Integer;
c) Var X: Array[10 .. 1] of Integer;
d) Var X: Array[4 .. 10] of Real;

a) Var X: Array[10 , 13] of Real;

Bài 2: Cách khai báo biến mảng sau đây đúng hay sai? 
Khoanh tròn vào chỗ sai (nếu có).

a) Sửa dấu , thành dấu ..
b) Sửa 4.8 thành số nguyên

c) Chỉ số cuối phải >= chỉ số đầu
d) Đúng

Bài 9:

Củng cố

</div>
(22)<div class='page_container' data-page=22>

V

A

R

E A D

R

E A L

M

A

X

N G U

Y

Ê N

1
2
3
4
5

Có 3 chữ cái: Là từ khóa để khai báo biến 
trong chương trình Pascal?

Có 4 chữ cái: Là câu lệnh trong chương trình Pascal 
dùng để dừng chương trình chờ ta nhập giá trị cho biến?

Có 4 chữ cái: Là từ khóa trong chương trình Pascal 
dùng để thể hiện những biến kiểu thực?

Có 3 chữ cái: Là tên của hàm tìm giá trị lớn nhất?

Có 6 chữ cái: Chỉ số đầu, chỉ số cuối trong khai báo mảng
Thường là những số……….?

</div>
(23)<div class='page_container' data-page=23>

- Học bài cũ

- Tìm hiểu thuật tốn tìm giá trị lớn nhất,

nhỏ nhất của dãy số (xem lại ví dụ 6 trang

43 SGK)

- Về nhà làm các bài tập 2, 4, 5 trang 79

SGK

Bài 9:

HƯỚNG DẪN VỀ NHÀ

</div>
(24)<div class='page_container' data-page=24>

Tiết học kết thúc

</div>

Tin học 8 - Tiết 46, 47 - Bài 9. Làm việc với dãy số

<b>KiĨm tra bµi cị</b>

<i> </i>

Tuoi

Chieuca

o

Ví dụ: Cách khai báo đơn giản một biến mảng trong

ngôn ngữ Pascal như sau:

<b>var Tuoi: array[21..80] of integer;</b>

<b>var Chieucao: array[1..50] of real;</b>

Câu lệnh khai báo biến mảng sau đây máy tính có thực

hiện được khơng?

Var N : integer;

A : array[1..N] of real;

<b>2. Ví dụ về biến mảng</b>

<b>Lưu ý:</b>

Tên mảng [Chỉ số]

Tên mảng [Chỉ số]

b) Truy cập đến giá trị phần tử trong mảng:

- Xác định các giá trị của: A[1], A[3], A[5], A[10] ?

A[1], A[10]: khơng xác định

A[3]=2; A[5]=4

<b>2. Ví dụ về biến mảng</b>

b) Truy cập đến giá trị phần tử trong mảng:

Cho các câu lệnh sau:

Giá trị của các phần A[3], A[4], A[6] sẽ là bao nhiêu?

- Có thể gán giá trị, đọc giá trị và thực hiện tính tốn với các

phần tử trong mảng

<b>Bài 9:</b>

<b>A</b>

<b>n</b>

...

<b>với n = 7</b>

9

10

9

6

8

5

7

- Sử dụng lệnh Read (Readln) kết hợp với For ... do.

<b>8</b>

<b>6</b>

<b>7</b>

<b>6 …. …. …. ….</b>

8

6

Sử dụng lệnh Write (Writeln) kết hợp với For ... do.

<b>Bài 9:</b>

<b>Củng cố</b>

<b>Bài tập củng cố</b>

<b>Bài 9:</b>

<b>Củng cố</b>

<b>V</b>

<b>A</b>

<b>R</b>

<b>R</b>

<b>E A D</b>

<b>R</b>

<b>E A L</b>

<b>M</b>

<b>A</b>

<b>X</b>

<b>N G U</b>

<b>Y</b>

<b>Ê N</b>

<i>- Học bài cũ</i>

<i>- Tìm hiểu thuật tốn tìm giá trị lớn nhất, </i>

<i>nhỏ nhất của dãy số (xem lại ví dụ 6 trang </i>

<i>43 SGK)</i>

<i>- Về nhà làm các bài tập 2, 4, 5 trang 79 </i>

<i>SGK</i>

<b>Bài 9:</b>

HƯỚNG DẪN VỀ NHÀ

Tiết học kết thúc

Tài liệu liên quan

Tài liệu bạn tìm kiếm đã sẵn sàng tải về