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 (476.37 KB, 20 trang )

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

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

Ví dụ:

Viết chương trình nhập
điểm kiểm tra của các học
sinh trong lớp.

- Nhập và lưu điểm
cho một học sinh

Write (‘Nhap diem= ‘); Readln(diem_1);

Khai báo 1 biến như sau:
Var diem_1: real;

- Nhập và lưu điểm cho 2
học sinh

Khai báo 2 biến như sau:
Var diem_1, diem_2: real;

Write (‘Diem hs 1= ‘); Readln(diem_1);
Write (‘Diem hs 2= ‘); Readln(diem_2);

Dãy số và biến mảng

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

Ví dụ:

Viết chương trình nhập
điểm kiểm tra của các học

sinh trong lớp.

- Nhập và lưu điểm
cho một học sinh

- Nhập và lưu điểm cho 2
học sinh

Nhập và lưu điểm cho

50 học sinh thì sao?

?

Khai báo n biến như sau:

Var diem_1, diem_2, diem_3, diem_4, .. , diem_50: real;

Write (‘Diem hs 1= ‘); Readln(diem_1);
Write (‘Diem hs 2= ‘); Readln(diem_2);
Write (‘Diem hs 3= ‘); Readln(diem_3);
Write (‘Diem hs 4= ‘); Readln(diem_4);
……

……

Write (‘Diem hs n= ‘); Readln(diem_50);

Những hạn chế:

Phải khai báo quá nhiều biến.
Chương trình phải viết khá dài.

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

Dãy số và biến mảng

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

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

Em hiểu thế nào là dữ
liệu kiểu mảng ?

?

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

liệu (số nguyên hoặc số thực). Việc sắp thứ tự thực

hiện bằng cách gán cho mỗi phần tử một chỉ số. (số
nguyên).

Vậy em hiểu biến
mảng là gì?

?

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 mảng.

Giá trị của biến mảng là một mảng, tức một dãy số
(số nguyên, hoặc số thực).

Vậy:

Khắc phục những hạn chế:

- Ghép chung các biến trên thành một dãy.

- Đặt chung một tên và đặt cho mỗi phần tử một chỉ số.

Dãy số và biến mảng

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

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

Dãy số và biến mảng

31

Ví dụ

:

A

i 1 2 3 4 5 6

8 12 5 9 17 3

Trong đó:

 Tên mảng:

 Chỉ số:

 Số phần tử của mảng:

 Kiểu dữ liệu của các phần tử:

 Khi tham chiếu đến phần tử thứ i, ta viết A[i]
Ví dụ: A[5]=

A
i

Kiểu số nguyên

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

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

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

2

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

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

mảng trong ngôn ngữ Pascal như sau:

Tên biến

Số lượng pt

Kiểu dữ liệu

chung

Chỉ số đầu

Chỉ số cuối

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

Số phần tử của mảng = chỉ số cuối – chỉ số đầu + 1.

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

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

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

2

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

Var <tên biến mảng>: array[<chỉ số đầu>..<chỉ số cuối>]

of <kiểu dữ liệu>;

Cách khai báo mảng 
trong pascal?

Trong đó:

 Array, of là từ khóa của chương trình.

 Tên biến mảng do người dùng đặt.

 Chỉ số đầu phải <= chỉ số cuối. (Số nguyên)

 Giữa hai chỉ số là dấu ..

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

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

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

2

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

Hãy khai báo các mảng 
sau:

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

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

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

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

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

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?

1/ Mảng Diem

gồm 40 phần tử

thuộc kiểu dữ liệu

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

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

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

2

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

BT2/79:

Các khai

báo biến mảng sau

trong Pascal đúng

hay sai?

BT2/79:

Các khai

báo biến mảng sau

trong Pascal đúng

hay sai?

A. Var X : Array[10,13] of Integer;

B. Var X : Array[5..10.5] of Real;

BT 4 /79: 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?

BT 4 /79: 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

KHƠNG

Lưu ý:

- Số phần tử của mảng = chỉ số cuối – chỉ số đầu + 1

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

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

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

2

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

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

Cú pháp:

Ví dụ1

:

2

5

7

1

10 3 4 5 6 7

Cho mảng A chứa các giá trị sau:

Hãy xác định:

A[1], A[3],

A[5],

A[10] ?

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

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

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

2

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

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

Cú pháp:

Ví dụ2

:

A[3]:=2;

A[4]:=5;

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

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

A[3]=2;

A[4]=5;

A[6]=7

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

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

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

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

2

c) Lệnh nhập giá trị cho biến mảng:

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

Tiếp ví dụ 1 SGK/75. Viết chương trình nhập điểm kiểm tra của các

học sinh trong 1 lớp và in ra điểm cao nhất?

- Yêu cầu 1: Thực hiện việc khai báo các biến diem_1, diem_2,
…,diem_50 bằng biến mảng?

Var

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

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

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

2

c) Lệnh nhập giá trị cho biến mảng:

- Yêu cầu 2: Viết chương trình nhập điểm cho 50 học sinh ?

Write (‘Diem hs 1= ‘); Readln(diem_1);
Write (‘Diem hs 2= ‘); Readln(diem_2);
Write (‘Diem hs 3= ‘); Readln(diem_3);
Write (‘Diem hs 4= ‘); Readln(diem_4);
……

……

Write (‘Diem hs n= ‘); Readln(diem_50);

For i:=1 to 50 do

Begin

write(‘nhap diem hs’,i,’:’);

readln(diem[i]);

End;

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

Vậy cách khai báo và sử 
dụng biến mảng có lợi

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

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

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

2

d. Xuất giá trị của mảng ra màn hình:

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

Max:=diem_1;

If diem_1<diem_2 then max:=diem_2;
If diem_2<diem_3 then max:=diem_3;
……….

If diem_49<diem_50 then ax:=diem_50;

Writeln(‘diem cao nhat la:',max:2:1);

Max:=diem[1];

For i:=2 to 50 do

if diem [i]>Max then Max:=diem[i];

Writeln(diem cao nhat la:‘ , max:2:1);
- Yêu cầu 3: So sánh điểm của học sinh và in ra màn hình điểm cao

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

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

Tìm giá trị lớn nhất
 và nhỏ nhất.

3

Bài tốn:

Viết chương trình nhập điểm thi học kì môn Tin học của một lớp gồm

N học sinh. In ra màn hình điểm thi cao nhất và thấp nhất.

Input:

Output:

Hãy nêu ý 
tưởng tìm số 
lớn nhất và nhỏ

nhất của dãy 
số

Dãy số A gồm điểm của N học sinh

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

Số này lớn

nhất

Số này mới

lớn nhất

ồ! Số này

lớn hơn

Tìm ra số

lớn nhất rồi!

THUẬT TỐN TÌM MAX

MAX

4.5

6.0

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

* Đoạn chương trình

Max:=A[1];

For i:=2 to N do IF A[i] > Max Then Max:=A[i];

Ý TƯỞNG TÌM MAX:

- Đặt giá trị của max=A[1].

- Lần lượt cho i chạy từ 2 đến n, so sánh giá trị A[2] với giá trị của max,

nếu A[2]>max thì max nhận giá trị mới là A[2].

Tương tự ta tìm min bằng cách:

- Đặt giá trị của min=A[1].

- Lần lượt cho i chạy từ 2 đến n, so sánh giá trị A[2] với

giá trị của min, nếu A[2]<min thì min nhận giá trị mới

là A[2].

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

Tìm giá trị lớn nhất và nhỏ nhất.

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

Program vd1;

Uses crt;

Var

A: Array[1..100] of real;
i,n: integer;

Max,min: real;

BEGIN

Clrscr;

write(‘ Nhap vao so học sinh : ’) ;
readln(n) ;

For i := 1 to n do 
Begin

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

End;

Max:=A[1];

For i := 2 to n do

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

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

For i := 2 to n do

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

Writeln(‘ Diem nho nhat la ', Min:5:1) ;
 Readln

END.

Khai báo biến mảng

Nhập vào biến mảng

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

Nhap vao so hoc sinh :

7

Nhap diem hs thu 1 :

7.0

Nhap diem hs thu 2 :

9.0

Nhap diem hs thu 3 :

4.5

Nhap diem hs thu 4 :

6.0

Nhap diem hs thu 5 :

9.5

Nhap diem hs thu 6 :

8.0

Nhap diem hs thu 7 :

5.5

Diem lon nhat la 9.5

Diem nho nhat la 4.5

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

bài 9 làm việc với dãy số

<b>Làm việc với dãy số</b>

<b>?</b>

<b>Làm việc với dãy số</b>

<b>Làm việc với dãy số</b>

<b>?</b>

<b>?</b>

<b>Làm việc với dãy số</b>

<b>31</b>

Ví dụ

:

<b>Làm việc với dãy số</b>

<b>2</b>

<b><sub>a) Cách khai báo mảng trong Pascal:</sub></b>

<i>Ví dụ1: Cách khai báo đơn giản một biến </i>

<i>mảng trong ngôn ngữ Pascal như sau:</i>

Tên biến

Số lượng pt

Kiểu dữ liệu

chung

Chỉ số đầu

Chỉ số cuối

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

<b>Làm việc với dãy số</b>

<b>2</b>

<b>Làm việc với dãy số</b>

<b>2</b>

<b><sub>a) Cách khai báo mảng trong Pascal:</sub></b>

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

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

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

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

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

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

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

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

<b>2/ Mảng A, B gồm 10 </b>

phần tử thuộc kiểu dữ

liệu số nguyên?

<b> 1/ Mảng Diem </b>

gồm 40 phần tử

thuộc kiểu dữ liệu

<b>Làm việc với dãy số</b>

<b>2</b>

<b><sub>a) Cách khai báo mảng trong Pascal:</sub></b>

<b>BT2/79: </b>

Các khai

báo biến mảng sau

trong Pascal đúng

hay sai?

<b>BT2/79:</b>

Các khai

báo biến mảng sau

trong Pascal đúng

hay sai?

A. Var X : Array[10,13] of Integer;

A. Var X : Array[10,13] of Integer;

B. Var X : Array[5..10.5] of Real;

B. Var X : Array[5..10.5] of Real;

<b>BT 4 /79: Câu lệnh </b>

khai báo biến mảng

sau đây máy tính có

thực hiện được

không?

<b>BT 4 /79: Câu lệnh </b>

khai báo biến mảng

sau đây máy tính có

thực hiện được

khơng?

Var N : integer;

Var N : integer;

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

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

<b>Khơng xác định</b>

<b>Khơng xác định</b>

KHƠNG

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

- Số phần tử của mảng = chỉ số cuối – chỉ số đầu + 1

<b>Làm việc với dãy số</b>

<b>2</b>