TIN HỌC :BÀI TẬP KIỂU MẢNG (T2)
TIN H C 11Ọ
Ti t 2ế7 : BÀI T P VÀ TH C HÀNH 3( ti t 1)Ậ Ự ế
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 đ c cách khai báo, tham chi u đ n các ph n t c a m ng,ả ượ ế ế ầ ử ủ ả
cách nh p xu t các ph n t c a m ng.ậ ấ ầ ử ủ ả
- Bi t gi i m t s bài toán tính toán, tìm ki m đ n gi n trên máyế ả ộ ố ế ơ ả
tính.
2. K năngỹ: Nâng cao k năng s d ng m t s câu l nh và m t s ki uỹ ử ụ ộ ố ệ ộ ố ể
d li u thông qua vi c tìm hi u, ch y th các ch ng trình có s n.ữ ệ ệ ể ạ ử ươ ẵ
II. Chu n bẩ ị
1. Giáo viên: Giáo án, SGK, sách giáo viên, phòng máy, máy chi u.ế
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ũ:ể Ti n hành trong quá trình th c hành.ế ự
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: Th c hành bài 1 ph n aạ ộ ự ầ
(25p)
GV: Gi i thi u n i dung th c hành:ớ ệ ộ ự
GV:Yêu c u h c sinh tìm hi u và ch yầ ọ ẻ ạ
th ch ng tình câu a, sách giáo khoa,ử ươ ở
trg 63.
HS: Tìm hi u và ch y th ch ng trìnhể ạ ử ươ
trên máy:
GV: Chi u ch ng trình lên b ng.ế ươ ả
GV: - Myarray là tên ki u d li u hay tênể ữ ệ
bi n?ế
- Vai trò c a nmax và n có gì khácủ
nhau?
- Dòng l nh nào đ t o bi n m ngệ ể ạ ế ả
A?
HS: - Tên ki u d li u.ể ữ ệ
- nmax là s ph n t t i đa có th ch aố ầ ử ố ể ứ
c a bi n m ng A, n là s ph n t th c tủ ế ả ố ầ ử ự ế
c a Aủ
- Dòng l nh nào đ t o bi n m ngệ ể ạ ế ả
A?
- L nh khai báo ki u và khai báoệ ể
bi n.ế
GV: Th c hi n ch ng trình đ h c sinhự ệ ươ ể ọ
th y k t qu .ấ ế ả
Bài 1: T o m ng A g m n (n<=100) sạ ả ồ ố
nguyên, m i s có giá tr tuy t đ i khôngỗ ố ị ệ ố
v t quá 300. Tính t ng các ph n t c aượ ổ ầ ử ủ
m ng là b i s c a m t s nguyên d ngả ộ ố ủ ộ ố ươ
k cho tr c.ướ
=> Ch ng trình:ươ
Program Sum 1;
Uses Crt;
Const nmax:=100;
Type Myarray = Array[1..nmax] of
integer;
Var A:myarray;
s, n, i, k:integer;
Begin
Clrscr;
Randomize;
Write(‘nhap n=’);
readln(n);
For i:=1 to n do a[i]:=random(301) –
random(301);
For i:=1 to n do Write(A[i]:5);
Writeln;
Write('nhap k=’);
readln(k);
s:=0;
TIN H C 11Ọ
Ho t đ ng c a th y và tròạ ộ ủ ầ N i dungộ
- H i:L nh gán a[i]:=random(300) –ỏ ệ
random(300) có ý nghĩa gì?
GV: LÖnh sinh ngÉu nhiªn gi¸ trÞ
cho m¶ng a tõ – 299 ®Õn 299.
GV: L nh For i:=1 to n doệ
Write(A[i]:5);có ý nghĩa gì?
HS: In ra mµn h×nh gi¸ trÞ cña
tõng phÇn tö trong m¶ng a.
GV: L nh For – Do cu i cùng th c hi nệ ố ự ệ
nhi m v gì?ệ ụ
HS:Céng c¸c phÇn tö chia hÕt cho
k.
GV: L nh s:=a+a[i]; đ c th chi n baoệ ượ ự ệ
nhiêu l n?ầ
HS: Cã sè lÇn ®óng b»ng sè phÇn
tö a[i] chia hÕt k.
GV: Th c hi n l i ch ng trình và yêuự ệ ạ ươ
c u HS th c hi n trên máy.ầ ự ệ
HS: Th c hành trên máy.ự
Ho t đ ng 2: Làm bài t p 1 ph n bạ ộ ậ ầ
(15p)
GV: S a ch ng trình câu a đ đ cử ươ ể ượ
ch ng trình gi i quy t bài toán câu bươ ả ế ở
- Chi u lên màn hình các l nh c n thêmế ệ ầ
vào ch ng trình câu aươ ở
HS: Quan sát và chú ý theo dõi các câu h iỏ
c a giáo viênủ
GV: Quan sát các l nh và suy nghĩ v tríệ ị
c n s a trong ch ng trình câu aầ ử ươ
GV: Ý nghĩa c a bi n Posi và neg?ủ ế
- H i: Ch c năng c a l nh:ỏ ứ ủ ệ
If a[i] >0 then posi:=posi+1
else if a[i] <0 then neg:=neg+1;
HS: Dùng đ l u s l ng đ m đ c.ể ư ố ượ ế ượ
- Đ m s d ng ho c đ m s âmế ố ươ ặ ế ố
GV: Yêu c u h c sinh thêm vào v trí c nầ ọ ị ầ
thi t đ ch ng đ m đ c sế ể ươ ế ượ ố
HD: Ch ra v trí c n thêm vào trongỉ ị ầ
ch ng trình.ươ
- L u ch ng trình. Th c hi n ch ngư ươ ự ệ ươ
trình và thông báo k t quế ả
For i:=1 to n do
if a[i] mod k=0 then s:=s+a[i];
Write(‘tong can tinh la’,s);
readln;
End.
b) Thêm vào ch ng trình câu aươ ở
Posi, neg:integer;
Posi:=0;neg:=0;
If a[i] >0 then Posi:=posi+1
Else if a[i] <0 then neg:=neg+1;
Write(posi:4,neg:4);
đ đ c ch ng trình đ m s l ng cácể ượ ươ ế ố ượ
s âm và các s d ng.ố ố ươ
TIN H C 11Ọ
4. T ng k t và h ng d n h c t p nhà (05p)ổ ế ướ ẫ ọ ậ ở
-T ng k t nh ng l i h c sinh m c ph i trong quá trình th c hành vàổ ế ữ ỗ ọ ắ ả ự
cách kh c ph c.ắ ụ
-Yêu c u h c sinh v nhà đ c và chu n b n i dung bài th c hànhầ ọ ề ọ ẩ ị ộ ự
s 3 ( Bài 2).ố
có thể bạn quan tâm
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.327
397
Kỹ thuật
21
(New)
TIN HỌC :BÀI TẬP KIỂU MẢNG
2
1.089
389
Giáo án, bài giảng lớp 11
2
(New)
TIN HỌC :BÀI TẬP KIỂU MẢNG (T3)
2
1.186
382
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.344
398
Giáo án, bài giảng lớp 11
3
(New)
TIN HỌC : KIỂU MẢNG (tiết 1)
2
889
408
Giáo án, bài giảng lớp 11
2
(New)
TIN HỌC : KIỂU MẢNG (tiết 2)
3
950
397
Giáo án, bài giảng lớp 11
3
(New)
TIN HỌC : KIỂU MẢNG (tiết 3)
3
1.072
385
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.456
312
An ninh, bảo mật
7
(New)
thông tin tài liệu
TIN HỌC :BÀI TẬP KIỂU MẢNG (T2)
: Tạo mảng A gồm n (n<=100) số nguyên, mỗi số có giá trị tuyệt đối không vượt quá 300. Tính tổng các phần tử của mảng là bội số của một số nguyên dương k cho trước.
=> Chương trình:
Program Sum 1;
Uses Crt;
Const nmax:=100;
Type Myarray = Array[1..nmax] of integer;
Var A:myarray;
s, n, i, k:integer;
Begin
Clrscr;
Randomize;
Write(‘nhap n=’);
readln(n);
For i:=1 to n do a[i]:=random(301) – random(301);
For i:=1 to n do Write(A[i]:5);
Writeln;
Write('nhap k=’);
readln(k);
s:=0;
For i:=1 to n do
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!
xem nhiều trong tuần
Giáo trình Quản trị học của Đại học kinh tế quốc dân
4 đề thi học sinh giỏi Toán lớp 2, có đáp án kèm theo
BIÊN BẢN TIẾP NHẬN VŨ KHÍ, VẬT LIỆU NỔ VÀ CÔNG CỤ HỖ TRỢ
Tiêu chí đánh giá một bài thuyết trình
ĐỌC HIỂU VĂN BẢN CHÂN, TAY, TAI, MẮT, MIỆNG
Hướng dẫn cài đặt Office 365 Education (ProPlus)
yêu cầu tài liệu
Giúp bạn tìm tài liệu chưa có
×
