TIN HỌC : KIỂU MẢNG (tiết 2)
TIN H C 11Ọ
Ti t 2ế4- §11: KI U M NG (ti t 2)Ể Ả ế
I. M c tiêuụ
1. Ki n th c:ế ứ
- C ng c cho h c sinh ki n th c ki u m ng m t chi u.ủ ố ọ ế ứ ể ả ộ ề
- Mô t đ c cách khai báo, tham chi u đ n các ph n t c a m ngả ượ ế ế ầ ử ủ ả
m t chi u, cách nh p xu t các ph n t c a m ng m t chi u.ộ ề ậ ấ ầ ử ủ ả ộ ề
2. K năngỹ: V n d ng ki n th c v m ng m t chi u đ xây d ngậ ụ ế ứ ề ả ộ ề ể ự
ch ng trình c a m t s bài toán đ n gi n.ươ ủ ộ ố ơ ả
II. Chu n bẩ ị
1. Giáo viên: Giáo án, SGK, sách giáo viên.
2. H c sinhọ: V ghi, sách giáo khoa, đ dùng h c t pở ồ ọ ậ .
III. T ch c các ho t đ ng h c t pổ ứ ạ ộ ọ ậ
1. n đ nh t ch c l p:Ổ ị ổ ứ ớ
2. Ki m tra bài cũ:ể
* Câu h i:ỏ Trình bày khái ni m, cú pháp cách khai báo và nh p xu tệ ậ ấ
các ph n t trong m ng m t chi u?ầ ử ả ộ ề
3. Ti n trình bài h cế ọ
Ho t đ ng c a th y và trò ạ ộ ủ ầ N i dungộ
Ho t đ ng 1: Tìm hi u bài toán tìmạ ộ ể
max c a m t dãy s nguyên (15ủ ộ ố
phút)
GV: G i h c sinh xác đ nh Input vàọ ọ ị
Output, ý t ng gi i quy t bài toán?ưở ả ế
HS:
-Input: S nguyên d ng N và dãyố ươ
s A1, A2, ….., ANố
-Output: Ch s và giá tr c a s l nỉ ố ị ủ ố ớ
nh t trong dãy ấ
-Ý t ngưở :
+ Đ t s Aặ ố 1 là s l n nh t (max)ố ớ ấ
+ Cho i l p t 2 đ n N, n u A[i]>ặ ừ ế ế
thì đ i max = A[i] v l u l i v tríổ ả ư ạ ị
i.
GV so n s n ch ng trình và cho h cạ ẵ ươ ọ
sinh quan sát ch ng trình.ươ
(N u có nhi u th i gian, giáo viên sế ề ờ ẽ
ti n hành so n ch ng trình t đ u đế ạ ươ ừ ầ ể
h c sinh có th d dàng nh n ra cácọ ể ễ ậ
thao tác c n ph i th c hi n khi vi tầ ả ự ệ ế
ch ng trình.)ươ
HS: Nghe gi ng, ghi bài.ả
1. M t s ví d v m ng m tộ ố ụ ề ả ộ
chi u:ề
a)Ví d 1ụ: Tìm ph n t l n nh t c aầ ử ớ ấ ủ
m t dãy s nguyên .ộ ố
Ch ng trình nh sau:ươ ư
Program timmax ;
Uses crt ;
Var A : array[1..250] of integer ;
n,i,max,csmax : Integer ;
Begin
Write('Nhap n = ') ;
Readln(n) ;
For i := 1 to n do
Begin
Write('a[',i,'] = ') ;
readln(a[i]) ;
End ;
max := a[1] ;
csmax := 1 ;
For i := 2 to n do
If a[i] > max then
Begin
max := a[i] ;
csmax :=i ;
End ;
Writeln('Gia tri lon nhat : ',max) ;
TIN H C 11Ọ
Ho t đ ng c a th y và trò ạ ộ ủ ầ N i dungộ
Ho t đ ng 2: Tìm hi u bài toán s pạ ộ ể ẵ
x p b ng tráo đ i (20 p)ế ằ ổ
GV: G i h c sinh xác đ nh Input -ọ ọ ị
Output và nh c l i ý t ng c a thu tắ ạ ưở ủ ậ
toán đã h c t l p 10.ọ ừ ớ
HS:
-Input: S nguyên d ng N và dãyố ươ
s A1, A2, …, ANố
-Output: Dãy A đ c s p x p theoượ ắ ế
th t không gi m.ứ ự ả
-Ý t ng:ưở
+ Đ i đ đ a s l n nh t v v tríổ ể ư ố ớ ấ ề ị
cu i cùng. ố
+ Làm t ng t đ i v i nh ng sươ ự ố ớ ữ ố
còn l i.ạ
GV: H ng d n cho h c sinh cách sướ ẫ ọ ử
d ng bi n trung gian, và duy t cácụ ế ệ
ph n t m ng đ th c hi n s p x pầ ử ả ể ự ệ ắ ế
b ng tráo đ i.ằ ổ
HS: Nghe gi ng, nghiên c t vi tả ứư ự ế
ch ng trình hoàn ch nh.ươ ỉ
Writeln('chi so ptu lon nhat : ',csmax) ;
Readln ;
End.
b)Ví d 2 :ụ S p x p dãy s nguyênắ ế ố
theo b ng thu t toán tráo đ i .ằ ậ ổ
Ch ng trình nh sau :ươ ư
Program sapxep ;
Uses crt ;
Var A : Array[1..250] of integer ;
n,i,j,tg : Integer;
Begin
clrscr ;
Write('Nhap so phan tu mang n = ') ;
Readln(n) ;
For i := 1 to n do
Begin
Write('A[',i,'] = ') ;
readln(A[i]) ;
End ;
For j := n downto 2 do
Begin
For i := 1 to j-1 do
If A[i] > A[i+1] then
Begin
tg := A[i] ;
A[i] := A[i+1] ;
A[i+1] := tg ;
End ;
End ;
Writeln('day sau khi sap xep : ') ;
For i := 1 to n do write(a[i]:8) ;
readln ;
End .
4. T ng k t và h ng d n h c t p nhà (05 p)ổ ế ướ ẫ ọ ậ ở
* T ng k tổ ế
TIN H C 11Ọ
- M t s l u ý h c sinh khi xây d ng ch ng trình có s d ng ki uộ ố ư ọ ự ươ ử ụ ể
m ng m t chi u. ả ộ ề
- Cú pháp nh p xu t các ph n t c a m ng m t chi u.ậ ấ ầ ử ủ ả ộ ề
* Bài t p v nhà.ậ ề
- Đ c thêm ví d v m ng m t chi u: Ch ng trình tìm ki m nhọ ụ ề ả ộ ề ươ ế ị
phân.
- Đ c tr c ọ ướ N i dungộ v ki u m ng hai chi u, sách giáo khoa trangề ể ả ề
59.
có thể bạn quan tâm
TIN HỌC : KIỂU MẢNG (tiết 1)
2
892
408
Giáo án, bài giảng lớp 11
2
(New)
TIN HỌC : KIỂU MẢNG (tiết 3)
3
1.073
385
Giáo án, bài giảng lớp 11
3
(New)
Tiểu luận: Tổng quan bảo vệ mạng, những lỗ hổng, các kiểu tấn công và...
21
1.332
397
Kỹ thuật
21
(New)
TIN HỌC :BÀI TẬP KIỂU MẢNG
2
1.092
389
Giáo án, bài giảng lớp 11
2
(New)
TIN HỌC :BÀI TẬP KIỂU MẢNG (T2)
3
1.232
807
Giáo án, bài giảng lớp 11
3
(New)
TIN HỌC :BÀI TẬP KIỂU MẢNG (T3)
2
1.189
384
Giáo án, bài giảng lớp 11
2
(New)
TIN HỌC :BÀI TẬP KIỂU MẢNG (T4)
3
1.347
398
Giáo án, bài giảng lớp 11
3
(New)
Tổng hợp các kiểu tấn công mạng phổ biến
7
1.461
314
An ninh, bảo mật
7
(New)
thông tin tài liệu
TIN HỌC : KIỂU MẢNG (tiết 2)
1. Một số ví dụ về mảng một chiều:
a)Ví dụ 1: Tìm phần tử lớn nhất của một dãy số nguyên .
Chương trình như sau:
Program timmax ;
Uses crt ;
Var A : array[1..250] of integer ;
n,i,max,csmax : Integer ;
Begin
Write('Nhap n = ') ;
Readln(n) ;
For i := 1 to n do
Begin
Write('a[',i,'] = ') ;
readln(a[i]) ;
End ;
max := a[1] ;
csmax := 1 ;
For i := 2 to n do
If a[i] > max then
Begin
max := a[i] ;
csmax :=i ;
End ;
Writeln('Gia tri lon nhat : ',max) ;
Writeln('chi so ptu lon nhat : ',csmax) ;
Readln ;
End.
b)Ví dụ 2 : Sắp xếp dãy số nguyên theo bằng thuật toán tráo đổi .
Chương trình như sau :
Program sapxep ;
Uses crt ;
Var A : Array[1..250] of integer ;
n,i,j,tg : Integer;
Begin
clrscr ;
Write('Nhap so phan tu mang n = ') ;
Readln(n) ;
For i := 1 to n do
Begin
Write('A[',i,'] = ') ;
readln(A[i]) ;
End ;
For j := n downto 2
Mở rộng để xem thêm
từ khóa liên quan
tài liệu mới trong mục này
tài liệu hot trong mục này
tài liệu giúp tôi
Nếu bạn không tìm thấy tài liệu mình cần có thể gửi yêu cầu ở đây để chúng tôi tìm giúp bạn!
×
