Giáo án môn Tin học khối 11 - Bài 12: Thực hành 3 (tiết 2)

- Duyệt qua tất cả các phần tử của mảng để xử lí từng phần tử - Cung cấp cho học sinh ba thuật toán cơ bản và đơn giản thường gặp với dữ liệu kiểu mảng.. Kĩ năng: - Nâng cao kĩ năng sử d[r]

Ngày soạn: 09/11/09

Ngày giảng: 13/11/09

Bài 12 THỰC HÀNH 3 (Tiết 2)

I Mục tiêu

1 Kiến thức:

- Nõng cao !" # $% &' ()* $+ cõu ,- và ()* $+ ! 0 &1 , - thong qua - tỡm

 04 5 *% cỏc 7 trỡnh cú $9:

Khai bỏo ! 0 &1 , - (<:

- AB &1 , - cho (<4 ? ra màn hỡnh C $+ và 6BD *% E (<:

- F-* qua *G* < cỏc BD *% E (< ?0 H% lớ *I BD *%

- Cung GB cho J sinh ba *A* toỏn 7 =< và ?7  < * KB L &1 , - ! 0

(<:

2 Kĩ năng:

- Nõng cao !" # $% &' ()* $+ ,- ! 0 &1 , - (< ()*  M trong ,AB trỡnh, '

*0

+ Khai bỏo ! 0 &1 , - (< ()*  M:

+ ABOHG* &1 , - cho (<:

+ F-* qua *G* < cỏc BD *% E (< ?0 H% lý *I BD *%:

-+ Tớnh *Q cỏc BD *% * < món ? M ! - nào ?8:

+ + Tỡm BD *% ,L G*4 S G*:

3.Tư duy:

- T% &' (< ?0  <( ?) U !M dài dũng E cõu ,- for to do …

4 Thỏi độ:

- Gúp BD rốn ,- tỏc phong, * duy ,AB trỡnh: Z giỏc, tich Z4 E ?) và sỏng

`

II Chuẩn bị bài giảng

1) Phương tiện:

- HS: Những hiểu biết về mảng 1 chiều và mảng 2 chiều.

2) Phương pháp dạy học

- Gợi mở vấn đáp

- Đàm thoại

Tiết 26

- Đặt vấn đề

III Tiến trình dạy học

1) Kiểm tra bài cũ:

-2) Nội dung bài giảng:

Hoạt động 1 Tỡm Max

1 G ()* vớ &' *Z * ^  mự tỡm

viờn $S cú kớch *L ,L G* trong ()*

dóy cỏc viờn

toỏn tỡm giỏ *` ,L G*:

- Yờu D nờu *A* toỏn tỡm BD *% cú

giỏ *` ,L G*:

2 Tỡm  0 7 trỡnh tỡm C $+ và giỏ

*` ,L G*:

-

trang 64

program MaxElement;

const Nmax= 100;

type MyArray = array[1 Nmax] of integer;

var A: Myarray;

n,i,j: integer;

begin

write('Nhap so luong phan tu cua day so, N

= ');

readln(N);

for i:=1 to n do

begin

write('Phan tu thu ',i,' = ');

1 Theo dừi vớ &' E giỏo viờn

- So sỏnh

$+ E BD *% ,L G*:

2 Quan sỏt 7 trỡnh, suy " và *< , : program MaxElement;

const Nmax= 100;

type MyArray = array[1 Nmax] of integer;

var A: Myarray;

n,i,j: integer;

begin write('Nhap so luong phan tu cua day so, N = ');

readln(N);

for i:=1 to n do begin

write('Phan tu thu ',i,' = ');

readln(A[i]);

end;

j:= 1;

for i:= 2 to n do if A[i] > A[j] then j:= i;

write('Chi so: ',j, ' Gia tri: ',A[j]:4);

readln

end

-

trình?

-

$% w  nào?

-

C $+ ,L G* ta $% w  nào?

3

ra các C $+ E các BD *% có giá *` ,L

G*:

- S  D  1 ,5 ? 5 7 trình tìm

giá *` ,L G* không?

- S  D thêm ,- nào 1v

- S  ` trí thêm các ,- ?8v

- Yêu

program MaxElement;

const Nmax= 100;

type MyArray = array[1 Nmax] of integer;

var A: Myarray;

n,i,j: integer;

j:= 1;

for i:= 2 to n do if A[i] > A[j] then j:= i;

write('Chi so: ',j, ' Gia tri: ',A[j]:4);

readln end

-  1 ,5 C $+ E BD *% có giá *` ,L G*:

- Phép so sánh a[i]<a[j]

- 0 *[ *Z &-* *I n-1 M 1

3 Theo dõi yêu D4 suy " các câu S ?`

- Có

- - ?0 in ra các C $+ có giá *` =| giá *`

- Sau khi tìm

- T 5 7 trình vào máy Z  -

program MaxElement;

const Nmax= 100;

type MyArray = array[1 Nmax] of integer;

var A: Myarray;

n,i,j: integer;

begin write('Nhap so luong phan tu cua day so, N =

write('Nhap so luong phan tu cua day so, N

= ');

readln(N);

for i:=1 to n do

begin

write('Phan tu thu ',i,' = ');

readln(A[i]);

end;

j:= 1;

for i:= 2 to n do if A[i] > A[j] then j:= i;

write('Chi so: ',j, ' Gia tri: ',A[j]:4);

readln

end

- Yờu D J sinh AB &1 , - vào E

giỏo viờn và bỏo

-

');

readln(N);

for i:=1 to n do begin

write('Phan tu thu ',i,' = ');

readln(A[i]);

end;

j:= 1;

for i:= 2 to n do if A[i] > A[j] then j:= i;

write('Chi so: ',j, ' Gia tri: ',A[j]:4);

readln end

- AB &1 , - vào và thụng bỏo cho giỏo viờn

&1 , - ra

H oạt động 2 Kết thỳc bài thực hành lưu bài

 và thoỏt !S 7 trỡnh , *}* mỏy an

toàn

nghe thày giỏo ra bài *5B M nhà và ~

=` cho bào J (L

3) Củng cố:

f)* $+ *A* toỏn 7 =<

+ Tớnh *Q cỏc BD *% * < món ? M ! - nào ?8:

+ + Tỡm BD *% ,L G*4 S G*:

- Xem ) dung E bài *Z hành $+ 4, sỏch giỏo khoa, trang 65.

IV Nhận xét

 Phương pháp:

 Hiệu quả sử dụng:

 Hiệu quả SD TBDH:

 ND cần điểu chỉnh:

 Nhận xét của giáo viên hướng dẫn:

-  1 ,5 C $+ E BD *% có giá *` ,L G*:

- Phép so sánh a[i]<a[j]

- 0 *[ *Z & -* *I n-1 M

3 Theo dõi yêu D4 suy & #34 ; câu S ?`

- Có

-. .. ! - ?8:

+ + Tỡm BD *% ,L G*4 S G*:

3. Tư duy:

- T% &'' (< ?0  <( ?) U !M dài dũng E cõu ,-  for to …

4 Thỏi độ:

-< /h3>... ! 0 &1 , - (<:

- AB &1 , - cho (<4 ? hỡnh C $+ 6BD *% E (<:

- F -* qua *G* < cỏc BD *% E (< ?0 H% lớ *I BD *%

- Cung GB