kính chào quí thầy cô cùng các em giáo viên dạy bùi quang hà cử nhân tin học tel 0905 807474 tiết học giáo án điện tử môn tin học 8 tuần 30 tiết 57 ngày soạn 06042009 ngày dạy 08042009 bài 9 làm v

Việc gán giá trị, nhập giá trị và tính toán với các giá trị của một phần tử trong biến mảng được.. thông qua thành phần nào.[r]

Giáo viên dạy:

Bài 9 LÀM VIỆC VỚI DÃY SỐ (TT)

III/ TIẾN TRÌNH BÀI DẠY

a) Kiểm tra bài cũ

Thời gian 7 phút

a) KIỂM TRA BÀI CŨ

1 Các Cách khai báo

biến mảng sau đây

trong Pascal đúng hay

a) KIỂM TRA BÀI CŨ

• Em hãy cho biết cách

khai báo mảng trong

a) KIỂM TRA BÀI CŨ

2 Em hãy cho biết

cách khai báo biến

điểm kiểu mảng cho

50 học sinh trong

lớp?

a Var Diem_1,Diem_2,Diem_3,…Diem_50: Real;

b Var Diem: Array[1 50] of

Bài 9 LÀM VIỆC VỚI DÃY SỐ (TT)

2 Ví dụ về biến mảng(tt)

Ví dụ 2 Mỗi học sinh có

thể có nhiều điểm theo

từng môn: điểm Toán,

điểm Văn, điểm Lí,…

Để xử lí đồng thời các

loại điểm này ta có thể

khai báo nhiều biến

mảng:

Var DiemToan: Array[1 50]

of real;

Var DiemVan: Array[1 50]

of real;

Var DiemLi: Array[1 50] of real;

b) Dạy nội dung bài mới(30 phút)

Hình 41

For i:=1 to 5 do readln(a[i]); For i:=1 to 50 do

readln(DiêmLi[i]);

Việc gán giá trị, nhập giá trị và tính toán với các giá trị của một phần tử trong biến mảng được

thông qua thành phần nào?

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

Ví dụ 3 Viết chương trình nhập N số nguyên từ bàn phím và in ra màn hình số nhỏ nhất và số lớn nhất N được nhập từ bàn phím

* Công việc:

+ Xác định bài toán

+ Xây dựng thuật toán

+ Viết chương trình

XÁC ĐỊNH BÀI TOÁN

- INPUT: N số nguyên (n1, n2, n3, …nn)

- OUTPUT: Giá trị max:= max{n1, n2, n3, …nn} Giá trị min:= min{n1, n2, n3, …nn}

XÂY DỰNG THUẬT TOÁN

* Thuật toán tìm giá trị lớn cho n

Bước 6 kết thúc thuật toán.

* Thuật toán tìm giá trị lớn và nhỏ nhất cho N số

Bước 1 max←a1; min←a1; i←1

Bước 6 In kết quả tìm được ra màn hình

Bước 7 kết thúc thuật toán.

if max<a[i] then max:=a[i];

if mix>a[i] then mix:=a[i];

end;

VIẾT CHƯƠNG TRÌNH

{*In kết quả ra màn hình*}

writeln(‘So lon nhat la max= ’,max);

writeln(‘So lon nhat la max= ’,max);

readln

end

c) CỦNG CỐ VÀ LUYỆN TẬP (6 phút)

Bài tập 4 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?, vì sao?

Var N: integer;

A: array[1 N] of real;

Đáp án

ĐÁP ÁN:

Máy tính không thực hiện được

Vì chỉ số cuối chưa có giá trị cụ thể, số lượng

phần tử = <chỉ số đầu > - <chỉ số cuối>

THỜI GIAN SUY NGHĨ 6 PHÚT BẮT ĐẦU

d) HƯỚNG DẪN HỌC SINH TỰ HỌC Ở NHÀ(1 phút)

Bài tập 5 Viết chương trình Pascal sử dụng biến mảng để nhập từ bàn phím các phần tử của một dãy số Độ dài của dãy cũng được nhập từ bàn phím

GIỜ HỌC ĐÃ KẾT THÚC XIN CẢM ƠN QÚI

THẦY CÔ CÙNG CÁC EM