Giao an Tin hoc 11 Full

- Häc sinh biÕt ®îc cÊu tróc chung cña mét thñ tôc vµ vÞ trÝ khai b¸o cña thñ tôc trong th©n ch¬ng tr×nh chÝnh.. - Häc sinh biÕt ®îc kh¸i niÖm vÒ tham sè h×nh thøc vµ tham sè thùc sù, t[r]

(1)

TiÕt 1

C¸c kh¸i niƯm lËp trình ngôn ngữ lập trình Các thành phần ngôn ngữ lập trình

Ngày soạn: 15/08/2009

I Mục tiêu giảng 1 Về kiến thức

- Biết có lớp ngôn ngữ lập trình mức ngôn ngữ lập trình: Ngôn ngữ máy, hợp ngữ ngôn ngữ bậc cao

- Biết vai trò chơng trình dịch

- Biết khái niệm thông dịch biên dịch

- Bit cỏc thnh phần ngơn ngữ lập trình: Bảng chữ cái, cú pháp ngữ nghĩa 2 Về thái độ

- Tích cực nghe giảng ôn lại kiến thøc líp 10 II Chn bÞ:

GV: Chn bÞ tài liệu giảng dạy tài liệu mở rộng

HS: Nhớ lại kiến thức lớp 10 về: Các loại ngôn ngữ lập trình, phân biệt ngôn ngữ bậc cao với ngôn ngữ khác

III Ph ơng pháp - Ph ơng tiện Phơng pháp

- S dụng kết hợp nhiều phơng pháp: Diễn giải, hỏi đáp, Phơng tiện

- Sử dụng sgk tài liệu tham khảo IV Tiến trình giảng ổn định lớp

- Líp b¸o c¸o sü sè

- Cho HS ổn định chỗ ngồi Nội dung

Nội dung Hoạt động GV HS

Tiết

Khái niệm lập trình ngôn ngữ lập trình

1 Ngôn ngữ lập trình phân loại ngôn ngữ lập trình

- Ngụn ngữ dùng để viết chơng trình đợc gọi ngơn ng lp trỡnh

- Ngôn ngữ lập trình gồm loại: Ngôn ngữ máy, hợp ngữ ngôn ngữ bËc cao

- Máy tính khơng hiểu trực tiếp đợc ngơn ngữ bậc cao - Chơng trình dịch: Là chơng trình đặc biệt có chức chuyển đổi chơng trình đợc viết ngơn ngữ bậc cao sang ngơn ngữ máy

- Chơng trình dịch nhận đầu vào chơng trình viết ngơn ngữ bậc cao (Chơng trình nguồn) thực chuyển đổi sang ngơn ngữ mỏy (Chng trỡnh ớch)

- Chơng trình dịch có loại: Thông dịch biên dịch

+ Thông dịch: Đợc thực cách lặp lại dÃy bíc:

GV: Chúng ta tìm hiểu ngơn ngữ lập trình Vậy, ngơn ngữ lập trình?

HS trả lời: Ngơn ngữ dùng để viết chơng trình gi l ngụn ng lp trỡnh

GV: Ngôn ngữ lập trình gồm loại nào?

HS tr li: Ngơn ngữ lập trình đợc chia làm loại: Ngơn ngữ máy, hợp ngữ ngôn ngữ bậc cao GV: Em kể số ngơn ngữ lập trình mà em biết?

HS tr¶ lêi: Pascal, C, C++,

GV: Tại ngời ta đa ngôn ngữ bậc cao?

HS trả lời: Ngời ta đa ngôn ngữ bậc cao nhằm giải hạn chế ngôn ngữ máy hợp ngữ: Ngôn ngữ gần với tự nhiên hơn, gần nh không phụ thuộc vào loại máy tính

GV: Mỏy tớnh cú th hiu trực tiếp đợc ngôn ngữ bậc cao không? HS trả lời: Máy hiểu trực tiếp ngôn ngữ bậc cao

(2)

1 Kiểm tra tính đắn câu lệnh chơng trình nguồn

2 Chuyển đổi dãy câu lệnh thành hay nhiều câu lệnh tơng ứng ngôn ngữ máy

3 Thực câu lệnh vừa chuyển đổi đợc

Các ngôn ngữ khai thác hệ quản trị sở liệu, ngôn ngữ đối thoại … sử dụng trình thơng dịch

+ Biên dịch: Biên dịch đợc thực qua bớc:

1 Duyệt, phát lỗi, kiểm tra tính đắn câu lệnh chơng trình nguồn

2 Dịch tồn chơng trình nguồn thành chơng trình đích thực máy lu trữ để s dng li cn thit

Các thành phần ngôn ngữ lập trình

1 Các thành phần bản

- Mỗi ngôn ngữ lập trình có thành phần bản: Bảng chữ cái, cú pháp ngữ nghĩa

a Bảng chữ cái:

Bng chữ tập hợp kí tự dùng để viết chơng trình Khơng đợc dùng kí tự ngồi kí tự qui định chữ

- 26 chữ thờng chữ in hoa

- 10 chữ số thập phân: 0, 1, 2, 3, 4, 5, 6, 7, 8, - KÝ tự gạch nối: _

- Các kí hiệu toán häc th«ng dơng: +, -, *, /, =, >, <, <>

- Các kí tự đặc biệt: , : { } [ ] @ % ! | & # $ ‘ () “ b Cú pháp: Là quitắc để viết chơng trình

c Ngữ nghĩa: Xác định ý nghĩa thao tác cần phải thực hiện, ứng với tổ hợp kí0 tự dựa vào ngữ cảnh ca nú

trình dịch

GV: Chơng trình dịch có chức gì?

HS tr lời: Chơng trình dịch ch-ơng trình dùng để dịch chch-ơng trình viết ngơn ngữ bậc cao sang ngơn ngữ máy

GV: Chơng trình dịch nhận đầu vào chơng trình viết ngơn ngữ bậc cao (Chơng trình nguồn) thực chuyển đổi sang ngơn ngữ máy (Chơng trình đích)

GV: §a vÝ dơ, HS nhận nhiệm vụ giới thiệu với đoàn khách ngời Nhật làng mình, có cách

Cách thứ nhất, em HS giới thiệu phần, ý ng-ời phiên dịch dịch cho đoàn khách, nh đến HS giới thiệu hết làng Cách thứ 2: Em HS viết toàn điều cần giới thiệu làng giấy sau đa cho ngời phiên dịch để dịch giấy, họ đa cho đoàn khách dịch tiếng Nhật cho đoàn khách đọc GV: Một chơng khơng cịn lỗi cú pháp dịch sang ngơn ngữ máy Các lỗi ngữ nghĩa khó phát hơn, thơng thờng phát thực chơng trình với liệu cụ thể V Củng cố bài.

(3)

Tiết 2

Các thành phần ngôn ngữ lập trình Ngày soạn: 15/08/2009

I Mục tiêu giảng Về kiến thức

- Bit số khái niệm: Tên chuẩn, tên dành riêng (Từ khố), tên ngời lập trình đặt, biến

2, Về kỹ

- Phõn bit đợc khái niệm: Tên, tên chuẩn, tên dành riêng tên ngời lập trình đặt

- Phân biệt đợc biến

- Nhớ đợc quy định tên hằng, biến

- Biết đặt tên nhận biết đợc tên sai quy định - Sử dụng thích

II Ph ơng tiện dạy học

- Mỏy chiu, mỏy tính, giáo án Powerpoint III Hoạt động dạy học

1 Tổ chức lớp: ổn định kiểm tra sĩ số Kiểm tra cũ:

- GV ®a câu hỏi gọi HS lên bảng trả lời Câu 1: Phân biệt thông dịch biên dịch?

Câu 2: Nêu thành phần ngôn ngữ lập trình? - HS lần lợt lên bảng trả lời câu hỏi

3 Tiến trình tiết d¹y

Hoạt động GV Hoạt động HS

- Tiết trớc tìm hiểu thành phần ngơn ngữ lập trình Ngơn ngữ lập trình gồm bảng chữ cái, cú pháp ngữ nghĩa Chúng ta tìm hiểu tiếp số khái niệm ca ngụn ng lp trỡnh

I Các thành phân ngôn ngữ lập trình

- Bảng chữ - Cú pháp - Ngữ nghĩa

II C¸c kh¸i niƯm

- Trình chiếu Slide chứa chơng trình ví dụ đơn giản, có liên kết với turbo Pascal

Program vi_du1; Uses crt;

Const pi=3.1416; Var R, Dtich: Real; Begin

Write(‘Nhap ban kinh duong tron R= ’); Readln(R);

Dtich:=pi*sqr(r);

Writeln(‘Dien tich hinh tron la’,Dtich); Readln;

End

- GV ghi lên bảng:

+ Mi i tng chơng trình phải đợc đặt tên theo qui tắc ngơn ngữ lập trình chơng trình dịch cụ thể

1,Tªn

+ Trong Pascal, tên dãy liên tiếp khơng q 127 kí tự bao gồm chữ cái, chữ số dấu gạch dới, nhng khơng đợc bắt đầu chữ số

- Trình chiếu slide chứa ví dụ tên sai, cho HS xác định tên tên sai

VÝ dô: A, AC de, 1fe, _12d, d12, h_2,

- Theo dõi ví dụ hình

- Ghi bµi vµo vë

(4)

thêng nhng số ngôn ngữ khác có phân biệt chữ hoa chữ thờng nh C,C++

+ Trong ngơn ngữ Pascal có ba loại tên: Tên dành riêng, tên chuẩn tên ngời lập trình đặt

a, Tên danh riêng (Từ khoá)

- Quay li slide chứa chơng trình ví dụ - Mở kết nối sang pascal chơng trình

- Trong chơng trình hình soạn thảo Pascal, tên dành riêng là: Program, uses, const, type, var, begin, end Em đa nhận xét nhìn hình soạn thảo pascal, có khác chơng trình? + Từ khố tên đợc ngơn ngữ lập trình qui định với ý nghĩa xác định, ngời lập trình khơng đợc dùng với ý nghĩa khác

- Dựa vào tên từ khoá trên, em dịch từ tiếng Anh sang tiếng Việt để thấy ý nghĩa từ khoá này?

- Ngời sử dụng không đợc phép dùng từ khố với ý nghĩa khác, ví dụ dùng để đặt tên cho biến không đợc soạn thảo cần sai kí tự chơng trình báo lỗi GV lấy ví dụ hình soạn thảo Pascal tr-ờng hợp để HS thấy đợc từ khoỏ l t dnh riờng

- Mỗi tên dành riêng phản ánh chức cách dùng từ từ viết tắt tiếng Anh, nh Program: chơng trình, uses: Th viện hỗ trợ, const: Hằng; Type: Định nghĩa, var từ viết tắt variable: Biến, Begin: Bắt đầu, end: Kết thúc

b, Tªn chn

- Trình chiếu ví dụ chơng trình pascal hồn chỉnh GV cho HS thấy tên chuẩn chơng trìh đó: Real, sqr

+ Tên chuẩn tên đợc ngơn ngữ lập trình quy định dùng với ý nghĩa đó, ngời lập trình định nghĩa lại để dùng với ý nghĩa khác

- ý nghĩa tên chuẩn đợc quy định th viện ngơn ngữ lập trình, nh real: kiểu số thực, hàm sqr hàm trả bình pơng số

c Tên ng ời lập trình đặt - Trình chiếu lại ví dụ

+ Tên ngời lập trình tên đợc đặt với ý nghĩa riêng ngời lập trình, tên đợc khai báo trớc sử dụng Các tên không đợc trùng với tên dành riêng

Trong ví dụ, tên ngời sử dụng đặt: Vi_du_1, R, Dtich - Trình chiếu ví dụ có liên kết với mơi trờng pascal cho HS xác định tên riêng, tên chuẩn tên ngời lập trình đặt:

Program vi_du_2;

{Chuong trinh giai vµ bien luan pt bac nhat an} Uses crt;

Var a, b: Real; Begin

Write(‘Nhap vao a va b :’); readln (a,b);

{a, b la he so cua pt bac nhat co dang: ax+b=0} If a <> then write(‘pt co nghiem nhat: ’, -b/a) Else

- Một HS đứng chỗ xác định tên tên sai qui định - Cả lớp theo dõi hình chiếu

- Một HS trả lời: Trong chơng trình, từ khoá có màu trắng - Cả lớp theo dõi h×nh vÝ dơ

- Một em đứng chỗ trả lời: Program: chơng trình, uses: Th viện hỗ trợ, const: Hằng; Type: Định nghĩa, var từ viết tắt variable: Biến, Begin: Bắt đầu, end: Kết thúc

- Cr líp theo dâi vÝ dơ

- Ghi vào

- Cả lớp theo dõi vào vÝ dơ - HS ghi bµi vµo vë

- HS theo dâi vÝ dô

- Một HS đứng chỗ trả lời: + Tên dành riêng: Program, uses, var, Begin, if, then, else, end

(5)

- Trên ví dụ sau từ khoá Var tên biến, sau từ khoá Const Vậy, em cho biết toán học biến gì? Cho ví dụ?

2. H»ng vµ biÕn

- Quay lại ví dụ 1, pi có giá trị 3.1416 a Hằng

+ Hằng đại lợng có giá trị khơng thay đổi q trình thực chơng trỡnh

+ Trong ngôn ngữ lập trình Pascal có h»ng sè häc, h»ng kÝ tù vµ h»ng logic:

Hằng số học số nguyen số thực (có dấu khơng có dấu, dấu chấm tĩnh dấu chấm động)

Hằng kí tự: Là chuỗi kí tự đợc đặt dấu nháy đơn

Hằng logic giá trị (true) sai (flase) b Biến

+ Biến đại lợng đợc đặt tên dùng để lu giá trị giá trị thay đổi q trình thực chơng trình Các biến dùng chơng trình phải đợc khai báo

- Trong ví dụ R, Dtich, a, b biến - Trình chiếu ví dụ để HS xác định biến

c Chú thích: Chú thích đợc đặt { }, (* *) dùng để giải thích cho chơng trình rõ dàng sễ hiểu

một ẩn số cần tìm giá trị, ví dụ: 3x+2=0, x ẩn

- HS ghi bµi vµo vë

- HS theo dâi ví dụ trả lời

4 Củng cố bài

(6)

TiÕt 3

Bµi tËp

Ngày soạn: 30/08/2009 Ngày giảng: 31/08/2009 Lp: 11A2 I Mục tiêu giảng

1 Kiến thức

- Bit đợc phải có chơng trình dịch

- Phân biệt đợc chế độ thông dịch biên dịch

- Nắm đợc thành phần ngôn ngữ lập trình: Bảng chữ cái, cú pháp ngữ nghĩa - Nắm đợc khái niệm tên riêng, tên chuẩn tên ngời lập trình đặt

- Nắm đợc khái niệm biến Kỹ

- Nắm đợc thành phần ngôn ngữ lập trình: Bảng chữ cái, cú pháp ngữ nghĩa - Phân biệt đợc tên riêng, tên chuẩn tên ngời lập trình đặt

- Biết phân biệt đợc biến Thái độ

- Nhận thức đợc q trình phát triển ngơn ngữ lập trình gắn liền với trình phát triển tin học nhằm giải toán thực tiễn ngày phức tạp

- Ham muèn häc tËp vµ tìm hiểu ngôn ngữ lập trình II Ph ơng pháp - ph ơng tiện

- S dng kt hợp nhiều phơng pháp nh thảo luận, giáo viên gợi mở vấn đề để HS giải

- Sử dụng bảng, sgk, máy chiếu projector, máy tính III Hoạt động giảng dạy

1 ổn định lớp: Lớp trởng báo cáo sỹ số cho HS ổn định vị trí ngồi Kiểm tra cũ (khơng ktra)

3 Néi dung

- Trình chiếu nội dung tập với chơng trình có liên kết đến mơi trờng làm việc Pascal đa câu hỏi

Bài tập 1: Cho chơng trình: Program Amlich;

{Chuong trinh chuyen năm duong lich sang nam am lich dang can - chi}

Uses crt; Const

Can:array [0 9] of string

[4]=('Nham','Quy','Giap','At','Binh','Dinh','Mau','Ky',' Canh','Tan');

Chi:array [0 11] of string

[4]=('Than','Dau','Tuat','Hoi','Ty','Suu','Dan','Mao','T hin','Ty','Ngo','Mui');

Var

n:integer; kt:char;

Function Du(a:integer;b:integer):integer; Begin

if a>0 then

while a>=b a:=a-b else

while a<0 a:=a+b; Du:=a;

End; Begin Clrscr;

(7)

write('Ban co muon tiep tuc khong (C/K)? : '); readln(kt);

Until upcase(kt)='K'; End

- Dựa vào chơng trình ví dụ tập hình có liên kết với môi trờng làm việc Pascal để trả lời câu hỏi sau: Xác định từ khoá, tên chuẩn tên ngời lập trình đặt? Xác định hằng, biến đoạn thích chơng trình? Nếu thay tên biến n tên sau: begin; 1ab; do; can chi;namd; abs; crt Tên dùng để thay đợc? Tên khơng thể thay đợc, sao?

- GV chiếu lại ví dụ mơi trờng soạn thảo pascal thay trực tiếp môi trờng pascal, kiểm tra với tên để HS thấy đợc tên thài chờng trình báo lỗi

- Từ rút kết luận cho việc đặt tên biến: Không đợc trùng với từ khố, khơng chứa kí tự trắng, khơng nên đặt tên trùng với tên chuẩn nên đặt tên có ý nghĩa dễ gợi nhớ, dễ đọc, dễ kiểm tra li ca chng trỡnh

- GV yêu cầu HS lµm bµi tËp: Bµi 1.6 sgk tr.13; bµi 1.9; 1.10; 1.11; 1.16 sbt tr.7

uses, var, const, begin, end, function, repeat, until, while, do, if, then Tên chuẩn: read, readln, write, writeln, integer, char, upcase, crt tên ngời lập trình đặt: Amlich, du, can, chi, n, kt

- Một HS trả lời câu hỏi 2: Trong ch-ơng trình hằng: Can, chi Biến: n, kt đoạn thích {Chuong trinh chuyen năm duong lich sang nam am lich dang can - chi} - C¶ líp suy nghÜ

- HS trả lời câu hỏi: Tên thay thế: 1ab, namd Tên crt, abs khơng nên đặt tên cịn lại khơng thể dùng để thay đợc trùng tên với từ khố có chứa kí tự trắng - HS lớp làm chuẩn bị lên bảng

(8)

TiÕt 4

Chơng II: chơng trỡnh n gin

cấu trúc chơng trình

Ngày soạn: 06/09/2009 Ngày giảng: 09/09/2009 Lp: 11A1 I Mục tiêu giảng

1 Kiến thức

- Hiu đợc chơng trình mơ tả đợc thuật tốn ngơn ngữ lập trình - Biết đợc cấu trúc chơng trình đơn giản: Cờu trúc chung thành phần - Biết đợc cấu trúc chung chơng trình viết ngơn ngữ pascal

2 Kỹ

- Nhn bit c cỏc thành phần chơng trình đơn giản viết ngôn ngữ pascal II Ph ơng pháp - ph ơng tiện

- Sử dụng kết hợp nhiều phơng pháp nh thuyết trình đặt câu hỏi gợi mở vấn đề - Sử dụng bảng, sgk, máy chiếu projector, máy tính

III Hoạt động giảng dạy

1 ổn định lớp: Lớp trởng báo cáo sỹ số cho HS ổn định vị trí ngồi Kiểm tra cũ (không ktra)

3 Néi dung

- GV: C¸c em nhớ lại kiến thức viết văn cho biết bố cục văn gồm phần lại chia nh vậy?

i3 cấu trúc chơng tr×nh

- GV cho chiếu chơng trình liên kết đến môi trờng soạn thảo Pascal để chạy chơng trình ví dụ lên hình để HS theo dõi

Program hoan_vi; uses crt;

type mang_hv = array [1 20] of byte; mang_kt = array [1 20] of boolean; Var i, n,dem: byte;

x: mang_hv; kt: mang_kt;

Procedure try(j:byte); Var k,t:byte;

Begin

for t:=1 to n if kt[t] then begin

x[j]:=t; kt[t]:=false; if j = n then begin

for k:=1 to n write (x[k]); dem:=dem+1;

writeln; end

else

try(j+1); kt[t]:= true; end;

End;

BEGIN dem:=0;

write('Nhap n:'); readln(n); for i:=1 to n kt[i]:= true;

- Một HS trả lời: Bố cục văn gồm phần: Mở bài, thân kết Chia nh để dễ đọc, dễ hiểu nội dung

(9)

1 Cấu trúc ch ơng trình

+ Một chơng trình có cấu trúc gồm phần: [<Phần khai báo >]

<Phần thân>

- GV: Trong đó, qui ớc thành phần dấu ngoặc vng [ ] khơng bắt buộc phải có, nhng phần dấu ngoặc nhọn bắt buộc

+ Phần khai báo có không, phần thân bắt buộc phải có

- GV: Trong chơng trình ví dụ phần khai báo từ Program

… đến END; phần thân từ BEGIN đến END 2 Các thành phần ch ơng trình

a Phần khai báo

+ Cú th cú cỏc khai báo cho: Tên chơng trình, th viện, hằng, định nghĩa kiểu liệu , biến chơng trình

- GV: Chúng ta dựa vào vốn từ vựng tiếng Anh, chơng trình ví dụ, em xác định phần tên chơng trình, th viện, hằng, định nghĩa kiểu, biến chơng trình con? - GV: Program?

- GV: uses? - GV: Type?

- GV var (viÕt t¾t cđa tõ variable)? - GV: Procedure?

- GV: Begin, end?

- Dựa vào nghĩa tiếng Anh từ khoá trên, em cho biết khai báo tên chơng trình, khai báo th viện, định kiểu, biến, chơng trình con?

+ Khai báo tên chơng trình: Phần có khơng Với Pascal, có, phần tên chơng trình khoá program, tiếp đến tên chơng trình ngời lập trình đặt theo qui tắc đặt tên

vÝ dô: program hoan_vi;

+ Khai báo th viện: Mỗi ngơn ngữ lập trình có sẵn số ch-ơng trình thơng dụng để hỗ trợ cho ngời lập trình Trong Pascal,nếu có, khai báo th viện từ khoá Uses, tiếp đến tên th viện Nếu có nhiều th viện sử dụng dấu “,” để ngăn cách

VÝ dô: Uses crt, graph;

+ Trong pascal, khai báo th viện crt (cung cấp chơng trình để làm việc với hình bàn phím), thân chơng trình dùng câu lệnh clrscr;

+ Khai báo hằng: Hằng giá trị xuất nhiều lần chơng trình mà khơng bị thay đổi giá trị.Một số, kí tự kiểu logic Trong Pascal, có, đ-ợc khai báo từ khoá Const, theo cú pháp:

Const ten_hang1= gia_tri1; Ten_hang2= gia_tri2; ………

+ Định nghĩa kiểu liệu ngời dùng: Ngồi kiểu liệu chuẩn, ngời lập trình định nghĩa kiểu liệu cho Trong Pascal, có, định nghĩa kiểu từ khố Type, khai báo theo cú pháp:

Type ten_kieu=định nghĩa kiểu cụ thể cho kiểu; Ví dụ:

type mang_hv = array [1 20] of byte; mang_kt = array [1 20] of boolean;

- GV: XÐt vÝ dơ: G¶i biện luận pt: ax+b=0, toán học đâu biến?

- Trong toán học, giải biện luận pt x biến, nhng

- HS ghi

- HS theo dõi ví dụ suy câu hỏi

- Một HS trả lời:

- Program: Chơng trình - Uses: sử dụng, th viện - Type: Định nghĩa - Variable: Biến - Procedure: Thủ tục - Begin: Bắt đầu, end: Kết thúc

- 1HS tr¶ lêi:

Ten chơng trình khai báo từ khoá program (hoan_vi); kháo th viện từ khoá uses (crt), định kiểu từ khoá Type (can, chi), khai báo biến từ khoá Var (i, n, dem, x, kt) chơng trình đợc khai báo sau từ khoá procedure (try)

- HS ghi bµi

(10)

thực chơng trìnhơng trình (giá trị input, output) Giải toán máy tính có biÕn: a, b, x kiÓu sè thùc

+ Khai báo biến: Biến đại lợng Nó thay đổi giá trị chơng trình đợc thực Trong Pascal, có, khai báo biến từ khoá VAR, theo cấu trúc: Var ten_bien1, ten_bien2, ten_bien3: kieu 1;

Ten_bien4 : kieu 2; VÝ dô:

Var i, n,dem: byte; x: mang_hv; kt: mang_kt;

- GV: VËy h»ng vµ biÕn có giống khác nhau? + Chú ý:

Khi đặt tên chơng trìnhơng trình, tên hằng, tên biến đối tợng khác, ngời lập trình khơng đợc đặt trùng với từ khoá (Begin, end, program, var, if, the, while, ), đặt trùng với tên chuẩn (read, readln Write, integer, real, true, false ) nhng khơng nên dễ nhầm lẫn Nên đặt tên gợi nhớ Trong Pascal, khơng phân biệt chơng trìnhữ hoa chữ hoa chữ thờng (trừ lí tự xâu kí tự), nên dùng chữ hoa chữ thờng tuỳ ý cho chng trỡnh d c

b Thân ch ơng trình tr×nh

- Ví dụ thấy, phần thân chơng trình trình từ BEGIN đến END

+ Dãy lệnh đợc giới hạn phạm vi từ khoá Begin End, sau end có dấu chấm “.”

- HS trả lời: x biến

- HS ghi bµi

- HS trả lời: Hằng có giá trị khơng thay đổi suốt q trình chơng trìnhơng trình thực hiện, cịn biến có giá trị thay đổi

4 Cđng cè bµi

(11)

TiÕt 5

Mét sè kiĨu d÷ liƯu chn - khai báo biến

Ngày soạn: 10/09/2009 Ngày giảng: 14/09/2009 Líp: 11A11

I-Mơc tiªu: 1.KiÕn thøc:

-Biết đợc số kiểu liệu chuẩn: nguyên, thực, ký tự, logic -Biết đợc cấu trúc chung khai báo bin

2.Kỹ năng:

-S dng c kiu d liệu khai báo biến để viết đợc chơng trình đơn giản II-Đồ dùng dạy học:

1.Chn bÞ giáo viên:

-Máy tính, máy chiếu prôjector -Một số chơng trình mẫu viết sẵn 2.Chuẩn bị học sinh:

-Sách giáo khoa, ghi III-Hoạt động dạy học:

1.Hoạt động 1: Tìm hiểu số kiểu liệu chuẩn

T Hoạt động giáo viên Hoạt động học sinh 1.Đặt vấn đề: Trong tốn học, để thực đợc tính tốn

ta cần phải có tập số Đó tập sè nµo?

-Diễn giải: Cũng tơng tự nh vậy, ngơn ngữ lập trình Pascal, để lập trình giải tốn, cần có tập hợp, tập hợp có giới hạn định -Các em hiểu nơm na: Kiểu liệu chuẩn tập hữu hạn giá trị, kiểu liệu cần dung lợng nhớ cần thiết để lu trữ xác định phép tốn tỏc ng lờn d liu

2.Yêu cầu học sinh nghiên cứu sách giáo khoa, trả lời câu hỏi sau:

-Có kiểu liệu chuẩn ngôn ngữ Pascal?

-Trong ngôn ngữ Pascal có kiểu nguyên th-ờng dùng, phạm vi biểu diễn loại?

-Trong ngôn ngữ Pascal, có kiểu ký tự?

-Trong ngôn ngữ Pascal, có kiểu logic, gồm giá trị nào?

3.Giỏo viên giải thích số vấn đề cho học sinh:

+Vì phạm vi biểu diễn loại kiểu nguyên khác nhau?

+Miền giá trị loại kiểu thực, số chữ số có nghĩa? 4.Phát vấn: Muốn tính toán giá trị 4,5,6,7 ta phải sử dụng kiểu liệu gì?

1.Chú ý, lắng nghe suy nghĩ trả lời:

-Số tự nhiên, số nguyên, số hữu tỉ, số thực

-Liên tởng tập số toán học với kiểu liệu Pascal

2.Nghiên cứu sách giáo khoa trả lêi

-Cã kiĨu: KiĨu nguyªn, kiĨu thùc, kiĨu ký tự kiểu logic

-Có loại: Byte, Word, Integer longin

-Có loại: Real, extended -Cã lo¹i: Char

-Cã lo¹i: Boolean, gåm phÇn tư: True, False

(12)

3.Hoạt động 3: Tìm hiểu cách khai b biến

T Hoạt động giáo viên Hoạt động học sinh 1.Yêu cầu học sinh nghiên cứu sách giáo khoa

cho biết phải khai báo biến?

-Cấu trúc chung khai báo biến ngôn ngữ Pascal

-Cho ví dụ để khai báo biến nguyên biến kiểu ký tự

2.Chiếu chơng trình chứa số khai báo yêu cầu học sinh chọn khai báo ngôn ngữ Pascal?

Var

X,y,z: word; N:Real X: Longint; H:integer

3.Chiếu chơng trình chứa sè khai b¸o biÕn pascal

Hái: Cã biến tất cả, nhớ phải cấp phát bao nhiªu?

Var x,y: word Z:longint H: integer I: byte

1.Mọi biến dùng chơng trình phải khai báo tên biến kiểu liệu biến Tên biến dùng để xác lập quan hệ biến với địa nhớ nơi lu giữ giá trị biến

-Var <danh sách biến>: <kiểu dữ liệu>;

Var x: Word Y: char;

2.Quan sát chọn khai báo Var

X,y,z: word I: byte;

3.Quan sát trả lời -Có biến

-Tổng nhớ cần cấp phát: x (2byte); y(2 byte); z(4byte); h(2byte); i(1byte); Tổng11byte

IV-Đánh giá cuối bài:

1.Những nội dung chính:

-Các kiểu liƯu chn: kiĨu sè nguyªn, kiĨu sè thùc, kiĨu ký tù, kiÓu logic

(13)

TiÕt 6:

phép toán, biểu thức, câu lệnh gán

Ngày soạn: 06/09/2009 Ngày giảng: 21/09/2009 Lớp: 11A11

I-Mục tiêu: 1.Kiến thøc:

-Biết đợc phép tốn thơng dụng ngơn ngữ lập trình -Biết diễn đạt biểu thức ngơn ngữ lập trình

-Biết đợc chức lệnh gán

-Biết đợc cấu trúc lệnh gán số hàm chuẩn thông dụng ngôn ng lp trỡnh pascal

2.Kỹ năng:

-S dng đợc phép toán để xây dựng biểu thức -Sử dụng đợc lệnh gán để viết chơng trình

II-§å dùng dạy học: 1.Chuẩn bị giáo viên:

-Sỏch giỏo khoa, ghi III-Hoạt động dạy học:

1.Hoạt động 1: Tìm hiểu số phép tốn.

T Hoạt động giáo viên Hoạt động học sinh 1.Đặt vấn đề: Để mô tả thao tác

thuật tốn, ngơn ngữ lập trình sử dụng số khái niệm bản: phép toán, biểu thức, gán giá trị

2.Phát vấn: Hãy kể phép toán em đ-ợc học toán học

-Diễn giải: Trong ngơn gnữ lập trình pascal có phép tốn đ-ợc diễn đạt cách khác

-Yêu cầu học sinh nghiên cứu sách giáo khoa cho biết nhóm phép tốn -Phép Div, Mod đợc sử dụng cho kiểu liệu nào?

-Kết phép toán quan hệ thuộc kiểu liệu nào?

1.Chú ý lắng nghe

2.Suy nghĩa trả lời

-Phép: cộng, trừ, nhân, chia, lấy số d, chia lấy số nguyên, so sánh

-Các phép toán số học: +,-,*,/,div,mod -Các phép toán quan hệ: <,>, =,>=,<= -Các phép toán logic: And, Or, Not -Chri sử dụgn đợc cho kiểu nguyên -Thuộc kiểu Logic

2.Hoạt động 2: Tìm hiểu biểu thức.

T Hoạt động giáo viên Hoạt động học sinh 1.Trong toán học ta làm quen với khái niệm biểu

thøc, h·y cho biÕt yÕu tè c¬ xây dựng nên biểu thức -Nếu toán mà toán hạng biến số, số hàm số toán tử phép toán số học

1.Suy nghĩ trả lời

(14)

biểu thức có tên gọi gì?

2.Chiếu số biểu thức toán học lên bảng, yêu cầu häc sinh biĨu diƠn thµnh biĨu thøc Pascal

2a+5b+c

z xy

2

z x z

y x

2

-Nghiên cứu SGK từ việc xây dựng biểu thức trên, hÃy nêu thứ tự thực phép toán

3.HÃy kể tên mét sè hµm sè häc?

-Trong ngơn ngữ lập trình có số hàm nh nhng đợc biểu diễn cách khác

VD:

a ac b

b

2

  

4.PhÐp to¸n quan hƯ: -CÊu tróc chung:

<BT1><phÐp to¸n quan hƯ><BT2> -Thø tù thùc hiƯn biểu thức quan hệ? +Tính giá trị biểu thức

+Thực phép toán quan hệ -Cho kết quả: Kiểu logic 5.Biểu thức logic:

-là biến logic

Biểu thức logic cho giá trị True hc False Thø tù thùc hiƯn:

+Thùc hiƯn biĨu thøc quan hƯ +Thùc hiƯn phÐp to¸n logic

-BiĨu thức số học

2.Quan sát trả lời 2*a+5*b+c x*y/(2*z)

((x+y)/(1-(2/z)))+(x*x/(2*z))

-Thực ngoặc trớc; ngoặc sau Nhân, chia, chia nguyên, chia lấy d trớc; cộng trõ sau

3.Suy nghÜa tr¶ lêi

(15)

3.Hoạt động 3: Tìm hiểu lệnh gán

T Hoạt động giáo viên Hoạt động học sinh -Giới thiệu ví dụ lệnh gán Pascal nh sau:

x:=4+8;

-Giải thích: Lấy cộng 8, đem kết đặt vào x Ta đợc x=12

-HÃy cho biết chức lệnh gán? -Cấu trúc chung lệnh gán:

<tên biến>:=<biểu thức>; VD: x=

a ac b

b

2

  

-quan sát ví dụ suy nghĩ để trả lời

X:= (-b+sqrt(b*b-4*a*c))/ (2*a)

1.Những nội dung chÝnh:

-C¸c phÐp to¸n Pascal: sè häc, quan hƯ, logic -BiĨu thøc Pascal: sè häc, quan hƯ, logic -Cấu trúc lệnh gán: <Tên biến>:=<biểu thức>

2.Câu hái, bµi tËp vỊ nhµ:

(16)

TiÕt 7:

Thủ tục chuẩn vào/ra

Soạn thảo, dịch, thực hiệu chỉnh chơng trình

-Biết đợc ý nghĩa thủ tục vào/ra chuẩn lập trình, cấu trúc chung th tc vo/ra

-Biết bớc hoàn thành chơng trình

-Biết file chơng trình Turbo Pascal 7.0 2.Kỹ năng:

-Vit ỳng lnh vào/ra

-Biết nhập liệu thực chơng trình -Biết khởi động khỏi Pascal

-Soạn đợc chơng trình vào máy -Dịch đợc chơng trình

-Thực đợc chơng trình để nhập thu kết II-Đồ dùng dạy học:

1.ChuÈn bÞ giáo viên:

1.Hoạt động 1: Tìm hiểu thủ tục nhập liệu từ bàn phím.

T Hoạt động giáo viên Hoạt động học sinh -Yêu cầu học sinh nghiên cứu sách giáo khoa

cho biết thủ tục nhập liệu từ bàn phím?

VD: Chơng trình giải ax+b=0, ta phải nhập đại lng no?

-Khi nhập giá trị cho nhiều biến ta phải thực nh nào?

- Nhập a,b

Read(a,b); Readln(a,b);

-Những giá trị cách dấu cách kí tự xuống dòng

2.Hoạt động 2: Tìm hiểu thủ tục đa liệu hình

(17)

VD: Ch¬ng trình giải ax+b=0 đa giá trị x=-b/a h×nh

Chiếu chơng trình Pascal đơn giản ?Chức lệnh Writeln()?

? Khi tham số lệnh Write() thuộc kiểu char Real quy định vị trí nh nào?

Write(-b/a); Writeln(-b/a);

-ViÕt dòng chức đa trỏ xuống dòng

-Quy định hai loại vị trí: Vị trí cho tồn số thực vị trí cho phần thập phân

3.Hoạt động 3: Làm quen với Turbo Pascal 7.0

T Hoạt động giáo viên Hoạt động học sinh -Để sử dụng đợc Turbo pascal máy phi cú cỏc

file chơng trình cần thiết: Turbo.exe

Turbo.tpl Graph.tpu

2.Trình chiếu cách khỏi động turbo pascal cách khỏi chơng trình

-Giíi thiƯu hình soạn thảo pascal

-quan sát ghi bµi

4.Hoạt động 4: Tập soạn thảo chơng trình đơn giản thực chơng trình. T Hoạt động giáo viên Hoạt động học sinh

1.Soạn chơng trình làm ví dụ, lu chơng trình, dịch lỗi

Gọi học sinh sửa lỗi sai chơng trình

-Quan sát ghi nhớ -Lu: F2

-Dịch lỗi: Alt+F9

-Thực chơng trình: Ctrl+F9 IV-Đánh giá cuối bài:

-Khi ng pascal, soạn thảo, dịch, sửa lỗi cú pháp, chạy chơng trỡnh

2.Câu hỏi tập nhà:

(18)

TiÕt 8:

Bµi tËp vµ thùc hành (tiết 1)

-Biết đợc chơng trình pascal hồn chỉnh

-Lµm quen với dịch vụ chủ yếu pascal việc soạn thảo, lu, dịch chơng trình thực chơng trình

2.Kỹ năng:

-Son c chng trỡnh, lu lên đĩa, dịch lỗi cú pháp, thực tìm lỗi thuật toán hiệu chỉnh

-Bớc đầu biết phân tích hồn thành chơng trình đơn giản II- dựng dy hc:

1.Chuẩn bị giáo viên:

-Sỏch giáo khoa, ghi III-Hoạt động dạy học:

1.Hoạt động 1: Tìm hiểu chơng trình hồn chỉnh.

T Hoạt động giáo viên Hoạt động học sinh 1.Chiếu chơng trình lên bảng Yêu cầu học sinh thc

hiện nhiệm vụ:

-Soạn chơng trình vào máy -Lu chơng trình

-Dịch lỗi cú pháp -Thực chơng trình

-Nhập liệu -3 Thông báo kết -Trở hình soạn thảo

-Thực chơng trình

-Nhập liệu Thông báo kết -Hỏi: Vì có lỗi xuất hiện?

-Sửa lại?

1.Quan sát bảng, độc lập soạn thảo chơng trình vào máy

F2 Alt + F9 Ctrl + F9

X1=1.00 X2=2.00 Enter

Ctrl + F9 Thông báo lỗi

Do bậc hai số âm -Sửa l¹i

2.Hoạt động 2: Rèn kỹ lập chơng trình

T Hoạt động giáo viên Hoạt động học sinh 1.Định hớng để học sinh phân tích tốn tính diện

(19)

-C¸ch tÝnh

2.Yêu cầu học sinh soạn lu chơng trình vào đĩa -Quan sát hớng dẫn học sinh lúc thực hành

-D÷ liƯu S S:=3.14*a*a;

(20)

TiÕt 9:

Bµi tËp vµ thùc hành (tiết 2)

-Lµm quen với dịch vụ chủ yếu pascal việc soạn thảo, lu, dịch chơng trình thực chơng trình

2.Kỹ năng:

-Son c chng trỡnh, lu lên đĩa, dịch lỗi cú pháp, thực tìm lỗi thuật toán hiệu chỉnh

-Bớc đầu biết phân tích hồn thành chơng trình đơn giản II- dựng dy hc:

T Hoạt động giáo viên Hoạt động học sinh 1.Chiếu chơng trình lên bảng Yêu cầu học sinh thc

hiện nhiệm vụ:

-Sửa lại?

1.Quan sát bảng, độc lập soạn thảo chơng trình vào máy

F2 Alt F9 Ctrl F9

X1=1.00 X2=2.00 Enter

Ctrl F9

Thông báo lỗi

Do bậc hai số âm -Sửa lại

T Hoạt động giáo viên Hoạt động học sinh 1.Định hớng để học sinh phân tích tốn tính diện

(21)

-C¸ch tÝnh

2.u cầu học sinh soạn lu chơng trình vào đĩa -Quan sát hớng dẫn học sinh lúc thực hnh

-Dữ liệu S S:=3.14*a*a;

(22)

Tiết 10:

Bài tập

-Làm quen với dịch vụ chủ yếu pascal việc soạn thảo, lu, dịch chơng trình thực chơng trình

2.Kỹ năng:

-Son c chơng trình, lu lên đĩa, dịch lỗi cú pháp, thực tìm lỗi thuật tốn hiệu chỉnh

-Bớc đầu biết phân tích hồn thành chơng trình đơn giản II-Đồ dùng dạy học:

1.Chn bÞ giáo viên:

T Hoạt động giáo viên Hoạt động học sinh 1.Chiếu chơng trình lên bảng u cầu học sinh thực

hiƯn c¸c nhiƯm vơ:

-Sửa l¹i?

1.Quan sát bảng, độc lập soạn thảo chơng trình vào máy F2

Alt F9 Ctrl F9

X1=1.00 X2=2.00 Enter

Ctrl F9

Thông báo lỗi

Do bậc hai số âm -Sưa l¹i

2.Hoạt động 2: Rèn kỹ lập chng trỡnh

(23)

-Dữ liệu -Cách tÝnh

2.Yêu cầu học sinh soạn lu chơng trình vào đĩa -Quan sát hớng dẫn học sinh lỳc thc hnh

-Dữ liệu vào a -Dữ liệu S S:=3.14*a*a;

1.Nh÷ng néi dung chÝnh:

(24)

TiÕt 11:

Bài 9 CU TRC R NHNH

-Hiểu đợc khái niệm rẽ nhánh lập trình

-Biết sử dụng câu lệnh thực rẽ nhánh TP (Dạng thiếu dạng đủ) - Hiu c cõu lnh ghộp

2.Kỹ năng:

- Sử dụng cấu trúc rẽ nhánh mô tả thuật toán số toán đơn giản

- Viết đợc câu lệnh rẽ nhánh dạng thiéu đủ áp dụng để thể đợc thuật tốn số tốn đơn giản

II-§å dùng dạy học: 1.Chuẩn bị giáo viên: -Máy tính, máy chiếu prôjector -Một số chơng trình mẫu viết sẵn 2.Chuẩn bị học sinh:

-Sách giáo khoa, ghi

3 nội dung b ià

TG Nội dung trình chiếu Hoạt động Gv HS

10’

* Slide 1: Đưa số ví dụ cơng việc ngày có lựa chọn

- Nếu trời khơng mưa tơi mời bạn ăn chè bưởi, mưa tơi mời bạn ăn chè ngó

- Nếu bạn ốm tơi cho bạn nghỉ học

* Slide 2: Tên học * Slide 3, 4:

1 Rẽ nhánh:

Ví dụ 1: Châu hẹn Ngọc: “Chiều mai trời khơng mưa Châu đến nhà Ngọc”

Ví dụ 2: Lần khác, Ngọc nói với Châu: “Chiều mai trời khơng mưa Ngọc đến nhà Châu, trời mưa buổi tối Ngọc

Thường ngày có nhiều việc, thực điều kiện thỏa mãn

GV đưa ví dụ

GV: Em lấy số ví dụ cơng việc xảy điều kiện thỏa mãn?

GV: Trong tin học, để mơ tả hành động có rẽ nhánh (lựa chọn) cấu trúc rẽ nhánh

1 Rẽ nhánh

(25)

5’

10’

hai:

ax2 + bx + c = , (a≠0)

Delta=b2 -4ac;

- Nếu delta<0 pt vơ nghiệm x=-b/2a

Nếu delta>0 pt có nghiệm phân biệt:

X=(-b∆)/2a

*Slide 5:

Cấu trúc điều kiện hành động

- Lần khác, Ngọc nói với Châu: “Chiều mai trời khơng mưa

thì Ngọc đến nhà Châu, trời mưa buổi tối Ngọc điện lại cho Châu”

- Nếu trời không mưa thì tơi mời bạn ăn chè bưởi,

ngược lại tơi mời bạn ăn chè ngó

Nếu (Điều kiện đúng) (Hoạt động 1) cịn khơng (Hoạt động 2);

- Châu hẹn Ngọc: “Chiều mai trời khơng mưa Châu đến nhà Ngọc”

- Nếu bạn ốm tơi cho bạn nghỉ học

- Trường hợp (Hoạt động = Ø) cấu trúc điều kiện hành động là:

Nếu (Điều kiện đúng) (Hoạt động 1);

+ Có hai dạng:

Dạng đủ:

If <Điều kiện> Then <Câu lệnh 1>

Else <Câu lệnh 2>;

Dạng thiếu:

If <Điều kiện> Then <Câu lệnh>; If, Then, Else: Từ khoá

Điều kiện: Biểu thức logic biểu thức quan hệ

Câu lệnh: Một câu lệnh Pascal

+ Dạng đủ:

giải phương trình bậc hai? HS: Delta=b2 -4ac;

- Nếu delta<0 pt vơ nghiệm x=-b/2a Nếu delta>0 pt có nghiệm phân biệt:

x=(-b∆)/2a

GV: Quay lại ví dụ trên, phân tích cấu trúc hành động

GV: Dựa vào ví dụ, em khái quát dạng hành động?

HS: (đk đúng) hoạt động 1, ngược lại hoạt động

GV: Từ tiếng Anh gì? Từ Thì, ngược lại?

HS trả lời: Nếu - IF, Thì - Then ngược lại - Else

GV: Xét ví dụ khác

GV: Em khái quát dạng hành động này?

HS:

Nếu (đk đúng) hoạt động

GV: Chúng ta so sánh dạng hành động trên?

HS dạng có trường hợp ngược lại, dạng khơng

GV: Dạng có hoạt động rỗng trở dạng 2, dạng trường hợp đặc biệt dạng

GV: Tương ứng với dạng hành động trên, TP có cấu trúc rẽ nhánh với câu lệnh rẽ nhánh dạng đủ dạng thiếu

(26)

10’

If <Điều kiện> Then <Câu lệnh1> Else <Câu lệnh 2>;

Chú ý 1:

- Trong TP, kết thúc câu lệnh dấu chấm phẩy (;), nhưng câu lệnh trước else khơng có dấu chấm phẩy.

Ví dụ: Kiểm tra tính chẵn lẻ số nguyên dương N?

If (n MOD =0) then write(‘N la so chan’) else write(‘N la so le’);

+ Dạng thiếu:

If <Điều kiện> Then <Câu lệnh >; Điều kiện tính kiểm tra, điều kiện (có giá trị TRUE) câu lệnh thực hiện, ngược lại (điều kiện có giá trị False) câu lệnh bị bỏ qua (câu lệnh khơng thực hiện)

Ví dụ 3:

- IF delta<0 Then write(‘pt vo nghiem’);

- IF delta=0 Then

write(‘pt co nghiem nhat’); - IF delta>0 Then

write(‘pt co nghiem phan biet’);

Chú ý 2:

- Có thể xây dựng cấu trúc có nhiều lựa chọn cách sử dụng IF THEN…ELSE

IF THEN lồng nhau.

Ví dụ 3:

- IF delta<0 Then write(‘pt vo nghiem’)

Else

IF delta=0 Then

write(‘pt co nghiem nhat’) Else

Dạng câu lệnh ghép:

nào nêu thực câu lệnh nào?

HS: Dạng 1: Nếu điều kiện thực câu lệnh 1, ngược lại thực câu lệnh

Dạng 2: Nếu điều kiện thực câu lệnh, sai khơng thực câu lệnh

Gv: Chúng ta quay lại ví dụ giải pt bậc 2: Em chuyển câu sang câu lệnh If Then

HS:

- IF delta<0 Then write(‘pt vo nghiem’); - IF delta=0 Then

write(‘pt co nghiem nhat’); - IF delta>0 Then

- GV: Từ ví dụ với câu lệnh if then dạng thiếu, đưa dạng đủ không?

HS: Đưa dạng đủ

GV: Chúng ta đưa dạng đủ dùng câu lenẹh if then lồng

IF delta<0 Then write(‘pt vo nghiem’) Else

IF delta=0 Then

write(‘pt co nghiem nhat’) Else

GV: Với câu lệnh trên, chưa tính giá trị nghiệm, mà đưa thơng báo có nghiệm hay không

(27)

5’

< Câu lệnh 2>; ……… <Câu lệnh n>;

END;

Ví dụ 1:

Tìm nghiệm thực phương trình bậc hai: ax2 + bx + c = 0

với a ≠

PROGRAM VI_DU_1; Uses crt;

Var a,b,c:real; Delta,x1,x2:Real;

Begin clrscr;

Write(‘a,b,c:’); readln(a,b,c); Delta:=b*b-4*a*c;

IF Delta<0 then writeln(‘pt vo nghiem.’

else

begin

x1:=(-b-sqrt(Delta))/(2*a); x2:=-b/a-x1;

Writeln(‘x1=’,x1:8:3,’ x2=’,x2:8:3);

end; readln End Ví dụ 2:

Tìm số ngày năm N,biết năm nhuận năm chia hết cho 400 chia hết cho

không chia hết cho 100

PROGRAM Vi_du_2; Uses crt;

Var N, SN: Integer; BEGIN

Clrscr;

Write(‘Nam:’); readln(N); If (N MOD 400=0) OR ( (N MOD4=0)

hình, tương ứng hai câu lệnh Để thể điều đó, TP cung cấp cho câu lệnh ghép

GV: Em dùng câu lenẹh ghép để viết lại ví dụ trên?

HS:

IF delta<0 Then write(‘pt vo nghiem’) Else

IF delta=0 Then Begin

X:=-b/(2*a);

write(‘pt co nghiem nhat’); End

Else Begin

x1 := (-b+sqrt(delta))/(2*a); x2 := (-b-sqrt(delta))/(2*a);

write(‘pt co nghiem phan biet’); end;

(28)

AND (N MOD 100<>0)) Then SN:=366

Else SN:=365;

Writeln(‘So cua nam’, N,’la’,SN);

Readln END

4 Củng cố

- Nắm cú pháp câu lệnh rẽ nhánh dạng thiếu dạng đủ

- Nắm dùng câu lệnh dạng đủ dùng câu lệnh dạng thiếu

- Nắm câu lệnh ghép - Biết sử dụng if the lồng

- Bài tập nhà: Bài (sgk – tr.51) 3.1; 3.2; 3.3; 3.5; 3.14; 3.15; 3.16; 3.17; 3.18; 3.19; 3.20; 3.21 (sbt)

- GV: Hướng dẫn HS 3.18 3.19:

+ số a, b, c thứ tự lập thành cấp số nhân có tính chất: b2=c*a

(29)

TiÕt 12:

Bµi tËp vµ thùc hµnh (tiÕt 1)

-BiÕt lùa chän vµ tỉ chøc rẽ nhánh lập trình giải toán cụ thể 2.Kỹ năng:

-Son c chng trỡnh, lu lên đĩa, dịch lỗi cú pháp, thực tìm li thut toỏn v hiu chnh

-Bớc đầu sử dụng cấu trúc rẽ nhánh II-Đồ dùng dạy học:

-Máy tính, máy chiếu prôjector

-Một số chơng trình mẫu viết sẵn, câu hỏi thảo luận 2.Chuẩn bị học sinh:

1.Hoạt động 1: toán Pitago.

T Hoạt động giáo viên Hoạt động học sinh 10’ 1.Chiếu chơng trình lên bảng Yêu cầu học

sinh thực nhiệm vụ: -Xác định toán?

- Nªu ý tëng?

- GV: Khi kiểm tra a, b, c có phải pitago khơng, ta cần kiểm tra số thỏa mãn đồng thời hay khơng đẳng thức đó? - Xảy khơng đồng thời, cần kết luận đợc Vậy, dùng hàm gì?

- Tõ ý tởng xây dựng thuật toán?

1.Quan sát bảng trả lời câu hỏi - Input: a, b, c nguyên dơng

- Output: số a, b, c pitago số a, b, c không pitago

- Ys tng: Kim tra xem có đẳng thức đẳng thức sau thỏa mãn không:

a2=b2+c2 b2=a2+c2 c2=b2+a2

- Không cần đồng thời Mà xảy đẳng thức kết luận đợc pitago

- Dùng hàm logic OR để kiểm tra - Thuật toán:

+ NhËp sè nguyên a, b, c

(30)

+ Thông b¸o “khong la bo pitago” råi kÕt thóc

T Hoạt động giáo viên Hoạt động học sinh 30’ Dựa vào thuật tốn viết chơng trình trình hon

chỉnh?

2 Lu chơng trình ?

1.Viết chơng trình trình

IV-Đánh giá cuối (5 ):’

(31)

TiÕt 13:

Bµi tËp vµ thùc hµnh (tiết 2)

-BiÕt lùa chän vµ tổ chức rẽ nhánh lập trình giải toán cụ thể

- Vit v hiu chnh, chạy chơng trình trình với liệu khác kim tra thut toỏn

2.Kỹ năng:

-Soạn đợc chơng trình, lu lên đĩa, dịch lỗi cú pháp, thực tìm lỗi thuật tốn hiệu chnh

-Bớc đầu sử dụng cấu trúc rẽ nhánh II-Đồ dùng dạy học:

-Một số chơng trình mẫu viết sẵn, câu hỏi thảo luận 2.Chuẩn bị cña häc sinh:

-Sách giáo khoa, ghi III-Hoạt động dạy học: * Kiểm tra 15 phút - Thực hành:

Viết chơng trình nhập vào số nguyên dơng a, b, c Kiểm tra xem a, b, c theo thức tự có lập thành cấp số nhân khơng? Nếu phải tăng số lên đơn vị, đa giá trị số a, b, c hình? (Trong đó, a, b, c thứ tự lập thành cấp số nhân có tính chất: b2= a*c).

1.Hoạt động 1: Mở chơng trình trình Pitago thực hiện, kiểm tra lỗi, hiệu chỉnh ch-ơng trình trình

T Hoạt động giáo viên Hoạt động học sinh 20’ Mở chơng trình Pitago?

2 Nhấn F7 để thực câu lệnh ch-ơng trình, nhập giá trị: 3, 4,

3 Vào bảng Dubug mở cửa sổ hiệu chỉnh để xem xem giá trị a2, b2, c2

4 Nhấn F7 để thực câu lệnh tính giá trị nói trên, so sánh với kết a2=9, b2=16, c2=25

5 Quan s¸t rÏ nh¸nh

1 Mở chơng trình trình Pitago, tiết trớc soạn thảo lu

2 HS thao tác lần lợt bớc theo híng dÉn cđa GV

2.Hoạt động 2: Test với liệu, kỹ lập trình, sử dụng câu lệnh khác nhau.

T Hoạt động giáo viên Hoạt động học sinh 20’ Chạy chơng trình theo bớc nh tiét trớc với

(32)

2 Thay dÃy câu lệnh: a2:=a; b2:=b; c2:=c

a2:=a2*a; b2:=b2*b; c2:=c2*c; Bằng dÃy câu lệnh:

a2:=a*a; b2:=b*b; c2:=c*c (Hoặc sử dụng hàm bình ph¬ng)

Thì kết có thay đổi khơng với liệu nh

2 HS thay đổi câu lệnh kiểm tra máy cách chạy ch-ơng trình trình với liệu trả li cõu hi

IV-Đánh giá cuối (5 ):

(33)

Tiết 14:

Cấu trúc lặp

I Mục tiêu KiÕn thøc

- Biết đợc ý nghĩa cấu trúc lặp

- Biết đợc cấu trúc chung câu lệnh lặp For - Do ngôn ngữ lập trình Pascal - Biết sử dụng hai dạng câu lệnh For ngơn ngữ lập trình Pascal

2 Kỹ

Bc u s dng c lnh For để lập trình giải đợc số toán đơn giản II Đồ dùng dạy học

1 Chuẩn bị giáo viên

Máy tính, máy chiếu, sách giáo khoa sách giáo viên Chuẩn bị cđa häc sinh

S¸ch gi¸o khoa

III Hoạt động dạy - học

1 Hoạt động 1(15p): Tìm hiểu ý nghĩa cấu trúc lặp a Mục tiêu

- Học sinh thấy đợc cần thiết cấu trúc lặp lập trình b Nội dung

Bài tốn 1: Viết chơng trình in hình dãy số nguyên liên tiếp từ đến 5? Bài tốn 2: Viết chơng trình tính tổng S= 1/1+1/2+1/3+1/4+1/5

TG Hoạt động giáo viên Hoạt động học sinh

7

1 Chiếu toán

- Hãy xác định cách viết hình dãy số nguyên liên tiếp từ đến 5? - Gợi ý: Chúng ta có câu lệnh đa liệu hình?

- Gợi ý: Để viết đợc số liên tiếp viết nh nào?

2 Chiếu toán

- Gi ý: Cách tính tổng nh liên hệ đến việc chia táo: Có táo, đợc cả, thức chia làm đôi đợc phân, thức ba chia làm ba, đợc phần…, đến thứ 5, chia làm phần đợc phần Mỗi lần chia cộng vào đợc tổng số táo đợc chia sau lần - Cách tớnh tng S?

- Tơng tự nmh 1, phải thao tác cộng lần?

- Thuật toán 1?

- Viết thuật toán 2?

- Với thuật toán nh vậy, sử dụng câu lệnh If - Then không?

1 Chú ý quan sát toán đặt vấn đề

- Dùng câu lệnh write để viết số hình

- Để viết số từ đến hình dùng câu lệnh write liên tiếp

- C¸ch tÝnh tỉng S: + Tính tổng 1+1/2

+ Đợc kết cộng với 1/3 + Đợc kết cộng với ẳ

+Đợc kết cộng với 1/5

+ Tổng kết sau lần cộng dồn - Thao tác cộng lần cho kết - ThuËt to¸n:

+ B1: i  1;

+B2: Nếu i>5 xuống B5 +B3: Đa giá trị i hình +B4: i i+1, quay lại B2 +B5: Kết thúc

- Thuật toán bµi 2: +B1: i  1; S  0;

(34)

5’

- Với câu lệnh IF - THEN điều kiện đợc kiểm tra cho kết thực đợc lần, lặp lại Để thể đợc thao tác lặp, Turbo Pascal cung cấp cấu trúc lặp

- Với toán này, thao tác ghi giá trị i đợc lặp lần, tức biết trớc số lần lặp Để diễn tả thao tác lặp biết trớc số lần lặp thuật toán Pascal cung cấp câu lệnh FOR-DO

+B4: i  i+1, quay l¹i B2; +B5: §a S råi kÕt thóc

- Không thể sử dụng câu lệnh IF - THEN câu lệnh IF - THEN lặp lặp lại lần thao tác đa giá trị i hình

2 Hot ng 2: Tìm hiểu câu lệnh lặp For ngơn ngữ lập trình Pascal a Mục tiêu:

- Học sinh biết đợc cấu trúc chung lệnh FOR Hiểu đợc ý nghĩa thành phần câu lệnh Biết đợc thực máy gặp FOR Vẽ sơ đồ thực câu lệnh b Nội dung:

- D¹ng tiÕn: CÊu tróc:

For <biến đếm>:= <Gtrị đầu> To <Gtrị cuối> Do <Lệnh cần lặp>; Trong đó:

For, To, Do: Tõ khãa

Biến đếm: Là biến kiểu nguyên, ký tự miềm

Gtrị đầu, Gtrị cuối hằng, biểu thức kiểu với biến đếm Giá trị đầu phải nhỏ giá trị cuối

- Sù thùc hiƯn cđa m¸y:

+ Bớc 1: Tính giá trị đầu, gán cho biến đếm

+ Bớc 2: kiểm tra, biến đếm <= giá trị cuối Thực câu lệnh cần lặp,

Tăng biến đếm lên đơn vị quay lại Bớc - Sơ đồ thực hiện:

- D¹ng lïi: CÊu tróc:

For <biến đếm>:= <Gtrị cuối> DownTo <Gtrị đầu> Do <Lệnh cần lặp>; Trong đó:

For, DownTo, Do: Tõ khãa

+ Bớc 1: Tính giá trị cuối, gán cho biến đếm + Bớc 2: kiểm tra, biến đếm >=giá trị đầu

Thùc câu lệnh cần lặp,

Gim bin m lên đơn vị quay lại Bớc - Sơ đồ thực hiện:

B® : =b® + 1

Bđ :=Giá trị đầu

Bđ<=Gtrị cuối

T

C©u lƯnh

F

(35)

c bớc tiến hành:

TG Hot động giáo viên Hoạt động học sinh 10’ - Từ , phát biểu thành

lêi nh thÕ nµo? - Bµi 2?

- Sau lần thực in giá trị i cộng dồn tổng i thay đổi nh th no?

- Từ phát biểu dạng lặp:

Từ 1 đến 5, thực hiện đa giá trị i ngồi hình

Từ đến 5, thực hiện cộng dồn 1/i vào tổng

- Dạng lặp nh gọi lặp tiến

T đến….thực (làm)…… , tơng ứng tiếng Anh?

- Có thể cộng từ số lớn lùi số bé đợc khơng? Nếu đợc tốn đợc tính nh nào?

- Sau lần thực in giá trị i cộng dồn tổng giá trị i thay đổi nh nào?

-Phát biểu dạng lặp trờng hợp này?

- Từ Lùi (quay về) Thực (làm), tơng ứng tiếng Anh?

- Dạng lặp nh gọi lặp lùi - Cấu trúc dạng lặp tiến lùi: - Dạng tiến:

Cấu trúc:

For <biến đếm>:= <Gtrị đầu> To <Gtrị cuối> Do <Lệnh cần lặp>;

- D¹ng lïi: CÊu tróc:

For, To, DownTo Do: Từ khóa Biến đếm: Là biến kiểu nguyên, ký

- Lần lợt với giá trị i từ đến thực lệnh đa giá trị i hình

- Lần lợt với giá trị i từ đến 5, thực cộng dồn 1/i vào tổng

- i đợc tăng lên đơn vị

- T¬ng øng tiÕng Anh: For …….To…… Do

- Có thể tính từ số lớn lựi v c:

+Bài 1: Lần lợt với giá trÞ cđa i tõ lïi vỊ thùc hiƯn lệnh đa giá trị i hình

+Bài 2: Lần lợt với giá trị i từ lùi 1, thực cộng dồn 1/i vào tổng - i đợc giảm đơn vị

Tõ 5 lïi vỊ 1, thùc hiƯn ®a giá trị i hình

Từ lïi vỊ 1, thùc hiƯn céng dån 1/i vµo tỉng

- T¬ng øng tiÕng Anh: For…… DownTo…… Do

Bđ : =bđ - 1

Bđ :=giá trị cuối

Bđ<=Gtrị đầu

T

C©u lƯnh

F

(36)

tù miềm

- Giải thích thực máy dạng tiến yêu cầu học sinh giải thích dạng lùi

Gtr u, Gtr cui l hằng, biểu thức kiểu với biến đếm Giá trị đầu phải nhỏ giá trị cuối

- ý nghĩa giá trị đầu giá trị cuối? - Đối với giá trị đầu giá trị cuối bao nhiêu?

- Dùng để giới hạn biến đếm (giới hạn vòng lp)

- Giá trị đầu giá trị cuối là: Giá trị đầu = 1, giá trị cuối =

3 Hot ng 3: Rèn luyện kỹ dùng câu lệnh FOR a Mục tiêu:

- Sử dụng câu lệnh FOR để giải đợc toán đơn giản b Nội dung

Bài 1: Viết hình số liên tiếp từ đến Bài 2: Tính tng: S= 1+1/2+1/3++1/N

c Các bớc tiến hành

10p Nêu toán

+ Xác định giá trị đầu, giá trị cuối + Xác định lệnh lặp

- Từ mệnh đề phát biểu lời dạng lặp, yêu cầu HS chuyển sang câu lệnh For dạng tiến:

Từ 1 đến 5, thực hiện đa giá trị i hỡnh

- Tơng tự dạng tiến, hs lên viÕt d¹ng lïi:

Tõ 5 lïi vỊ 1, thùc hiện đa giá trị i hình

- Tơng tự

- Giá trị đầu, giá trị cuối, lệnh lặp? - Viết thành câu lệnh lặp For

- Giá trị đầu = 1, giá trị cuối = 5;

- Lệnh lặp lệnh in giá trị i hình: Write(i);

- For i:=1 To Do write(i);

- For i:=5 DownTo Do write(i); - Giá trị đầu = 1, giá trị cuối = N - S:=0

- For i:=1 To N Do S:=S+1/i; IV Cñng cè bµi - bµi tËp vỊ nhµ (5p)

(37)

TiÕt 15:

CÊu tróc lỈp (tiết 2)

I Mơc tiªu KiÕn thøc

- Biết đợc ý nghĩa cấu trúc lặp với số lần cha biết trớc số lần lặp

- Biết đợc cấu trúc chung câu lệnh lặp While - Do ngơn ngữ lập trình Pascal - Biết sử dụng hai dạng câu lệnh WHILE ngôn ngữ lập trỡnh Pascal

2 Kỹ

Bc u s dụng đợc lệnh While để lập trình giải đợc số toán đơn giản II Đồ dùng dạy hc

Máy tính, máy chiếu, sách giáo khoa sách giáo viên Chuẩn bị học sinh

Sách giáo khoa

III Hoạt động dạy - học * Kiểm tra cũ (5ph):

- Một học sinh lên viết cú pháp dạng lặp tiến lùi, giải thích thành phần câu lệnh - Một học sinh lên bảng vẽ sơ đồ thực nêu cách thực máy

1 Hoạt động 1(15p): Tìm hiểu ý nghĩa cấu trúc lặp cha biết trớc số lần lặp a Mục tiêu

- Học sinh thấy đợc cần thiết cấu trúc lặp có số lần cha xác định lập trình b Nội dung

Bài toán 1: Bài toán bỏ bi vào thïng?

Bài tốn 2: Viết chơng trình tính tổng S=1+1/2+1/3+1/4+…1/N+… 1/N<0.0001 c Các b ớc tiến hành

TG Hoạt động giáo viên Hoạt động học sịnh

10’ ChiÕu néi dung bµi 1:

- Hỏi: Trong tốn có lặp lặp lại khơng? Nếu có cơng việc đợc lặp lặp lại?

- Hái: Trong toán này, có biết bỏ lần bi đầy thùng không?

- Hi: Lp lần? - Hỏi: Lặp đến nào? - Chiếu hình ảnh mơ Chiếu nội dung

- Chiếu lại nội dung toán trớc toán

- Hi: Trong bi tốn có khác nhau? - Hỏi: (Có biết đến 1/N<0.0001) Lặp lần?

- Hỏi: Đến nào?

- Chỳng ta có cấu trúc câu lệnh lặp biết trớc số lần lặp với câu lệnh For Nhng thực tế, có nhiều việc, tốn có lặp mà trớc số lần lặp Turbo Pascal cung cấp câu lệnh lặp trớc số lần lặp: While - Do

- Trong tốn có lặp lặp lại, công việc bỏ bi vào thùng đợc lặp lặp lại

- Lặp số lần lặp - Lặp đến thùng đầy

- Chú ý theo dõi kỹ để trả lời câu hỏi - Bài trớc: Lặp với số lần biết trớc (N ln)

- Bài toán này: Lặp trớc số lần lặp

- Khụng bit trc s lần lặp - Lặp đến 1/N<0.0001

(38)

- Học sinh biết đợc cấu trúc chung câu lệnh While Hiểu đợc ý nghĩa thành phần lệnh Biết đợc thực máy gặp while Vẽ đợc sơ đồ thực

b Néi dung CÊu tróc:

While <điều kiện> Do <lệnh cần lặp>; Trong đó: While, Do: Từ khóa

Điều kiện: Là biểu thức quan hệ biểu thức logic Câu lệnh câu lệnh Pascal

- Sù thực máy:

+ Bớc 1: Tính kiĨm tra ®iỊu kiƯn

+ Bớc 2: Nếu điều kiện (có giá trị True) thực hiẹn câu lệnh cần lặp, quay lại b -ớc1 Nếu sai khỏi câu lệnh while -

- S thc hin:

TG Hoạt động giáo viên Hoạt động hc sinh

- Chiếu lại mô - Phát biểu cách bỏ bi?

- Phát biểu lại nh sau: Chừng mà thùng cha đầy bỏ bi vào

Hoặc: Trong khi thùng ch a đầy thực hiện (làm) bỏ bi vào

- Hỏi: Tơng tự phát biểu cách tính tổng nh thÕ nµo?

- Hỏi: Điều kiện đợc thỏa mãn bỏ bi (Tính tổng)?

- Hỏi: Công việc đợc lặp?

- Hái: Trong khi, làm - tơng ứng tiếng Anh?

- Hỏi: Viết lại phát biểu trên, có câu lệnh lặp trớc số lần lặp:

While <điều kiện) Do <câu lệnh cần lặp>; - Giải thích thành phần câu lệnh, cách thực máy

- Hỏi: Trong tốn câu lệnh cần lặp? - Hỏi: Viết sơ đồ thực hiện?

- Hỏi: Trong câu lệnh FOR biến số thay đổi nh nào?

- Nhng câu lệnh While biến số khơng đợc thay đổi giá trị tự động mà phải có câu lệnh thay đổi giá trị biến đếm

- Bỏ bi vào thùng đến đầy thùng dừng

- Trong khi 1/N ch a nhỏ 0.0001 thực hiện tính tổng

- Điều kiện thùng cha đầy (1/N ch

a nhỏ 0.0001) - Bá bi, tÝnh tæng - While,

- Trong toán 2, câu lệnh cần lặp S:=S+1/N;

N:=N+1;

- Trong câu lệnh FOR biến số đ-ợc tự động tăng (giảm) đơn vị - Vẽ sơ đồ thực vào vở, học sinh lên bảng vẽ

- Sau tõ khãa DO cã câu

F T

Điều kiện

(39)

- Hỏi: Theo cú pháp sau DO có câu lệnh Pascal, muốn thực câu lệnh sau DO phải sử dụng câu lenẹh nào?

- Để sau DO thực đợc câu lệnh sau DO câu lệnh ghép, ghép câu lệnh thành câu lệnh

3 Hoạt động 3: Rèn luyện kỹ vận dụng câu lệnh lặp trớc số lần lặp While a Mục tiêu:

- Học sinh biết sử dụng lệnh While để lập trình giải giải tốn đơn giản b Nội dung

Bài 1: Viết chơng trình tính tổng S=1+1/2+1/3+1/4+…1/N+… 1/N<0.0001? Bài 2: Viết chơng trình tìm ớc chung lớn hai số ngun dơng a b?

c C¸c bíc tiÕn hµnh

1 ChiÕu néi dung bµi Mục tiêu viết ch-ơng trình hoàn thiện

- Định hớng vấn đề + Xác định điều kiện để tiếp tục lặp + Xác định lnh cn lp

- Yêu cầu học sinh viết chơng trình hoàn chỉnh gọi học sinh lên bảng viết ch-ơng trình hoàn chỉnh, nhận xét

- Chiếu lại toán tiết trớc: Viết ch-ơng trình tính tổng: S=1+1/2+…+1/N Chúng ta sử dụng câu lệnh While - Do đợc không? Nếu đợc điều kiện gì? - Vậy, trờng hợp lặp với số lần biết trớc tr-ờng hợp đặc biệt lặp trớc số lần lặp Mọi câu lệnh For - Do chuyển câu lenẹh While - Do đợc - Hỏi: Chuyển từ câu lệnh FOR sang câu lệnh WHILE nh nào?

2 ChiÕu néi dung bµi

- Hỏi: Thuật toán tìm ớc chung lớn số nguyên dơng a b?

- Hỏi: Điều kiện lặp? - Hỏi: Lệnh cần lặp?

- yêu cầu học snh viết chơng trình?

- Hi: giải đợc toán lặp cần trả lời đợc hai câu hỏi nào?

- §iỊu kiƯn: 1/N<0.0001; - S:=S+1/N;

- N:=N+1;

- Có thể sử dụng câu lệnh While - Do đợc, với điều kiện i<=N tính tổng

i:=1;

- While i<=N Do S:= S+1/i; * ThuËt to¸n:

- B1: Nhập a b nguyên dơng; - B2: Nếu a=b th× ucln=a, råi kÕt thóc - B3: NÕu a>b a:=a-b, quay lại b2; - B4: b:=b-a, quay lại b2;

- Điều kiện lặp: a<>b

- Lệnh cần lặp a:=a-b b:=b-a; - Phai trả lời đợc hai câu hỏi:

(40)

Tiết 16

Bài tập câu lệnh lặp

Mục tiêu Kiến thức

- Củng cố câu lệnh lặp For - Do câu lệnh While - Do - Biết vận dụng câu lệnh lặp cho toán

- Biết cách thực máy lặp biết trớc số lần lặp lặp trớc số lần lặp Kỹ

Bớc đầu sử dụng đợc lệnh While câu lệnh FOR để lập trình giải đợc số toỏn n gin

II Đồ dùng dạy học Chuẩn bị giáo viên

Máy tính, máy chiếu, sách giáo khoa sách giáo viên Chuẩn bị cđa häc sinh

S¸ch gi¸o khoa

III Hoạt động dạy - học * Kiểm tra 15 phút - Thực hành

- Viết chơng trình thực việc tính tổng S=1+ 22+32+…+N2 ? Trong N đợc nhập từ bàn phím

1 Hoạt động Ơn lại lý thuyết dạng lặp a Mục tiêu

- Học sinh nắm đợc cấu trúc lặp, sơ đồ thực máy Phân biệt đợc giống khác lệnh For While

b Néi dung - D¹ng tiÕn:

CÊu tróc:

For <biến đếm>:= <Gtrị đầu> To <Gtrị cuối> Do <Lệnh cần lặp>; Trong đó:

For, To, Do: Tõ khãa

+ Bớc 1: Tính giá trị đầu, gán cho biến đếm

+ Bớc 2: kiểm tra, biến đếm <= giá trị cuối Thực câu lệnh cần lặp,

Tăng biến đếm lên đơn vị quay lại Bớc - Dạng lùi:

CÊu tróc:

For, DownTo, Do: Tõ khãa

+ Bớc 1: Tính giá trị cuối, gán cho biến đếm + Bớc 2: kiểm tra, biến đếm >=giá trị đầu thỡ

Thực câu lệnh cần lặp,

(41)

Điều kiện: Là biểu thức quan hệ biểu thức logic Câu lệnh câu lệnh Pascal

+ Bíc 1: TÝnh kiểm tra điều kiện

+ Bc 2: Nu điều kiện (có giá trị True) thực câu lệnh cần lặp, quay lại b -ớc1 Nếu sai khỏi câu lệnh while -

c Các b ớc tiến hành

TG Hot ng giáo viên Hoạt động học sinh 5’ u cầu học sinh lại

d¹ng cÊu tróc lặp?

2 So sánh dạng lặp? - Chiếu hai chơng trình chơng trình trình sử dụng lệnh For câu lệnh While

Giỏ tr u v giá trị cuối có mối quan hệ nh với biến đếm?

+ For <biến đếm>:= <Gtrị đầu> To <Gtrị cuối> Do <Lệnh cần lặp>;

+ For <biến đếm>:= <Gtrị cuối> DownTo <Gtrị đầu> Do <Lệnh cần lp>;

+ While <điều kiện> Do <lệnh cần lặp>; - Giống nhau: Đều lệnh lặp

- Khác nhau: Dạng For - Do:

+ Lặp biết trớc số lần lặp, dạng While - Do: Lặp trớc số lần lặp

+ Trong cõu lnh For biến đếm tự động thay đổi giá trị, câu lệnh While phải có câu lệnh làm thay đổi giá trị biến đếm

- Giá trị đầu giá trị cuối phải có kiểu hợp với kiểu biếm đếm Thờng kiểu số nguyên kiểu kí tự Giá trị đầu pơhải nhỏ hoạc giá trị cuối

2 Hoạt động Rèn luyện kĩ vận dụng tổ chức lặp a Mục tiêu

- Học sinh biết sử dụng lệnh lặp để giải toán cụ thể Linh họat việc lựa chọn cấu trúc lặp

b Néi dung

Bài 1: Viết chơng trình tính: y=



50

1 1

n n n

Bài 2: Viết chơng trình giải toán cổ: Vừa gà vừa chó,

Bó lại cho tròn Ba mơi sáu con, Một trăm chân chẵn

Hỏi có loại? c Các b ớc tiến hµnh

TG Hoạt động giáo viên Hoạt động học sinh 13’

10’

1 T×m hiĨu giải - Chiếu nội dung lên b¶ng - Cã thĨ khai triĨn biĨu thøc Y : Y= 1/2+2/3+3/4++50/51;

- Hỏi: Nhìn vào biểu thức triển khai Y, N có giá trị khoảng nào? - Để giải toán này, sử dụng cấu trúc rẽ nhánh hay lặp?

- Lặp biết trớc số lần lặp hay không? - Lệnh cần lặp?

- Viết chơng trình giải toán?

2 Tìm hiểu giải

- N có giá trị khoảng 50; - Sử dụng cấu trúc lặp

- Lặp biết trớc số lần lặp (50) - Lệnh cần lặp: Y:=Y+i/(i+1);

(42)

- Chiếu nội dung lên bảng - ý tởng giải toán? - Điều kiện gì?

- Khi thỏa mÃn điều kiện? - Sử dụng dạng lặp nào?

- Viết chơng trình hoàn chỉnh?

- Gọi số gà g, số chó lag 36-g; - Tổng số chân: 2*g+4*(36-g)=100; - Điều kiện 2*g+4*(36-g)=100; - Không biết

- Lặp trớc số lần lặp

IV Cng c (2ph) Nội dung học

- Cã cÊu tróc lặp: For While Câu hỏi tập nhà

(43)

Tiết 17

ôn tập học kì 1

Mục tiêu Kiến thức

- Nắm đợc toàn kiến thức học học kì Kỹ

- Rèn luyện đợc kỹ nhận xét, phân tích tốn II Đồ dùng dạy học

1 Chn bÞ giáo viên

Máy tính, máy chiếu, sách giáo khoa sách giáo viên Chuẩn bị học sinh

Sách giáo khoa, số chơng trình tập III Hoạt động dạy - học

1 Hoạt động Ôn lại lý thuyết học a Mục tiêu

- Nhắc lại kiến thức học b Ni dung

- Khái niệm lập trình ngôn ngữ lập trình

- Có hai loại chơng trình trình dịch: Thông dịch biên dịch

- Các thành phần ngôn ngữ lập trình: Bảng chữ cái, cú pháp ngữ nghĩa - Các khái niệm; Tên, hằng, biến thích

- Cấu trúc chơng trình Pascal: Phần khai bào phần thân - Các kiểu liệu chuẩn: Kiểu nguyên, kiẻu thực, kí tự logic - Các phép toán, biểu thức lệnh gán

- Tổ chức vào/ra - Cấu trúc rẽ nhánh - Cấu trúc lặp

c Các bíc tiÕn hµnh

TG Hoạt động Gv Hoạt động HS

Đặt câu hỏi gợi ý cho học sinh tự nhắc lại kiến thức học

- Em hiểu lập trình ngôn ngữ lập trình?

- Có loại chơng trình trình dịch? - Các thành phần ngôn ngữ lập trình?

- Các khái niệm ngôn ngữ lập trình?

- Cấu trúc chung chơng trình Pascal?

- Nờu tờn cỏc kiu d liệu chuẩn? - Nêu tên nhóm phép tốn hc? - Cỏc loi biu thc?

- Chức thực lệnh gán?

- Nêu tên chức số hàm số học chn?

- Tỉ chøc vµo ra? - Tỉ chøc rẽ nhánh? - Tổ chức lặp?

- lập trình diễn tả thuật toán ngôn ngữ lập trình

- Biên dịch thông dịch

Bảng chữ cái, cú pháp ngữ nghĩa - Khái niệm tên, biến, thích - Gồm phàn: Phần khai báo phần thân - Số nguyên, số thực, kí tự logic

- Phép toán số học, phép toán quan hệ phép toán logic

- BiĨu thøc sè häc, biĨu thøc quan hƯ vµ biĨu thøc logic

- Dùng để tính tốn giá trị biểu thức gán giá trị cho biến

- Mét sè hµm: sqr, sqrt, cos, sin, abs, - Read, readln, write vµ writeln

- Dạng đủ: If <ĐK> Then <câu lệnh1> else <câu lệnh 2>;

- Dạng thiếu: If <ĐK> Then <câu lệnh> ; - Dạng lỈp tiÕn:

+ For <biến đếm>:= <Gtrị đầu> To <Gtrị cuối> Do <Lệnh cần lặp>;

(44)

+ For <biến đếm>:= <Gtrị cuối> DownTo <Gtrị đầu> Do <Lệnh cần lặp>;

- Dạng lặp trớc số lần lặp: + While <điều kiện> Do <lệnh cần lặp>; 2 họat động 2: Rèn luyện kỹ

a Mục tiêu:

- Học sinh biết phân tích , nhận xét giải hoàn chỉnh toán b Nội dung

Vit chng trỡnh nhp từ bàn phím số nguyên dơng N (1<=N<=100) dãy số A gồm N số nguyên a1, a2,…,aN Các số có giá trị tuyệt đối khơng lớn 1000 Hãy đa hình số lợng số dơng số âm dãy

TG Hoạt động giáo viên Hoạt động học sinh Xác định toán

- Chiếu nội dung đề lên bảng

- Viết chơng trình trình hoàn chỉnh?

- Quan sỏt xác định toán

- input: N nguyên dơng (1<=N<=100) dãy A: a1,…,aN , có giá trị tuyệt đối không lớn 1000

- Output: Số lợng số dơng số lợng số âm dÃy

- Thực hiẹn viết chơng trình trình theo sù h-íng dÉn cđa GV

IV Đánh giá cuối bài Những nội dung học

- Giáo viên u cầu nhắc lại nội dung ơn tập Câu hỏi tập nhà:

- Chn bÞ kiÐn thøc cho tiÕt kiĨm tra häc kì

(45)

Chơng 4: kiểu liƯu cã cÊu tróc

TiÕt 19

 i11 Kiểu mảng

I Mục tiêu Kiến thức

- Biết đợc số kiểu liệu kiểu mảng chiều Biết đợc loại biến có số - Biết cấu trúc tạo kiểu mảng chiều cách khai báo biến kiểu mảng chiều

2 Kỹ

- To c kiu mng chiều sử dụng biến kiểu mảng chiều ngơn ngữ lập trình Pascal để giải s bi toỏn c th

III Đồ dùng dạy học Chuẩn bị giáo viên - Máy tính, máy chiếu Projector Chuẩn bị học sinh

- S¸ch gi¸o khoa

1 Hoạt động 1: Tìm hiểu ý nghĩa mảng chiều a Mục tiêu

Biết đợc ý nghĩa cần thiết kiểu mảng chiều việc giải số toán Biết đợc khái niệm mảng chiều

b Néi dung

- Ví dụ 1: Nhập vào nhiệt độ (trung bình) ngày tuần Tính đa hình nhiệt độ trung bình tuần số lợng ngày có nhiệt độ cao nhiệt độ trung bỡnh ca tun

- Chơng trình minh họa: Program nhiet_do_tuan;

Var t1, t2, t3, t4, t5, t6, t7, tb: Real; Dem: Integer;

Begin

Write(‘Nhap nhiet cua tuan: ‘); readln(t1, t2, t3, t4, t5, t6, t7); Tb := (t1+t2+t3+t4+t5+t6+t7)/7;

Dem :=0;

If t1>tb then dem := dem+1; If t2>tb then dem := dem+1; If t3>tb then dem := dem+1; If t4>tb then dem := dem+1; If t5>tb then dem := dem+1; If t6>tb then dem := dem+1; If t7>tb then dem := dem+1;

Writeln(‘Nhiet trung binh cua tuan: ‘, tb);

Writeln(‘So co nhiet cao hon nhiet trung binh cua tuan la: ‘, dem); Readln;

End

- Ví dụ 2: Nhập vào nhiệt độ (trung bình) N ngày Tính đa hình nhiệt độ trung bình N ngày số lợng ngày có nhiệt độ cao nhiệt độ trung bình N ngày - Mảng chiều dãy hữu hạn phần tử có kiểu liệu Các phần tử mảng có chung tên phân biệt số Để mô tả mảng chiều cần xác định đợc kiểu phần tử cách đánh số phần tử

- Hầu hết ngơn ngữ lập trình có quy tắc cho phép xác định tên kiểu mảng, số lợng phần tử, kiểu liệu phần tử, cách khai báo biến kiểu mảng cách tham chiếu đến phần tử mảng

TG Hot ng ca giáo viên Họat động học sinh 10’ Chiếu ví dụ 1:

(46)

màn hình nhiệt độ trung bình tuần số lợng ngày có nhiệt độ cao nhiệt độ trung bình tuần

- Gợi ý: dùng biến thực t1, t2, t3, t4, t5, t6, t7 để lu nhiệt độ trung bình ngày tuần, biến tb dùng để lu nhiệt độ trung bình tuần

- Dùng biến dem để lu số ngày có nhiệt độ cao nhiệt độ trung bình tuần - Dùng câu lệnh If để kiểm tra nhiệt độ ngày tuần cao nhiệt độ trung bình tuần

2 Yêu cầu học sinh viết chơng trình giải toán

- Có nhận xét cách khai báo biến câu lệnh chơng trình?

- Vi cỏch khai bỏo bin nh trên, thay câu lệnh If lệnh lặp đợc không?

3 ChiÕu vÝ dô 2:

Ví dụ 2: Nhập vào nhiệt độ (trung bình) N ngày Tính đa hình nhiệt độ trung bình N ngày số lợng ngày có nhiệt độ cao nhiệt độ trung bình N ngày

- Để giải tốn này, sử dụng tơng tự nh tốn đợc khơng? - Để lu nhiệt độ trung bình N ngày dùng N biến t1, tn N câu lệnh If đợc không? (N tổng quát)

- Để giải đợc tốn này, ngơn ngữ lập trình, ngơn ngữ Pascal cung cấp cho cấu trúc mảng chiều

- Mảng chiều dãy hữu hạn phần tử có kiểu liệu Các phần tử mảng có chung tên phân biệt số Để mô tả mảng chiều cần xác định đợc kiểu phần tử cách đánh số phần tử

- Hầu hết ngơn ngữ lập trình có quy tắc cho phép xác định tên kiểu mảng, số lợng phần tử, kiểu liệu phần tử, cách khai báo biến kiểu mảng cách tham chiếu đến phần tử mảng

Program nhiet_do_tuan;

Var t1, t2, t3, t4, t5, t6, t7, tb: Real; Dem: Integer;

Begin

Write(‘Nhap nhiet cua tuan: ‘); readln(t1, t2, t3, t4, t5, t6, t7);

Tb := (t1+t2+t3+t4+t5+t6+t7)/7; Dem :=0;

If t1>tb then dem := dem+1; If t2>tb then dem := dem+1; If t3>tb then dem := dem+1; If t4>tb then dem := dem+1; If t5>tb then dem := dem+1; If t6>tb then dem := dem+1; If t7>tb then dem := dem+1; Writeln(‘Nhiet trung binh cua tuan: ‘, tb);

Writeln(‘So co nhiet cao hon nhiet trung binh cua tuan la: ‘, dem);

Readln; End

- Khai b¸o nhiỊu biÕn

- Câu lệnh If đợc sử dụng lặp lại nhiều lần

- Với cách khai báo biến nh dùng câu lệnh lặp đợc

- V× N tổng quát cha biết nên phải khai báo biến sử dụng câu lệnh If

2 Hot ng 2: Tạo kiểu mảng chiều khai báo biến kiểu mảng a Mục tiêu

Học sinh biết đợc cách tạo kiểu mảng chiều ngơn ngữ lập trình Pascal, biết cách khai báo biến tham chiếu đến phần tử mảng

b Néi dung

(47)

+ Kiểu_chỉ_số: Thờng đoạn số nguyên (hoặc đoạn kí tự) xác định số đầu v ch s cui ca mng

+ Kiểu_ thành_phần: Là kiểu liệu chung phần tử mảng + Khai báo biến mảng chiều:

VAR <tên_biến> : <tên_kiểu_mảng>; * Cách 2: Khai báo trực tiếp:

VAR <tên_biến> : Array [ <kiểu_chỉ_số>] Of <Kiểu_thành_phần>; - Tham chiếu đến phần tử: Tên_biến[chỉ số]

TG Hot ng ca giỏo viên Hoạt động học sinh 15’ Nhắc lại cấu trúc chung chơng trình?

2 Từ khóa định nghĩa kiểu từ khóa khai báo biến?

3 Chiếu cách định nghĩa kiểu liệu mảng chiều khai báo biến mảng:

- Có hai cách khai báo biến kiểu mảng chiều: * Cách 1: Khai báo biến thông qua định nghĩa kiểu d liu mng mt chiu:

- Định nghĩa kiểu liệu mảng chiều:

TYPE <tên_kiểu_mảng> = Array [ <kiểu_chỉ_số>] Of <kiểu_thành_phần>;

+ Kiu_ch_s: Thng l mt đoạn số nguyên (hoặc đoạn kí tự) xác định số đầu số cuối mảng

+ Kiểu_ thành_phần: Là kiểu liệu chung phần tử mảng

+ Khai báo biến mảng chiều: VAR <tên_biến> : <tên_kiểu_mảng>; * Cách thứ 2: Khai báo trực tiếp:

VAR <tên_biến> : Array [ <kiểu_chỉ_số>] Of <Kiểu_thành_phần>;

- Tham chiu n tng phn tử: Tên_biến[chỉ số] - áp dụng định nghĩa kiểu khai báo biến ví dụ 1: * Cách 1:

Type Array_a = array[1 7] Of real; VAR a: array_a;

* C¸ch 2:

VAR a: array[1 7] Of real; - ¸p dơng víi vÝ dơ 2?

- L¸y mét sè vÝ dơ kh¸c?

- Chiếu lên bảng số định nghĩa kiểu mảng chiều:

TYPE

Array_a = array[1 200] Of real; Array_B = array [byte] Of real;

Array_C = array[-100 0] Of Boolean; Chọn định nghĩa đúng?

4 Giới thiệu cách tham chiếu đến phần tử: - Chiếu mô

- Yêu cầu học sinh lấy ví dụ?

- Nhắc lại cấu trúc chung ch-ơng trình

- Từ khóa TYPE dùng để định nghĩa kiểu từ khóa VAR dùng để khai báo biến

- Chú ý theo dõi ghi

* Cách 1:

Type Array_a = array[1 n] Of real;

VAR a: array_a; * C¸ch 2:

VAR a: array[1 n] Of real;

- Type Kieu_mang=Array[1 11] Of real;

Var A: Kieu_mang;

- Định nghĩa đúng: TYPE

Array_a = array[1 200] Of real; Array_C = array[-100 0] Of Boolean;

(48)

b×nh ngày thứ tuần

3 Hot ng 3: Rèn luyện kỹ sử dụng mảng chiều vào giải toán đơn giản a Mục tiêu: Bớc đầu vận dụng đợc cách khai báo biến kiểu mảng chiều cách tham chiếu đến phần tử mảng

b Néi dung:

- Ví dụ 1: Nhập vào nhiệt độ (trung bình) ngày tuần Tính đ a hình nhiệt độ trung bình tuần số lợng ngày có nhiệt độ cao nhiệt độ trung bình tuần đó?

- Ví dụ 2: Nhập vào nhiệt độ (trung bình) N ngày Tính đa hình nhiệt độ trung bình N ngày số lợng ngày có nhiệt độ cao nhiệt độ trung bình N ngày đó? c Các b ớc tiến hành

TG Hoạt động giáo viên Hoạt động học sinh 15’ - Chiếu ví dụ lên hình

chiÕu - VÝ dơ 1: - Gỵi ý:

+ Thay dùng biến lu nhiệt độ trung bình ngày dùng mảng chiều gồm phần tử?

+ Sử dụng mảng chiều để lu nhiệt độ ngày, thay câu lệnh nhập nhiệt độ ngày vào câu lệnh IF - ThEN lệnh lặp đợc khơng?

+ LỈp biÕt trớc hay trớc số lần lặp?

- Yêu cầu học sinh viết chơng trình hoàn chỉnh học sinh lên bảng viết chơng trình?

- Chiếu ví dụ 2:

- Gợi ý, tơng tự vÝ dơ

- Sư dơng m¶ng gåm phần tử?

- Hc sinh vit chng trỡnh học sinh lên sửa lại chơng trình ví dụ để giải ví dụ 2?

- Theo dõi ví dụ hình suy nghĩ trả lời câu hỏi

- Thay bng cỏch lu vào mảng chiều đợc Mản gồm phần tử

- Khi thay câu lệnh IF - THEN câu lệnh lặp FOR đợc (Lặp lần)

Program vi_du1;

Var T : Array[1 7] Of real; I, dem: Integer;

Tb: Real; Begin

Dem:=0; tb:=0;

Writeln(‘Nhap nhiet cua cac ngay: ‘); For i:=1 to read(T[i]);

For i:=1 to tb:=tb+T[i]; Tb:=tb/7;

For i:=1 to

If T[i]>tb then dem:=dem+1;

Writeln(‘Nhiet trung binh cua tuan la:’,tb);

Writeln(‘so co nhiet cao hon TB :’,dem);

Readln; END

- Sử dụng mảng chiều gồm N phần tö Program vi_du2;

Var T : Array[1 N] Of real; I, dem,N: Integer; Tb: Real;

Begin

Dem:=0; tb:=0;

Writeln(‘Nhap so can tinh nhiet do: ‘); Readln(N);

Writeln(‘Nhap nhiet cua cac ngay: ‘); For i:=1 to N read(T[i]);

For i:=1 to N tb:=tb+T[i]; Tb:=tb/N;

For i:=1 to N

(49)

TB :,dem); Readln; END IV Đánh giá cuối (5ph)

1 Những kiến học

- Có hai cách khai báo biến kiểu mảng chiều:

* Cách 1: Khai báo biến thông qua định nghĩa kiểu liệu mảng chiều: - Định nghĩa kiu d liu mng mt chiu:

TYPE <tên_kiểu_mảng> = Array [ <kiểu_chỉ_số>] Of <kiểu_thành_phần>;

+ Kiu_ch_s: Thng l đoạn số nguyên (hoặc đoạn kí tự) xác định số đầu số cuối mảng

+ Kiểu_ thành_phần: Là kiểu liệu chung phần tử mảng + Khai báo biến mảng chiều:

VAR <tên_biến> : <tên_kiểu_mảng>; * Cách thứ 2: Khai b¸o trùc tiÕp:

VAR <tên_biến> : Array [ <kiểu_chỉ_số>] Of <Kiểu_thành_phần>; - Tham chiếu đến phần tử: Tờn_bin[ch s]

2 Câu hỏi tập nhà

(50)

Tiêt 20

i11 Kiểu mảng (Tiết 2)

I Mục tiêu Kiến thøc

- Biết đợc số kiểu liệu kiểu mảng chiều Biết đợc loại biến có số - Biết cấu trúc tạo kiểu mảng chiều cách khai báo biến kiểu mảng mt chiu

2 Kỹ

- To c kiểu mảng chiều sử dụng biến kiểu mảng chiều ngơn ngữ lập trình Pascal để giải số tốn cụ thể

III §å dùng dạy học Chuẩn bị giáo viên - Máy tính, máy chiếu Projector Chuẩn bị học sinh

- S¸ch gi¸o khoa

1 Hoạt động 1(10ph): Kiểm tra cũ a Mục tiêu

Biết đợc ý nghĩa cần thiết kiểu mảng chiều việc giải số toán Biết đợc khái niệm mảng chiều Biết cách định nghĩa khai báo biến mảng chiều

b Néi dung

- Nêu cách khai báo biến kiểu mảng chiều? - Viết chơng trình tính điểm trung bình học kú 1?

2 Hoạt động 2: Rèn luyện kỹ sử dụng mảng chiều vào tốn tìm phần tử lớn dãy N phần tử

a Mục tiêu: Học sinh sử dụng đợc biến kiểu mảng chiềuđể giải tốn tìm phần tử lớn dãy (Thuật tốn tìm max học lp 10)

b Nội dung

Bài toán 1: Tìm phần tử lớn dÃy gồm N phần tử nguyên c Các bớc tiến hành

TG Hot động Gv Hoạt động HS 15' Chiu ni dung

bài toán lên hình

2 Gợi ý để giải toán: - Xác định tốn? - Thuật tốn tìm max?

- Mô thuật toán

- Dóy gm N phần tử, để lu giá trị N phần tử này, cần khai báo biến nh nào?

- Để tìm đợc số lớn nhất, so sánh lần lợt phần tử từ phần tử thứ hai đến phần tử thứ N so sánh với Max, có thao tác đợc lặp lặp lại không?

- Theo dõi nội dung toán hình trả lời câu hỏi - Input: N nguyên dơng dÃy: a1, , aN

- Output: Max dÃy - Thuật toán:

B1: Nhập N d·y A1, AN B2: Maxa1, i2

B3: NÕu i>N đa giá trị Max B4: Nếu ai> max Maxai B5: ii+1, quay lại B3

- Để lu giá trị N phần tử, dùng mảng mét chiỊu gåm N phÇn tư

- Thao tác so sánh với Max đợc lặp lặp lại - Lặp biết trớc số lần lặp (N lần)

Program Tim_max; Uses crt;

Type mang_A = Array[1 100] Of Real; Var A: mang_A;

(51)

viÕt chơng trình hoàn chỉnh học sinh lên bảng viết chơng trình? - Chạy chơng trình

Write('Gia tri cua cac phan tu day:'); for i:=1 to N read(a[i]);

ln:=a[1]; vt:=1; for i:=2 to N

if a[i]> ln then

begin ln:=a[i];vt:=i; end;

writeln('So lon nhat cua day la: ',ln:5:0,'la phan tu thu:',vt);

readln; End

3 Hoạt động 3: Rèn luyện kỹ sử dụng biến mảng chiều để giải tốn tìm kiếm nhị phân

a Mục tiêu: Hiểu thuật tốn tìm kiếm nhị phân vận dụng kiểu mảng chiều để giải toán

b Néi dung:

Bài toán: Cho dãy A gồm N số nguyên: a1, , aN, đợc xếp dãy thành dãy A không giảm Tìm vị trí phần tử dãy có giỏ tr bng K

TG Hoạt động gv Hoạt động hs 15' Chiếu nội dung

bµi tËp

2 Gợi ý câu hỏi

- Xỏc nh bi toỏn?

- Mô thuật toán

- Dựa vào thuật toán học lớp 10, tìm thấy? dùng vịng lặp nào? - Viết chơng trình?

- Theo dâi bµi tËp bảng suy nghĩ trả lời câu hỏi

- Input: N nguyên dơng dÃy A không giảm

- Output: Vị trí số hạng có giá trị K thông báo không tìm thấy

- Tìm thấy a[g]=k, vòng lặp while - Program Nhi_phan;

uses crt;

const Nmax=300;

Type day=Array[1 Nmax] of integer; Var A: day;

N,i,k,d,c,g,vt:Integer; chua_thay:Boolean; Begin clrscr;

write('Nhap vao so phan tu cua day N='); readln(N); write('Nhap vao gia tri cua K='); readln(K);

writeln('Nhap cac phan tu cua day khong giam:'); for i:=1 to N

Begin

write('Nhap phan tu thu i= ',i,' ,a[',i,']=');

readln(A[i]); End;

d:=1; c:=N;vt:=0; chua_thay:=true;

while (d<=c) and chua_thay Do Begin

g:=(d+c) div 2; if g>k then c:=g-1 else d:=g+1; if a[g]=k then Begin

chua_thay:=false; vt:=g;

end; end;

If not chua_thay then

(52)

day co gtri bang k=',k)

else writeln('Khong co so hang nao day bang ',k);

readln; End

IV Đánh giá cuối (5ph)

- Kiến thức học: Định nghĩa, khai báo biến kiểu mảng chiều áp dụng đợc vào giải toán đơn giản học lớp 10

(53)

Tiªt 21

 i11 Kiểu mảng (Tiết 3)

I Mục tiêu Kiến thøc

- Biết đợc số kiểu liệu kiểu mảng chiều Biết đợc loại biến có số - Biết cấu trúc tạo kiểu mảng chiều cách khai báo biến kiểu mảng mt chiu

2 Kỹ

- To c kiểu mảng chiều sử dụng biến kiểu mảng chiều ngơn ngữ lập trình Pascal để giải số tốn cụ thể

III §å dùng dạy học Chuẩn bị giáo viên - Máy tính, máy chiếu Projector Chuẩn bị học sinh

- S¸ch gi¸o khoa

1 Hoạt động 1(10ph): Kiểm tra cũ a Mục tiêu

Biết đợc ý nghĩa cần thiết kiểu mảng chiều việc giải số toán Biết đợc khái niệm mảng chiều Biết cách định nghĩa khai báo biến mảng chiều

b Néi dung

- Nêu cách khai báo biến kiểu mảng chiều?

- Viết chơng trình trình tìm số nhỏ nhÊt cđacđa d·y A gåm N sè nguyªn: a1, ,aN

2 Hoạt động 2: Rèn luyện kỹ sử dụng biến mảng chiều để giải toán xếp dãy N phần tử( Thuật toán tráo đổi)

a Mục tiêu: Hiểu thuật toán tráo đổi vận dụng kiểu mảng chiều để giải toỏn

b Nội dung:

Bài toán: Cho dÃy A gồm N số nguyên: a1, , aN, xếp dÃy thành dÃy A không giảm c Các bớc tiến hµnh

TG Hoạt động gv Hoạt động học sinh 20' Chiếu nội dung

bµi to¸n

2 Gợi ý để giải toán - Xác định toán?

- Nhắc lại ý tởng thuật toán sếp tráo đổi học lớp 10?

- Cho HS lên bảng theo chiều cao thấp ngẫu nhiên Sắp xếp thành hàng, cho ngời cao đứng sau ngời thấp Đồng thời lần xếp lấy số i j để đánh dấu việc xếp

- Dựa vào thuật toán học vớ

- Theo dõi hình suy nghĩ trả lời câu hỏi - Input: N nguyên dơng dÃy A

- Output: DÃy A không giảm

- Lần lợt từ số hạng đến số hạng N, so sánh cặp một, số đứng trớc lớn số đứng sau đổi chỗ cho Sau lần xếp đợc số lớn cuối dãy

- Häc sinh theo dâi c¸ch xếp

- Cần dùng hai vòng lặp: Một lặp tiến lặp lùi - hai vòng lặp lång

Program sap_xep_trao_doi; uses crt;

const Nmax=1000;

Type day= Array[1 Nmax] Of integer; Var A:day;

N, i, j, tg, k:integer; Begin

(54)

dụ xếp cụ thể, cho biết cần dùng vòng lặp? - Dùng vòng lặp nh nào? - Viết chơng trình hoàn chỉnh?

- Chạy chơng trình

write('Nhap vao so phan tu cua day N= ');readln(N); Writeln('Nhap vao cac gia tri cua cac phan tu day:');

for i:=1 to N Begin

write('Nhap phan tu thu i= ',i,' ,a[',i,']=');

readln(A[i]); End;

For j:=N downto for i:=1 to j-1 if A[i]>a[i+1] then begin

writeln('thu hien doi cho cua a[',i,']','va a[',i+1,']');

tg:=a[i]; a[i]:=a[i+1]; a[i+1]:=tg;

write('Day sau doi cho la: '); for k:=1 to N write(a[k]:3); writeln;

end;

writeln('Day so khong giam la: '); for k:=1 to N write(a[k]:3); readln;

End

3 Hoạt động3: Rèn luyện kỹ sử dụng biến mảng chiều để giải toán xếp dãy N phần tử( Thuật toán tráo đổi)

a Mục tiêu: Hiểu thuật toán tráo đổi vận dụng kiểu mảng chiều để giải bi toỏn

b Nội dung:

Bài toán: Cho dÃy A gồm N số nguyên: a1, , aN, xếp dÃy thành dÃy A không tăng c Các bớc tiÕn hµnh

TG Hoạt động gv Hoạt động học sinh 10' Chiếu nội dung

bài toán

2 Gi ý gii toán - Xác định toán?

- ý tëng?

- Tơng tự xếp dãy không giảm Trong dãy không tăng, phần tử đứng trớc so với phần tử đứng sau ntn? - Tơng tự, viết ch-ng trỡnh?

- Theo dõi hình suy nghĩ trả lời câu hỏi - Input: N nguyên dơng dÃy A

- Output: DÃy A không gi¶m

- Lần lợt từ số hạng đến số hạng N, so sánh cặp một, số đứng trớc nhỏ số đứng sau đổi chỗ cho Sau lần xếp đợc số nhỏ cuối dãy

Program sap_xep_trao_doi2; uses crt;

const Nmax=1000;

Type day= Array[1 Nmax] Of integer; Var A:day;

N, i, j, tg, k:integer; Begin

clrscr;

write('Nhap vao so phan tu cua day N= ');readln(N); Writeln('Nhap vao cac gia tri cua cac phan tu day:');

for i:=1 to N Begin

(55)

for i:=1 to j-1 if A[i]<a[i+1] then begin

writeln('thu hien doi cho cua a[',i,']','va a[',i+1,']');

tg:=a[i]; a[i]:=a[i+1]; a[i+1]:=tg;

write('Day sau doi cho la: '); for k:=1 to N write(a[k]:3); writeln;

end;

writeln('Day so khong giam la: '); for k:=1 to N write(a[k]:3); readln;

End

- Kiến thức học: Định nghĩa, khai báo biến kiểu mảng chiều áp dụng đợc vào giải toán đơn giản học lớp 10

(56)

TiÕt 22

Bµi tËp vµ thùc hµnh (TiÕt 1) I Mơc tiªu

1 KiÕn thøc:

- Cđng cè kiÕn thức mảng chiều Kỹ

- Nâmg cao kỹ sử dụng số lệnh kiểu liệu mảng chiều lập trình Pascal: + Khai báo kiểu liệu mảng chiều

+ Nhập, xuất liệu cho mảng

+ Duyt qua tt phần tử mảng để xử lý phần tử mảng - Biết giải số tốn cụ thể thờng gặp:

+ Tính tổng phần tử thỏa mãn điều kiện + Đếm số phần tử thỏa mãn điều kiện + Tìm phần tử lớn nhất, nhỏ nhát

3 Thái độ

- Góp phần rèn luyện tác phong, t lập trình: Tự giác, tích cực Chủ động sáng tạo tìm kiếm kiến thức

- Phòng máy vi tính, máy chiếu Projector Chn bÞ cđa häc sinh:

Sgk, kiến thức học III Hoạt động dạy - học III Hoạt động dạy - học

1 Hoạt động 1: Tìm hiểu cách sử dụng câu lệnh mảng chiều qua chơng trình có sẵn

a Mơc tiªu:

- Hoạc sinh hiểu đợc chơng trình có sẵn câu a, biết đợc kết chạy chơng trình này, từ tìm cách giải câu b

b, Néi dung:

a - T×m hiĨu, gâ chơng trình vào máy tính chạy thử nh chơng tr×nh sgk- tr.63

b - Thêm câu lệnh vào chơng trình nhằm sửa đổi chơng trình câu a để chơng trình thực đếm số lợng số dơng số lợng số âm mảng

TG Hot ng ca giáo viên Hoạt động học sinh 15'

5'

1 Tìm hiểu chơng trình câu a, sgk tr.63 chạy thử chơng trình

- Chiếu chơng trình lên bảng

- Hỏi: Khai báo uses Crt; có ý nghĩa gì?

- Hỏi: Myarray tên kiểu liệu mảng hay tên biến mảng?

- Hỏi: vai trò Nmax N có khác nhau?

- Trong chơng trình có sử dụng thủ tục tạo mảng ngẫu nhiên thđ tơc: Randomize;

- Hàm chuẩn Random(N) cho giá trị số nguyên ngẫu nhiên đoạn từ đến N-1

- Lệnh gán a[i] := random(300)-random(300) cho giá trị số nguyên đoạn từ -299 đến 299 lu vào biến a[i];

- Hái: LÖnh For - Do cuèi cïng

- Gõ chơng trình ý vào chơng trình để trả lời câu hỏi

- Khai b¸o th viƯn cđa thđ tơc: Clrscr; - Myarray tên kiểu liệu

- Nmax số phần tử tối đa chứa biến mảng a, N số phần tử thùc cđa m¶ng a

(57)

10'

5'

nhiêu lần?

- THực lại chơng trình xem kết

2 Sa chng trỡnh câu để đợc ch-ơng trình giải tốn cõu b

- Chiếu lên hình lệnh cần thêm vào chơng trình câu a

- Hỏi: ý nghĩa biến posi biến neg gì?

- Hỏi: Chức lệnh If a[i]>0 then posi:=posi+1 else neg:=neg+1;?

- Yêu cầu học sinh thêm vào vị trí cần thiết để chơng trình đếm đợc s dng v s õm

- Yêu cầu học sinh gõ nội dung lu với tên caub.pas Thực ch-ơng trình báo cáo kết

- Biến posi dùng để lu số phần tử dơng biến neg lu số phần tử âm

- KiÓm tra phần tử thứ i số dơng tăng biến posi, ngợc lại a[i] số âm tăng neg

- Chỉ vị trí cần thêm vào sửa lại chơng trình cho câu b

- Chậy chơng trình báo cáo kết

IV Đánh giá cuối (5ph) Những kiến thức học

Học sinh thực đợc số thuật tốn bản: + Tính tổng phần tử thảo mãn điều kiện + Đếm số phần tử thỏa mãn điều kiện Câu hỏi tập nhà

- Viết chơng trình nhập vào mảng chiều A[1 20] nhập số x, đếm số lợng phần tử có giá trị x

(58)

TiÕt 23

1 KiÕn thøc:

- Cđng cè kiến thức mảng chiều Kỹ

+ Duyt qua tất phần tử mảng để xử lý phần tử mảng - Biết giải số tốn cụ thể thờng gặp:

+ Tính tổng phần tử thỏa mãn điều kiện + Đếm số phần tử thỏa mãn điều kiện + Tìm phần tử lớn nhất, nhỏ

3 Thái độ

Sgk, kiến thức học III Hoạt động dạy - học

1 Hoạt động 1: Rèn luyện kỹ lập trình a Mục tiêu:

- Học sinh viết đợc chơng trình hồn thiện cách sử dụng lệnh kiểu liệu mảng chiều

b Néi dung:

Viết chơng trình tìm phần tử có giá trị lớn mảng in hình số giá trị phần tử tìm đợc Nếu có nhiều phần tử có giá trị lớn đa số nhỏ c Các bớc tiến hành

TG Hoạt động giáo viên Hoạt động học sinh 20' Lấy ví dụ thực tiễn: Trong cột

điểm trung bình học kỳ lớp, tìm học sinh có điểm TBHK cao đếm số học sinh tiên tiến (TBHK>6.5 văn>6.5, toán>6.5)

-Hỏi: áp dụng thuật toán nào? - Viết chơng trình báo cáo kết

- Nhỡn lờn hình đọc suy nghĩ nội dung tập để trả lời câu hỏi viết chơng trình

- áp dụng thuật tốn tìm số lớn đếm phần tử thỏa mãn điều kiện

- Viết chơng trình báo cáo kết

2 Hoạt động 2: Rèn luyện kỹ lập trình a Mục tiêu:

- Học sinh viết đợc chơng trình hồn thiện cách sử dụng lệnh kiểu liệu mảng chiều

b Nội dung:- Viết chơng trình nhập vào dãy số nguyên gồm N phần tử: a1, ,aN, đếm đa hình số phần tử chẵn dãy

TG Hoạt động giáo viên Hoạt động học sinh 20’ Chiếu nội dung tập lên

h×nh

- Hỏi: làm để kiểm tra số chẵn số lẻ?

- Theo dõi nội dung tập hình - Số chẵn số chia hết cho

(59)

hoµn thiƯn

IV Đánh giá cuối (5ph) Kiến thức học

Học sinh thực đợc số thuật toán bản: + Tính tổng phần tử thảo mãn điều kiện + Đếm số phần tử thỏa mãn điều kiện Câu hỏi tập nhà

- Bµi tËp sgk vµ sbt

TiÕt 24

Bài tập I Mục tiêu

1 KiÕn thøc:

- Cđng cè kiÕn thøc m¶ng mét chiều Kỹ

+ Nhập, xuất liệu cho m¶ng

+ Duyệt qua tất phần tử mảng để xử lý phần tử mảng - Biết giải số toán cụ thể thờng gặp:

3 Thái độ

II §å dïng dạy học Chuẩn bị giáo viên

- Phòng máy vi tính, máy chiếu Projector Chuẩn bị cña häc sinh:

1 Hoạt động 1: Rèn luyện kỹ a Mục tiêu:

- Học sinh vận dụng đợc câu lệnh biến mảng chiều để giải toán b Nội dung:

Viết chơng trình nhập từ bàn phím số nguyên dơng N (N<=100) dãy A gồm N số ngun dơng A1,…,AN có giá trị tuyệt đối khơng lớn 1000 Hãy cho biết dãy A có phải cấp số cộng hay không thông báo kết qu mn hỡnh

TG Hoạt động giáo viên Hoạt động học sinh 20’ Chiếu nội dung tập lên mn

hình chiếu

2 Yêu cầu học sinh viết chơng trình

- Ba số a, b, c theo thø tù lËp thµnh cÊp sè céng nµo?

- Để kiểm tra dÃy có phải cấp số cộng hay không?

- Viết chơng trình, chạy chơng trình baói cáo kết

- Theo dõi hình suy nghĩ trả lời câu hái

- 2b=a+c

- KiÓm tra sè hai số có thỏa mÃn điều kiện không

- Viết chơng trình, chạy chơng trình báo cáo kết

2 Hot ng 2: Rốn luyện kỹ a Mục tiêu:

Học sinh vận dụng tổng hợp kiến thức học kiểu liệu mảng chiều đểgiải toán cụ thể

b Néi dung:

(60)

TG Hoạt động giáo viên Haọt động học sinh Chiu ni dung bi

2 Yêu cầu học sinh gõ chơng trình - Gõ chơng trình, chạy chơng trình báo cáo kết quả, đa nhận xét

- Theo dõi hình nội dung tập - Gõ chơng trình, chạy chơng trình báo cáo kết quả, đa nhận xét

Học sinh thực đợc số thuật toán bản: + Tính tổng phần tử thảo mãn điều kiện + Đếm số phần tử thỏa mãn điều kiện Câu hỏi tập nhà

- Bµi tËp sgk vµ sbt TiÕt 25

kiĨu m¶ng (TiÕt 4)

I Mục tiêu bài Kiến thức:

- Bit c kiểu liệu kiểu mảng hai chiều

- Biết đợc cách tạo kiểu mảng hai chiều, cách khai báo biến, tham chiếu đến phần tử Kỹ năng:

- Tạo đợc kiểu mảng hai chiều khai báo biến mảng hai chiều ngôn ngữ lập trình Pascal Sử dụng dúng biến mảng để giải số tốn cụ thể

II §å dùng dạy học

1 Chuẩn bị giáo viên: Máy tính, máy chiếu Projector, sgk Chuẩn bị häc sinh: sgk, häc bµi cị

3 ổn định lớp: báo cáo sỹ số, ổn định chỗ ngồi III Hoạt động day - hoc

1 Hoạt động 1: Tìm hiểu ý nghĩa kiểu mảng hai chiều a Mục tiêu:

- Học sinh biết đợc ý nghĩa cần thiết kiểu mảng hai chiều việc giải toán

b Néi dung

- Bài toán: Viết chơng trình in hình bảng cửu chơng

- Khái niệm mảng hai chiều: Là bảng (nhiều hàng nhiều cột) phần tư cã cïng kiĨu d÷ liƯu

- Hầu hết ngơn ngữ lập trình có quy tắc cho phép xác định: Tên kiểu mảng hai chiều, cách khai báo biến kiểu mảng cách tham chiếu đến phn t ca mng

TG Hoạt động giáo viên Hoạt động học sinh Chiếu ví dụ:

- VÝ dụ: Thời khóa biểu viết dới dạng bảng - Ví dụ: Bảng cửu chơng trình

- Hi: biu diễn thời khóa biểu theo mảng chiều đợc khơng, đợc biểu diễn nh nào?

- Để biểu diễn thời khóa biểu cần biến kiểu mảng chiều bảng cửu chơng cần mảng chiều?

- Nu s dng mảng chiều để giải toán gặp khó khăn gì? - Để khắc phục điều này, ghép mảng chiều thành mảng hai chiều

- Chú ý theo dõi hình chiếu suy nghĩ trả lời câu hỏi

- Biểu diễn thời khóa biểu theo mảng chiều, ngày bảng, tiết học phần tử mảng

- Biểu diễn bảng cửu chơng trình theo mảng chiều: Mỗi bảng nhân mảng chiều

- Để biểu diễn thời khóa biểu cần mảng chiều bảng cửu chơng trình cần mảng chiều

- Khai báo nhiều biến, viết chơng trình trình nhập xuất dài

(61)

2 Các yếu tố xác định mảng hai chiều - Chiếu bảng lu trữ bảng cửu chơng trình - Hỏi: Để mơ tả mảng hai chiều, cần xác định yếu tố nào?

- Các yếu tố để xây dựng mảng hai chiều:

+ Tên kiểu, số phần tử dòng số phần tử cột, kiểu liệu chung phần tử

2, Hot ng 2: Tỡm hiểu kiểu mảng hai chiều a Mục tiêu

- Học sinh biết cách tạo kiểu liệu mảng hai chiều, biết khai báo biến mảng ngôn ngữ lập trình Pascal, biết tham chiếu đến phần tử mảng

b Néi dung

- Khai b¸o biến mảng hai chiều: Có hai cách khai báo

* Khai báo thông qua định nghĩa kiểu mảng hai chiều (gián tiếp) +Định nghĩ kiểu mảng hai chiều:

TYPE tên_kiểu_mảng = Array[chỉ_số_dòng , chỉ_số_cột] OF kiểu_ptử; +Khai báo biến mảng hai chiều: VAR tên_biến: tên_kiểu_mảng;

* Khai b¸o trùc tiÕp:

VAR tên_biến : Array[chỉ_số_dịng , chỉ_số_cột] OF kiểu_ptử; - Cách tham chiếu đến phần tử ca mng hai chiu:

Tên_biến[chỉ_số_dòng , chỉ_số_dòng] c Các bíc tiÕn hµnh

TG Hoạt động giáo viên Hoạt động học sinh Chiếu lại bảng cửu chng

- Cách khai báo mảng chiều?

- Để biết đợc phần tử bảng cửu chơng cần biết điều kiện nào?

- C¸ch khai báo mảng hai chiều tơng tự nh khai báo mảng chiều, khác mảng hai chiều có chØ sè hµng vµ chØ sè cét

2 Khai báo biến mảng hai chiều - Tơng tự nh mảng chiều, mảng hai chiều có hai cách khai báo, khác mảng hai chiều có hai số: Chỉ số hàng số cột Em dựa vào cách khai báo mảng chiều, để khai báo mảng hai chiều?

- LÊy vÝ dô khai báo biến mảng hai chiều?

- Cũng tơng tự mảng chiều, khác mảng hai chiều có hai số hàng cột, tham chiếu phần tử mảng hai chiều nh

- Khai báo mảng chiều có hai cách:

* Khai bỏo thông qua định nghĩa kiểu mảng hai chiều (gián tiếp)

+Định nghĩ kiểu mảng hai chiều:

TYPE tên_kiểu_mảng=Array[Kiểu_chỉ_số]OF kiểu_ptử;

+Khai báo biến mảng hai chiều: VAR tên_biến: tên_kiểu_mảng; * Khai báo trực tiếp:

VAR tên_biến : Array[Kiểu_chỉ_số] OF kiểu_ptử; - Để biết phần tử bảng cửu chơng cần biết hµng nµo vµ cét nµo

* Khai báo thơng qua định nghĩa kiểu mảng hai chiều (gián tiếp)

+Định nghĩ kiểu mảng hai chiều:

TYPE tên_kiểu_mảng =

Array[chỉ_số_dòng , chỉ_số_cột] OF kiểu_ptử;

+Khai báo biến mảng hai chiều: VAR tên_biến: tên_kiểu_mảng;

* Khai báo trực tiếp:

VAR tên_biến : Array[chỉ_số_dòng , chỉ_số_cột] OF kiểu_ptử;

Tên_biến[chỉ_số_hàng , chỉ_số_cột]

(62)

thÕ nµo?

- LÊy vÝ dơ tham chiÕu phần tử mảng hai chiều?

- Tổng quát?

3 Hoạt động 3: Rèn luyện kỹ sử dụng mảng hai chiều

a Mục tiêu: Học sinh sử dụng đợc biến kiểu mảng hai chiều để giải toán đơn giản

b Nội dung: Giải toán đặt vấn đề tropng họat động c Các bớc tiến hành

TG Hoạt động giáo viên Hoạt động học sinh Chiếu lại nội dung toán

- Yêu cầu học sinh xác định cách thức tổ chức liệu

- Yêu cầu học sinh nhiệm vụ toán cần giải

2 Yêu cầu học sinh viết chơng trình hoàn chỉnh

- Một học sinh lên bảng viết ch-ơng trình

- Theo dõi hình chiếu suy nghĩ trả lời câu hỏi

- Dùng mảng hai chiều

- Lu giá trị i*j vào phần tử hàng i cột j tơng ứng mảng hai chiều

- Xuất giá trị a[i,j]=i*j hình theo dßng

IV Đánh giá cuối bài Những nội dung học

* Khai báo thông qua định nghĩa kiểu mảng hai chiều (gián tiếp) +Định nghĩ kiểu mng hai chiu:

TYPE tên_kiểu_mảng = Array[chỉ_số_dòng , chỉ_số_cột] OF kiểu_ptử; +Khai báo biến mảng hai chiều: VAR tên_biến: tên_kiểu_mảng;

* Khai báo trực tiếp:

VAR tờn_bin : Array[chỉ_số_dòng , chỉ_số_cột] OF kiểu_ptử; - Cách tham chiếu n cỏc phn t ca mng hai chiu:

Tên_biến[chỉ_số_dòng , chỉ_số_dòng] Câu hỏi tập nhà

- Lµm bµi tËp sgk vµ sbt TiÕt 26

1 KiÕn thøc:

- Cđng cè kiÕn thøc kiĨu m¶ng

- Làm quen với toán xếp đơn giản Kỹ

- Nâmg cao kỹ sử dụng số lệnh kiểu liệu mảng chiều lập trình Pascal: + Khai báo kiểu liệu mảng

+ Duyt qua tt c phần tử mảng để xử lý phần tử mảng

- Rèn luyện kỹ phân tích, tổng hợp, đề xuất cách giải tốn cho chơng trình trình chạy nhanh

3 Thái độ

(63)

1 Hoạt động 1: Tìm hiểu chơng trình diễn đạt thuật tốn xếp a Mục tiêu:

- Học sinh hiểu đợc chơng trình thuật toán xếp đơn giản b Nội dung:

Viết chơng trình xếp phàn tử mảng theo thứ tự không giảm (sgk-tr.65)

- Yêu cầu: Soạn chơng trình vào máy, chạy thử với giá trÞ khac cđa N Rót nhËn xÐt vỊ thời gian thực chơng trình

c Các b íc tiÕn hµnh

TG Hoạt động giáo viên Hoạt động học sinh 25' Gợi ý cho hc sinh thut toỏn sp xp

tăng dần

- LÊy vÝ dơ thùc tiƠn s¾p xÕp häc sinh xÕp hµng theo chiỊu cao

- u cầu vạch bớc để xếp phần t ca mng khụng gim

2 Tìm hiểu chơng trình sách giáo khoa trang 65

- Chiếu chơng trình ví dụ lên hình - Hỏi: vai trò biến i biến j chơng trình?

- Mỗi vòng lặp For đoạn chơng trình xếp có ý nghĩa gì?

- Gõ chơng trình, thực chơng trình, nhập liệu báo cáo kÕt qu¶

- Chó ý theo dâi néi dung tập hình

- Theo dừi vớ dụ để rút cách xếp phần tử ca mng

- Lần lợt lấy phần tử mảng từ trái qua phải

- C mi phần tử đem so sánh với phần tử đứng sau

- Nếu lớn phần tử đứng sau thực việc đổi chỗ hai phần tử - Biến i, j dùng làm số Biến j đùng để đánh dấu số phần tử dãy xếp (mỗi lần đa đợc số lớn cuối dãy giảm j 1, tức số lớn đa đợc cuối dãy nên không cần phải xếp s ny)

- Mỗi vòng lặp For ứng với phép duyệt lần lợt

- Gừ chng trỡnh, thực chơng trình báo cáo kết thu đợc sau thực chơng trình

2 Hoạt động 2: Rèn luyện kỹ tổng hợp a Mục tiêu:

Rèn cho học sinh có kỹ chỉnh sửa, sử dụng câu lệnh hợp lý để giải toán b Nội dung:

Khai báo thêm biến nguyên dem bổ sung vào chơng trình lệnh cần thiết để biến dem tính số lần thực tráo đổi thuật toán Đa kết tỡm c

TG Hoạt động giáo viên Hoạt động học sinh 20' - Đặt yêu cầu: Khi cho thêm biến

nguyên Dem bổ sung vào ch-ơng trình đoạn lệnh cần thiết để biến dem tính số lần thực tráo đổi thuật tốn In kết tìm đợc hình

- Đoạn chơng trình thực tráo đổi giá trị?

- Yêu cầu học sinh viết lệnh để đếm số lần tráo đổi

Hỏi: Lệnh đợc viết vị trí chng trỡnh?

- Yêu cầu học sinh soạn chơng trình vào máy

- Yêu cầu học sinh nhËp d÷ liƯu

- t:=a[i]; a[i]:=a[i+1]; a[i+1]:=t;

- Ngay đoạn lệnh tráo đổi

- Soạn chơng trình vào máy sửa đổi

(64)

do giáo viên đa báo cáo kết

quả yêu cầu báo cáo kết

Học sinh thực đợc số thuật toán : xếp phần tử dãy thành dãy khơng giảm

(65)

TiÕt 27

Bµi tËp thực hành (Tiết 2) I Mục tiêu

1 KiÕn thøc:

- Cđng cè kiÕn thøc kiĨu m¶ng

- Làm quen với tốn xếp đơn giản Kỹ

- N©mg cao kü sử dụng số lệnh kiểu liệu mảng chiều lập trình Pascal: + Khai báo kiểu liệu mảng

+ Nhập, xuất liệu cho m¶ng

+ Duyệt qua tất phần tử mảng để xử lý phần tử mảng

- Rèn luyện kỹ phân tích, tổng hợp, đề xuất cách giải toán cho chơng trình trình chạy nhanh

3 Thái độ

- Góp phần rèn luyện tác phong, t lập trình: Tự giác, tích cực Chủ động sáng tạo tỡm kim kin thc

- Phòng máy vi tính, máy chiếu Projector Chuẩn bị häc sinh:

1 Hoạt động 1: Rèn luyện kỹ nhận xét, phân tích đề xuất cách giải tốn cho chơng trình chạy nhanh

a Mơc tiªu:

- Học sinh biết sử dụng kiểu mảng để lập trình giải tốn Biết nhận xét, phân tích để đề xuất phơng pháp giải hay

b Néi dung:

Cho mảng A gồm N phần tử Viết chơng trình tạo mảng B[1 n] B[i] tổng giá trị i phần tử mảng A

Ch¬ng trình minh họa sgk - tr.66 c Các b ớc tiÕn hµnh

TG Hoạt động giáo viên Hoạt động học sinh 25' Xác định toán

- Chiếu đề lên bảng

- Yêu cầu xác định liệu vào liệu ra?

- Gợi ý học sinh đề xuất thuật toán Giới thiệu chơng trình cha cải tiến - Chiếu chơng trình diễn đạt thuật tốn -Thực chơng trình để học sinh biết thời gian thực chơng trình

-Hỏi: chơng trình phải thực phÐp céng?

-Hỏi: có cách để cải tiến?

Lệnh đợc thay lệnh ch-ơng trỡnh? vit v trớ no?

3 Yêu cầu: viết chơng trình hoàn thiện

- Chú ý quan sát trả lời câu hỏi - Vào mảng Agồm phần tử

-ra :mảng B gồm n phÇn tư

-tại vị trí i ta tính tổng giá trị phần tử từ 1đến i

2 Quan sát chơng trình bảng

-Quan sát giáo viªn thùc hiƯn, nhËn xÐt vỊ thêi gian thùc hiƯn chơng trình

- Phải thực n(n+1)/2 phép cộng

-Để tính bớc thứ i, ta sử dụng kết tính bớc thứ i-1

B[i]=B[i-1]+A[i]; Thay ®o¹n lƯnh

For j:=1 to i B[i]:=B[i]+A[j];

3 Soạn chơng trình vào máy, thực ch-ơng trình thông báo kết

(66)

4 Tiểu kết: Cùng toán,có nhiều cách giải khác Ngời lập ch-ơng trình cần chọn cách cho m¸y thùc hiƯn nhanh nhÊt

2 Hoạt động 2: Rèn luyện kỹ tổng hợp a Mục tiêu:

Rèn cho học sinh có khả tổng hợp, phân tích đề xuất cách giải cho chơng trình thực nhanh

b Néi dung:

Khai báo thêm biến nguyên dem bổ sung vào chơng trình lệnh cần thiết để biến dem tính số lần thực tráo đổi thuật toán Đa kết tìm đợc

TG Hoạt động giáo viên Hoạt động học sinh 20' - Đặt yêu cầu: Khi cho thêm biến

nguyên Dem bổ sung vào ch-ơng trình đoạn lệnh cần thiết để biến dem tính số lần thực tráo đổi thuật toán In kết tìm đợc hình

- Đoạn chơng trình thực tráo đổi giá trị?

- Yêu cầu học sinh viết lệnh để đếm số lần tráo đổi

Hỏi: Lệnh đợc viết v trớ no chng trỡnh?

- Yêu cầu học sinh soạn chơng trình vào máy

- Yêu cầu học sinh nhập liệu giáo viên đa báo cáo kết

- t:=a[i]; a[i]:=a[i+1]; a[i+1]:=t;

- Ngay đoạn lệnh tráo đổi

- Soạn chơng trình vào máy sửa đổi

- Chạy chơng trình nhập liệu nh giáo viên yêu cầu báo cáo kết

Học sinh thực đợc số thuật toán : xếp phần tử dãy thành dãy khơng giảm

(67)

TiÕt 28:

kiĨu x©u (tiết 1) Ngày soạn:

Ngày giảng: I-Mục tiêu: 1.Kiến thøc:

- Biết đợc số kiểu liệu mới, biết đợc khái niệm kiểu xâu

- Phân biệt đợc giống khác kiểu mảng kí tự kiểu xâu kí tự - Biết đợc cách khai báo biến, nhập xuất dự liệu, tham chiếu đến kí tự xâu - Biết phép toán liên quan đến xâu

- Biết đợc tiện ích hàm thủ tục liên quan đến xâu ngơn ngữ lập trình Pascal - Nắm đợc cấu trúc chung chức số hàm thủ tục liên quan đến xâu

2.Kü năng:

-Khai bỏo c kiu d liu xõu ngơn ngữ lập trình Pascal Sử dụng đợc biến xâu phép toán xâu để giải toán đơn giản

- Nhận biết bớc đầu sử dụng đợc số hàm thủ tục để giải số toán II-Đồ dùng dạy hc:

-Mt s chng trỡnh mu vit sẵn để giới thiệu ví dụ 2.Chuẩn bị học sinh:

1.Hoạt động 1: Tìm hiểu xâu cách sử dụng. a Mục tiêu:

- Học sinh nắm đợc ý nghĩa xâu số khái niệm xâu Biết cách khai báo biến xâu, nhập xuất liệu cho biến xâu tham chiếu đến kí tự xâu

b Néi dung

- Xâu kí tự dãy kí tự bảng mã ASCII, kí tự đợc gọi phần tử xâu Số lợng kí tự xâu đợc gọi độ dài xâu Xâu có độ dài không xâu rỗng - Khai báo biến kiểu xâu: VAR tên_biến : String[độ_dài_lớn_của_xâu];

- Tham chiếu đến phần tử xâu: tên_biến[chỉ_số] c Các bớc tiến hành

TG Hoạt động GV Hoạt ng ca HS

10 Chiếu tên lên bảng

- Chiếu ví dụ: Nhập danh sách họ tên học sinh lớp

- Yêu cầu: Với toán trên, khai báo kiểu liệu nh thÕ nµo?

- Yêu cầu viết đoạn lệnh để xuất nhập liệu cho phần tử?

- Ghi tên theo dõi ví dụ để trả lời câu hỏi

- Sư dơng kiĨu m¶ng mét chiều với kiểu liệu chung phần tử lµ kiĨu kÝ tù

(68)

- Hỏi: Trong trờng hợp này, nên khai báo biến kiểu mảng chiều trực tiếp gián tiếp? Vì sao? - Dùng mảng chiều gặp khó khăn gì? - Chúng ta thấy, họ tên học sinh nhập phải nhập kí tự một, nhập cho học sinh lớp thời gian Một số ngơn ngữ lập trình cung cấp cho kiểu d liu xõu

2 Tìm hiểu kiểu xâu

- Chiếu lên bảng cấu trúc khai báo biến kiểu xâu Trong String tên kiểu xâu, n độ dài lớn xâu

- Khi khai báo biến kiểu xâu, khơng có n độ dài tối đa bao nhiêu? Có phải độ dài khơng? - Chiếu ví dụ lên hình: ‘Viet Yen – Bac Giang’

- Hái: X©u cã bao nhiªu kÝ tù?

- Độ dài xâu số lợng kí tự xâu, đó, kí tự trắng đợc tính chiếm nhớ

- Xâu gồm kí tự trắng đợc viết nh nào? Và độ dài bao nhiêu?

- Xâu rỗng đợc viết nh nào? Số lợng kí tự bao nhiêu?

- Lấy ví dụ xâu xác định số phần tử xâu

3 Xt/nhËp d÷ liệu cho biến kiểu xâu

- Cách xuất/nhập liệu cho biến mảng chiều? - Chiếu cách nhập liệu cho biến kiểu xâu

- Yêu cầu: LÊy vÝ dơ thĨ?

- Từ ví dụ trên, so sánh cách xuất nhập trên? Tham chiếu đến phần tử xâu

- Hỏi: Cách truy xuất liệu đến phần tử mng mt chiu?

- Chiếu cách truy xuất phần tử xâu - Hỏi: So sánh hai cách truy xuất này? - Yêu cầu học sinh lấy ví dơ thĨ KiĨm tra kiÕn thøc

- Chiếu chơng trình đơn giản có sử dụng khai báo biến kiểu xâu tham chiếu đến phần t ca xõu

học sinh lên bảng viết

- Nên khai báo gián tiếp, họ tên cuỉa học sinh mảng

- Dùng mảng chiều nhập liệu dài, dùng nhiều lệnh lặp

- Theo dõi ttrên bảng ghi - Theo dõi bảng lắng nghe

- Khi khai báo kiểu xâu mà khơng có n độ dài tối đa xâu 255, số lợng kí tự tối đa - Xâu có 20 kí tự

- Xâu gồm kí tự trắng, đợc viết ‘ ‘ độ dìa - Xâu rỗng ‘’, độ dài - Lấy ví dụ

-for i:=1 to n readln(hoten[i]); - write(‘Nhap ho ten:’)

- readln(hoten);

Kiểu mảng chiều phải nhập kí tự họ tên, kiểu xâu nhập lần đợc họ tên đầy đủ

(69)

- Học sinh biết đợc phép toán liên quan đến xâu Diễn đạt đợc phép tốn ngơn ngữ lapạ trình Pascal

b Néi dung: - PhÐp ghÐp x©u: + KÝ hiÖu: +

+ ý nghĩa: Sử dụng để ghép nhiều xâu thành xâu

- Các phép so sánh: =, <>, <, >, <=, >=, dùng để thực việc so sánh hai xâu

Xâu A đợc xem lớn xâu B, kí tự khác chúng kể từ trái qua phải xâu A có mã ASCII lớn Nếu A, B xâu có độ dài khác nhau, A đoạn đầu B A nhỏ hn B

TG Hoạt động GV Hoạt động HS

10’ Nhắc lại phép toán học

- Hỏi: Nhắc lại phép toán học kiu d liu chun?

2 Tìm hiểu chức cđa mét sè phÐp to¸n qua mét sè vÝ dơ

- Chiếu chơng trình ví dụ Var st : String[30]; Begin

st:=’Viet ’+’Yen’; write(st);

end

- Hỏi: Chơng trình cho kết in hình? - Thực chơng trình để học sinh thấy kết qu

- yêu cầu học sinh tìm số vÝ dơ kh¸c - Hái: Tõ vÝ dơ, h·y cho biết chức phép cộng xâu?

- Chiếu số ví dụ khác yêu cầu học sinh cho biết kết

- Giới thiệu chiếu ví dụ phép so sánh xâu

Var st1,st2:String[50]; ktra:Boolean; Program vidu2; Begin

st1:='lop 10 A; st2:= 'lop 10 B'; ktra:=st1<st2; write(ktra); End

- Chó ý theo dâi vµ suy nghÜ trả lời câu hỏi

- Cho kết hình xâu: Viet Yen

- Lấy số ví dụ

- Chức năng: Cộng nhiều xâu thành xâu

- Học sinh tự lấy ví dơ kh¸c

(70)

- Hỏi: Kết chơng trình in hình? - Thực chơng trình để học sinh thấy kết

- Cịn phép tốn so sánh học? - Chiếu ví dụ phép so sánh yêu cầu học sinh cho biết kết

* Lu ý: Xâu A đợc xem lớn xâu B, kí tự khác chúng kể từ trái qua phải xâu A có mã ASCII lớn Nếu A, B xâu có độ dài khác nhau, A đoạn đầu B A nhỏ B Vì vậy, xâu có độ dài lớn nhng bé xâu có độ dài ngắn Đa ví dụ thực để học sinh thấy rõ

- KÕt qu¶ True - Theo dõi kết

- Có c¸c phÐp so s¸nh: <>, <, >, <=, >=, =

- Theo dõi trả lời

3 Hot động 3:

a Mục tiêu:- Tìm hiểu số hàm thủ tục chuẩn liên quan đến xâu Nắm đợc cấu trúc chung, hiểu đợc tham số hàm thủ tục xâu

- Biết đợc chức hàm thủ tục chuẩn

b Nội dung: - Thủ tục Delete(st,vt,n), thực việc xố xâu st n kí tự kể từ vị trí vt - Hàm copy(st,vt,n), cho giá trị xâu kí tự đợc lấy xâu st, lấy n kí tự từ vị trí vt - Hàm Length(st), cho giá trị số lợng kí tự xâu st (độ dài xâu)

- Hµm Pos(st1,st2) cho giá trị vị trí xuất xâu st1 xâu st2 - Hàm Upcase(ch), cho kÝ tù hoa t¬ng øng cđa kÝ tù ch

c Các bớc tiến hành

TG Hot ng ca GV Hoạt động HS

15’ Giíi thiƯu cÊu tróc chung cđa thđ tơc Delete

- ChiÕu lên hình cấu trúc chung thủ tục Delete Thủ tục Delete(st,vt,n), thực việc xoá xâu st n kÝ tù kĨ tõ vÞ trÝ vt

- ChiÕu vÝ dô: Var st:String[20];

Begin st:= 'Lop 10A chung minh';

writeln('xau truoc xoa la: ',st); Delete(st,8,9); writeln('xau sau xoa la: ',st); readln;

End

- Hỏi: Kết đa hình?

- Thực chơng trình để học sinh quan sát Giới thiệu cấu trúc chung hàm Coppy - Chiếu lên cấu trúc chung hàm Coppy:

Hàm copy(st,vt,n), cho giá trị xâu kí tự đợc lấy xâu st, lấy n kí tự từ vị trí vt

- Chú ý quan sát suy nghĩ để trả lời câu hỏi

- Ghi bµi vµo suy nghĩ

- kết đa hình :

(71)

Begin st1:= 'Lop 10A chung minh'; writeln('xau ban dau xoa la: ',st1);

st2:=coppy(st1,1,7); writeln('xau chep la: ',st2); readln;

End

- Thực chơng trình để học sinh quan sát Giới thiệu hàm length

- ChiÕu cÊu tróc chung cđa hµm length:

Hàm Length(st), cho giá trị số lợng kí tự xâu st (độ dài xâu)

Var st1, st2:String[20];

Begin st:= 'Lop 10A chung minh'; writeln(length(st)); readln;

End

- Thc chơng trình để học sinh quan sát Giới thiệu hàm Pos

- ChiÕu cÊu tróc chung cđa hàm Pos:

Hàm Pos(st1,st2) cho giá trị vị trí xuất xâu st1 x©u st2

- chiÕu vÝ dơ:

Var st:String[20]; vt:byte; Begin

st:= 'Lop 10A chung minh'; vt:=Pos('Lop 10', st); writeln(vt)); readln;

End

- Hái: KÕt đa hình?

- Thc hin chng trình để học sinh quan sát Giới thiệu hàm Upcase

- ChiÕu cÊu tróc chung cđa hµm Upcase:

- Hàm Upcase(ch), cho kí tự hoa tơng ứng cđa kÝ tù ch chiÕu vÝ dơ:

Var st:String[20]; 1:byte; Begin

st:= 'Lop 10A chung minh';

For i:=1 to length(st) Do st[i]:=Upcase(st[i]); writeln(vt)); readln;

End

v suy ngh tr li cõu hi

- Kết quả: hình:

xau ban dau la: Lop 10A chung minh

xau chep la: Lop 10A

- Chó ý theo dõi suy nghĩ trả lời câu hỏi

- Kết quả: 17

- Chú ý theo dõi suy nghĩ trả lời câu hỏi

- Kết quả:

- Chó ý theo dâi vµ suy nghÜ trả lời câu hỏi

- Kết đa hình:

(72)

- Thc hin chng trình để học sinh quan sát Giới thiệu thủ tục Insert

- ChiÕu cÊu tróc chung cđa thđ tơc Insert

- Hµm Insert(st1,st1,vt), thùc hiƯn viƯc chÌn xâu st1 xâu st2 vị trí vt

chiÕu vÝ dô:

Var st1, st2:String[20]; Begin

st2:= 'Lop 10A chung minh'; st1:=' thpt Viet Yen1'; Insert(st1,st2,8); writeln(st1)); readln; End

- Hái: KÕt đa hình?

- Thc hin chng trình để học sinh quan sát

MINH

- theo dõi, ghi suy nghĩ để trả lời cõu hi

- In hình xâu: Lop 10A chung minh thpt Viet Yen1

IV Đánh giá cuèi bµi (5’)

1 Nội dung học: Cách khai báo biến kiểu xâu, tham chiếu phần tử kiểu xâu số hàm, thủ tục

(73)

Tiết 29:

kiểu xâu (tiết 2) Ngày soạn:

Ngày giảng: I-Mục tiêu: 1.Kiến thức:

- Bc đầu sử dụng đợc kiểu liệu xâu, cách khai báo

- Nắm đợc số thủ tục hàm liên quan đến xâu áp dụng giải quyt cỏc bi toỏn n gin

2.Kỹ năng:

- Khai báo đợc kiểu liệu xâu ngôn ngữ lập trình Pascal Sử dụng đợc biến xâu phép toán, hàm thủ tục xâu để giải tốn đơn giản

II-§å dùng dạy học: 1.Chuẩn bị giáo viên:

- Phòng máy tính thực hành

- Mt s chng trình mẫu viết sẵn để giới thiệu ví dụ 2.Chuẩn bị học sinh:

- Sách giáo khoa, ghi III-Hoạt động dạy học:

1 Hoạt động 1: Kiểm tra 15 phút:

a Mục tiêu: Đánh giá mức độ hiểu vận dụng kiểu mảng vào giải toán b Nội dung: Viết chơng trình nhập vào giá trị mảng hai chiều gồm N dòng M cột (N, M nhập từ bàn phím) số ngun Tìm đa hình số nhỏ trong mảng?

2.Hoạt động 2: Rèn luyện kỹ khai báo biến kiểu xâu số hàm thủ tục so sánh xâu

a Mục tiêu: Học sinh nắm đợc ý nghĩa cấu trúc chung phép so sánh sử dụng để giải tốn

b Néi dung: bµi toán nhập vào họ tên hai ngời đa xâu dài hơn. Nếu đa xâu nhập sau

TG Hoạt động giáo viên Hoạt động HS

10 - Để lu họ tên hai ngời, cần dùng biến gì?

- Có thể dùng biến mảng chiều không?

- Yêu cầu học sinh lên giải bài toán hai cách: Dùng biến mảng và dùng biến kiểu xâu.

- Yêu cầu hs theo dõi hai cách giải quyết toán rút nhận xét và cách dùng biến kiểu mảng chiều và biến kiểu xâu, nhận xét cách nhập vµ xt cđa hai biÕn nµy?

- GV cho học sinh lên viết chơng trình trực tiếp m¸y b»ng c¸ch

- Có thể dùng biến mảng chiều đợc. - Hai hs lên bảng viết hai chơng trình theo hai cách khác nhau.

- HS tr¶ lêi

(74)

dùng biến kiểu xâu Rồi GV chạy hai chơng trình để HS thấy đợc rõ khác nhau dùng biến kiểu xâu biến kiểu mảng.

trình thực nh để đa nhận xét

3 Hoạt động 3: Rèn luyện kỹ khai báo biến kỹ sử dụng hàm length, cách truy nhập phần tử xâu.

a Mục tiêu: Học sinh nắm đợc ý nghĩa cấu trúc chung hàm length sử dụng để giải toán Biết truy nhập phần tử xâu

b Néi dung:

Ví dụ 2: Nhập hai xâu từ bàn phím kiểm tra kí tự xâu cã trïng víi kÝ tù ci cïng cđa x©u kh«ng.

Ví dụ 3: Nhập xâu từ bàn phím đa hình xâu nhng đợc viết theo thứ tự ng-ợc lại.

10’ - ChiÕu néi dung vÝ dô vµ vÝ dơ 3.

- Hỏi: Để so sánh đợc kí tự đầu tiên kí tự đầu tiên, thao tác nh nào?

- Yêu cầu hs viết chơng trình trên máy chạy chơng trình đó.

- Yêu cầu học sinh viết ch-ơng trình lên bảng để lớp theo dõi nhận xét.

- Gv chiếu chơng trình mẫu để hs tham khảo tự rút ra kinh nghiệm viết chơng trình.

- Để so sánh kí tự thứ kí tự cuối cùng, tham chiếu đến hai phần tử so sánh, nếu bằng đa thơng báo hai kí tự tru8ngf‘ nhau , ng’ ợc lại thơng báo hai kí tự khơng trùng nhau

- hs viết chơng trình máy chạy chơng trình.

- theo dõi chơng trình bạn so sánh với ch-ơng trình mình, rút nhận xét.

- Theo dõi mẫu GV hoàn thiện chơng trình.

4 Hoạt động 4: Rèn luyện kỹ vận dụng kiểu xâu, phép ghép xâu hàm, thủ tục tác động đến xâu để giải toán.

a Mục tiêu: Học sinh vận dụng đợc hàm length thủ tục, Delete, copy. b Nội dung:

- Ví dụ 4: Nhập xâu từ bàn phím đa hình xâu thu đợc từ việcloại bỏ kí tự trắng.

- VÝ dơ 5: Nhập vào từ bàn phím xâu s1, tạo xâu s2 gồm tất chữ số có trong xâu s1 (Giữ nguyên thứ tự) đa hình.

TG Hot động GV Hoạt động HS

10’ - ChiÕu néi dung vÝ dơ vµ vÝ dơ 5.

- Hỏi: Để xố đợc kí tự trắng trong xâu, cần dung thủ tục nào?

Làm để xố hết kí tự trắng?

- Xo¸ ví trí nào, xoá bao nhiêu kí tự?

- Yêu cầu hs viết chơng trình

- Để xố đợc kí tự trắng xâu, dùng thủ tục Delete.

- Duyệt tất phần tử, so sánh phần tử với kí tự trắng, kí tự trắng dùng thủ tục Delete để xoỏ.

- Xoá vị trí i, mà s[i]= , xo¸ kÝ tù.’ ‘

(75)

ơng trình lên bảng để lớp theo dõi nhận xét.

- Gv chiếu chơng trình mẫu để hs tham khảo tự rút ra kinh nghiệm viết chng trỡnh.

ơng trình mình, rút nhận xÐt.

- Theo dâi bµi mÉu cđa GV vµ hoàn thiện chơng trình.

IV Đánh giá cuối (2’)

1 Nội dung học: Cách khai báo biến kiểu xâu, tham chiếu phần tử kiểu xâu mt s hm, th tc

2 Câu hỏi tập nhà: Xem phần lý thuyết làm bµi tËp sgk vµ sbt TiÕt 30

Bµi tËp thực hành (Tiết 1) I Mục tiêu

1 KiÕn thøc:

- Khắc sâu thêm phần kiến thức lý thuyết kiểu xâu kí tự, đặc biệt hàm thủ tục liên quan

- Hiểu vận dụng số thuật toán : Tạo xâu mới, đếm số lần suất ca mt kớ t

2 Kỹ

- Khai báo biến xâu

- Nhp, xut cho giỏ trị biến xâu - Duyệt qua tất kí tự xâu - Sử dụng đợc hàm thủ tục chuẩn Thái độ

- Tích cực, chủ động sáng tạo thực hành II Đồ dựng dy hc

1 Hoạt động 1: Tìm hiểu chơng trình, đề xuất phơng án để học sinh có đợc kĩ làm việc với kiểu xâu

a Mơc tiªu:

- Học sinh biết hiểu đợc chơng trình, tính đợc kết chơng trình Biết đề xuất phơng án cảI tiến

b Néi dung:

- NhËp mét x©u, kiểm tra xem có phải xâu Palindrome hay không?> Chơng trình minh họa sgk - tr.73

TG Hoạt động GV Hoạt động HS

20’ Tìm hiểu đề

- Giới thiệu đầu lên hình chiếu - Diễn giải: Xâu Palindrome xâu mà đọc từ trái qua phải đợc kết giống nh c t phi qua trỏi

- Yêu cầu HS lấy hai ví dụ xâu Palindrome?

2 Tìm hiểu chơng trình gợi ý - Chiếu chơng trình lên hình

- Theo dừi v nghiờn cu u

- LÊy hai vÝ dơ vỊ x©u palindrome: abcdcba; 1234321;

- Theo dõi chơng trình hình - Trả lời

(76)

-Hỏi: Chơng trình có chức gì? cho kết gì?

- Thực chơng trình để kiểm nghiệm suy lun ca hs

3 Cải tiến chơng trình

- Nêu yêu cầu mới: Viết lại chơng trình mà kh«ng sư dơng biÕn trung gian p

- u cầu: Nhận xét cặp đối xứng xâu Palindrome?

- Hỏi: Kí tự thứ i đối xứng với kí tự vị trí xâu?

- Hỏi: Cần phải so sánh cặơp kí tự xâu để biết xâu có xâu Palindrome?

- Yêu câu: Dùng cấu trúc lặp để so sánh? - Yêu cầu hs viết chơng trình hồn chỉnh - u cầu hs nhập liệu cho sẵn gv thông báo kết

suy ln cđa m×nh

- Chó ý theo dâi yêu cầu suy nghĩ trả lời

- Các kí tự giống

- Kớ t thứ i đối xứng vứi kí tự thứ length() – i+1

- so sánh tối đa length() div cặp kí tự xâu

- Có thể dùng cấu trúc lặp For While

- Viết chơng trình máy - Thông báo kết qủa

2 Hoạt động 2: Rèn luyện kỹ lập trình a Mc tiờu:

- Học sinh biết phân tích toán áp dụng kiểu liệu xâu b Nội dung:

- Nhập xâu kí tự S, đa a thông báo số lần xuất S chữ tiếng Anh (không phân biệt chữ hoa chữ thờng)

Chơng trình minh họa sgk - tr.73 c Các b ớc tiến hành

TG Hot ng GV Hoạt động HS

- Giới thiệu đầu lên hình chiếu Nêu mục đích tốn - Chia lớp thành nhiều nhóm, nhóm học sinh mỏy tớnh

- Nêu liệu vào, liệu toán?

- Nờu nhim v để giải tốn?

2 u cầu học sinh viết chơng trình máy đợc giao

- Yêu cầu học sinh lập trình xong sớm t×m mét sè bé test

- Yêu cầu học sinh nhập liệu vào theo test giáo viên chọn thông báo lên kết thực chơng trình

- Xác nhận chơng trình viết ađúng,

- Theo dõi nghiên cứu đàu

- Xác định liệu vào Học sinh trả lời:

- Thực viết chơng trình máy tính - Thự test tự đề xuất

- Test theo bé test cđa gi¸o viªn

(77)

1, Những kiến thức học

- Một số thuật toán đơn giản liên quan đến xâu kí tự Kiểm tra xâu đối xứng, tìm tần xuất xuất kí tự có xâu

(78)

TiÕt 31

1 KiÕn thøc:

- Khắc sâu thêm phần kiến thức lý thuyết kiểu xâu kí tự, đặc biệt hàm thủ tục liên quan

- Hiểu vận dụng số thuật toán : Tạo xâu mới, đếm số lần sut hin ca mt kớ t

2 Kỹ

- Khai báo biến xâu

- Nhp, xut cho giá trị biến xâu - Duyệt qua tất kí tự xâu - Sử dụng đợc hàm thủ tục chuẩn Thái độ

- Tích cực, chủ động sáng tạo thực hành II Đồ dùng dạy học

1 Chn bÞ cđa giáo viên

1 Hoạt động 1: Rèn luyện kỹ lập trình a Mục tiêu:

- Học sinh biết phân tích toán áp dụng kiểu liệu xâu , sử dụng số hàm thủ tục chuẩn liên quan đến xâu

b Néi dung:

- NhËp vào từ bàn phím xâu Thay tất c¸c cơm kÝ tù “anh” b»ng cơm kÝ tù “em” c Các b ớc tiến hành

- Nờu nhim v để giải tốn?

- Yêu cầu học sinh lập trình xong sớm t×m mét sè bé test

- Xác nhận chơng trình viết ađúng,

- Test theo bé test cđa gi¸o viªn

(79)

a Mơc tiªu:

- Học sinh biết phân tích tốn áp dụng kiểu liệu xâu , sử dụng số hàm thủ tục chuẩn liên quan đến xâu

b Néi dung:

- NhËp vµo tõ bµn phÝm mét xâu Đếm đa ầmn hình số lần xuất chữ số xâu?

- Giới thiệu đầu lên hình chiếu Nêu mục đích tốn - Chia lớp thành nhiều nhóm, nhóm học sinh máy tớnh

- Nờu nhim v chớnh giải toán?

2 Yêu cầu học sinh viết chơng trình máy đợc giao

- Yêu cầu học sinh lập trình xong sớm tìm sè bé test

- Xác nhận chơng trình viết ađúng, sai

- Thực viết chơng trình máy tính - Thự test tự đề xut

- Test theo test giáo viên

- Thông báo kết sửa lại chơng trình cho hoàn chỉnh

IV ỏnh giỏ cui bi (5’) 1, Những kiến thức học

- Một số thuật tốn đơn giản liên quan đến xâu kí tự Tham chiếu đến phần tử xâu, so sánh dùng thủ tục chuẩn

(80)

Tiết 32:

kiểu ghi Ngày soạn:

Ngày giảng: I-Mục tiêu: 1.Kiến thức:

- Bc u s dụng đợc kiểu liệu ghi, cách khai báo

- Phân biệt đợc giống khác kiểu ghi kiểu mảng chiều 2.Kỹ năng:

- Khai báo đợc kiểu liệu ghi ngơn ngữ lập trình Pascal Sử dụng đợc biến ghi để giải toán đơn giản

- Nhập xuất đợc liệu kiểu bn ghi - Tham chiu n

II-Đồ dùng dạy học: 1.Chuẩn bị giáo viên:

- Máy tính máy Projector

- Mt s chng trỡnh mu viết sẵn để giới thiệu ví dụ 2.Chuẩn bị học sinh:

- Sách giáo khoa, ghi III-Hoạt động dạy học:

1 Hoạt động 1: Giới thiệu kiểu ghi Tạo kiểu ghi ngôn ngữ Passcal a Mục tiêu:

- Học sinh biết đợc số kiểu liệu có cấu trúc: Kiểu ghi Biết đợc ý nghĩa kiểu ghi với mảng chiều Tạo đợc kiểu ghi

b Néi dung:

- Mỗi thông tin đối tợng dợc gọi thuộc tính hay trờng Mỗi đối tợng đợc mô tả nhiều thông tin hàng đợc gọi ghi

- Để mô tả đối tợng nh vậy, ngơn ngữ lập trình cho phép ta xác định kiểu ghi Mỗi đối tợng đợc mô tả bn ghi

- Khai báo kiểu ghi:

TYPE <tªn_kiĨu_bghi>= RECORD

<Tªn trêng 1>: <KiĨu_trêng_1>; <Tªn trêng 2>: <KiĨu_trêng_2>;

………

<Tªn trêng n>: <KiĨu_trêng_n>; c Các bớc tiến hành

(81)

- Hỏi: Trên bảng có thông tin gì?

- Bng chứa thông tin đối t-ợng (bao nhiêu HS)?

- Yêu càu HS tìm hiểu thêm ví dụ sgk

- Diễn giải: Mỗi thông tin đối t-ợng đợc gọi thuộc tính hay tr-ờng Mỗi đối tợng ghi đợc mô tả nhiều liệu khác - Diễn giải: Để mô tả đối tợng nh vậy, ngôn ngữ Passcal cung cấp kiểu liệu ghi Mỗi đối tợng kiểu ghi

2 Yêu cầu HS nghiên cứu sgk cho biết cách khai báo biến kiểu ghi - u cầu tìm ví dụ minh ho

- Trên có thông tin: Họ tên, lớp, trờng, điểm môn

- Bng chứa thơng tin đối tợng - Xem ví dụ sgk

- HS chó ý nghe

2 Tham khảo sgk để nắm đợc cách khai báo biến kiểu ghi

- LÊy vÝ dơ vỊ kiĨu b¶n ghi

2.Hoạt động 2: Tìm hiểu cách sử dụng kiểu ghi ngôn ngữ Pascal.

a Mục tiêu: Học Sinh biết cách tham chiếu đến trờng ghi Nhập/xuất giá trị ghi

b Néi dung:

- Tham chiếu đến trờng: <tên_biến_bản_ghi>.<Tên_trờng> - Gán trá trị cho biến bn ghi: Cú hai cỏch

+ Gán biến ghi cho biến ghi (cùng kiểu) + Gán giá trị cho trờng

- Nhập/xuất giá trị: Phải viết lệnh nhập/xuất lần lợt với trờng c Các b íc tiÕn hµnh

10’ Giới thệu cấu trúc chung để tham chếu đến trờng gh

Có ph¸p:

<tên_biến_bản_ghi>.<Tên_trờng> - u cầu: Tìm ví dụ tham chếu đến trờng bến ghi đ-ợc khai báo

2 Giới thiệu cách gán giá trị cho biến gh

- Gán biến ghi cho biến ghi - Gán trị cho trờng

- Hi: Trờng hợp thực hện đợc điều kiện nào?

3 Nhập/ xuất giá trị cho bến ghi - Nhập xuất phải thao tác cho

- Theo dõi hình chiếu để nắm đợc cú pháp chung tham chiếu đến trờng

- LÊy vÝ dơ: hs1.hoten;

- Quan s¸t c¸ch g¸n giá trị biến ghi

(82)

trờng

- Yêu cầu HS lấy ví dụ - HS lÊy vÝ dô

3 Hoạt động 3: Rèn luyện kỹ

a Mục tiêu: Học sinh sử dụng đợc biến ghi để giải đợc toỏn n gin

b nội dung: Viết chơng trình qu¶n lý häc sinh cđa mét líp cã N häc sinh (N<=45) Mỗi học sinh cần quản lý: Họ tên, điểm toán, điểm văn, xếp loại Xếp loại theo quy tắc sau:

- Tổng điểm toán văn lớn 18 xếp loại giỏi

- Tổng điểm toán văn nhỏ 18 lớn 14 xếp loại

- Tổng điểm toán văn nhỏ 14 lớn 10 xếp loại trung bình - Tổng điểm toán văn nhỏ 10 xếp loại yếu

15’ ChiÕu néi dung lªn

- hỏi: Để quản lý đợc học sinh, cần tổ chức liệu ntn?

- Mỗi học sinh ghi, gồm thuộc tính (ứng với có trờng)?

- Để quản lý N học sinh lớp, cần tổ chức liệu ntn?

- Mảng chiều gồm N phần tử, kiểu liệu phần tử gì?

- Để đa xếp loại cho học sinh, cần thao tác nào?

-2 Viết chơng trình?

- Theo dõi nội dung bài, suy nghĩ trả lời - Mỗi học sinh ghi

- Mỗi học sinh quản lý thuộc tính: Hoj tên, điểm toán, điểm văn xếp loại

- Để quản lý N học sinh, dùng mảng chiều gồm N phần tử

- Kiểu bảng ghi

- Dùng lệnh If để kiểm tra đa xếp loại cho học sinh

- ViÕt chơng trình IV Đánh giá cuối bài (5)

1 Kiến thức học:

(83)

TiÕt 33

Bài tập ôn tập chơng iv Ngày soạn:

Ngày giảng: I Mục tiêu Kiến thức:

- Cđng cè kiÕn thøc kiĨu d÷ liƯu cã cÊu tróc: Kiểu mảng chiều, mảng hai chiều, kiểu xâu kiểu ghi

2 Kỹ

- Nâmg cao kỹ sử dụng số lệnh kiểu có cấu trúc lập trình Pascal: + Khai báo kiểu liệu mảng chiều, hai chiều, kiểu xâu kiểu ghi

+ Nhập, xuất liệu cho biÕn kiĨu d÷ liƯu cã cÊu tróc

+ Duyệt qua tất phần tử mảng để xử lý phần tử mảng, xâu ghi - Biết giải số toán cụ thể thờng gặp:

3 Thái độ

II §å dïng dạy học Chuẩn bị giáo viên

- Học sinh vận dụng đợc câu lệnh biến mảng chiều để giải toán b Nội dung:

Viết chơng trình nhập từ bàn phím số nguyên dơng N (N<=100) dãy A gồm N số ngun dơng A1,…,AN có giá trị tuyệt đối khơng lớn 1000 Hãy đa số lợng số chẵn, số lẻ, số lợng số nguyên tố dóy

TG Hot động giáo viên Hoạt động học sinh 15’ Chiếu nội dung tập lên

h×nh chiếu

2 Yêu cầu học sinh viết chơng trình

- Để đếm đợc số chẵn số lẻ, cần thao tác nào?

- Để đếm đợc số lợng số nguyên tố, cần phải thực thao tác no tr-c?

- Viết chơng trình, chạy chơng trình baói cáo kết

- Theo dõi hình suy nghĩ trả lời câu hỏi

- Kiểm tra a[i] có chia hết cho khơng, chia hết cho tăng biến đếm số chẵn lên, ngợc lại tăng biến đếm số lẻ

- Cần kiểm tra giá trị a[i] xem có phải số nguyên tố không

- Viết chơng trình, chạy chơng trình báo cáo kết

Học sinh vận dụng tổng hợp kiến thức học kiểu liệu mảng hai chiều đểgiải toán cụ thể

b Néi dung:

Viết chơng trình nhập vào hai số nguyên dơng N, M từ bàn phím Cho mảng hai chiều gồm N dòng M cột Tìm đa hình giá trị lớn theo hàng?

TG Hot ng ca giỏo viên Hoạt động học sinh

(84)

- Hỏi: Để duyệt phần tử mảng câng thực vòng lặp ntn?

- Hi: tỡm theo hàng, giá trị số hàng so với giá trị số cột ntn? - Trong hai vịng For đó, vịng for số hàng vòng For số cột? Yêu cầu học sinh gõ chơng trình - Gõ chơng trình, chạy chơng trình báo cáo kết quả, đa nhận xét

- Để duyệt đợc tất phần tử mảng cần dùng hai vịng For lồng

- Chỉ số cột phải đợc duyệt hết lợt tăng số hàng

- Vòng For vòng chạy số hàng, vòng For số cột - Gõ chơng trình, chạy chơng trình báo cáo kết quả, ®a nhËn xÐt

Học sinh vận dụng tổng hợp kiến thức học kiểu liệu liệu xâu để giải toán cụ thể

b Néi dung:

Viết chơng trình nhập vào xâu Thực loại bỏ kí tự trắng d thừa: Kí tự trắng đầu cuối xâu từ có nhiều kí tự trắng xố kí tự trắng để cho từ phân cách kí tự trắng

TG Hoạt động giáo viên Hoạt động học sinh 15' Chiếu nội dung bi

- Hỏi: Để duyệt phần tử xâu thực ntn?

- Hỏi: Để xoá bỏ kí tự trắng d thừa dùng thủ tục xâu?

- Hỏi: Xoá vị trí nào, xoá kí tự?

2 Yêu cầu học sinh gõ chơng trình - Gõ chơng trình, chạy chơng trình báo cáo kết quả, đa nhËn xÐt

- Theo dõi hình nội dung tập - Để duyệt đợc tất phần tử mảng cần dùng vịng For

Xoá kí tự trắng đầu xâu: Delete(st,1,1); - Xoá kí tự trắng cuối xâu: Delete(st,lenghth(st),1);

- Xoá kí tự d thừa từ: Delete(st,i,1);

- Gõ chơng trình, chạy chơng trình báo cáo kết quả, đa nhận xét

IV ỏnh giỏ cuối (5ph) Kiến thức học

Học sinh thực đợc số thuật toán bản: + Thao tác với mảng chiều

+ Thao tác với mảng hai chiều

+ Thao tác với biến xâu, sử dụng thủ thục xâu Câu hỏi tập nhà

(85)

TiÕt 34

KiĨm tra 45 – bµi số 1

Ngày soạn: Ngày giảng:

1 Mc tiêu cần đánh giá

- KiĨm tra kÕt qu¶ tiÕp thu cđa häc sinh sau häc xong ch¬ng IV – kiĨu d÷ liƯu cã cÊu tróc

- Đánh giá kỹ nhận xét, phân tích toán kỹ lập trình giải toán

- Cú thỏi t giỏc, tớch cực làm kiểm tra Mục đích – yêu cầu đề

- Kiến thức: Học sinh nắm đợc kiến thức kiểu liệu kiểu liệu có cấu trúc

- Kỹ năng: Có kỹ phân tích toán, soạn thảo chơng trình, biên dịch, thực sửa lỗi chơng trình

3 Chuẩn bị:

- GV: Chuẩn bị phòng máy (2hs/1máy – kiểm tra lợt – 20phút – 1hs) - HS: Chuẩn bị đầy đủ kiến thức đợc học ôn tập

4 Nội dung đề kiểm tra * Kiểm tra thực hành:

- Đề : Viết chơng trình quản lý điểm học kỳ học sinh Biết học sinh có thơng tin: Họ tên,lớp, điểm tốn, điểm lý, điểm hoá, điểm văn, điểm ngoại ngữ, điểm trung bình (là trung bình cộng điểm tốn, lý, hoá, văn ngoại ngữ) Hãy nhập vào thông tin học sinh đa hình thơng báo xếp loại học sinh, với cách xếp loại sau: Nừu điểm trung bình nhỏ 3.5 xếp loại kém, điểm trung bình lớn 3.5 nhỏ 5.0 xếp loại yếu, điểm trung bình lớn 5.0 nhỏ 6.5 xếp loại trung bình, điểm trung bình lớn 6.5 nhỏ 8.0 xếp loại khá, cịn lại xếp loại giỏi

- §Ị 2: Mỗi phân số lưu ghi nhận tử số mẫu số Hãy tổ chức kiểu liệu tương ứng , thùc phép cng, tr hai phân s đa kết hình

ỏp ỏn 1 Biu điểm

- Khởi động chơng trình Pascal Program ktra;

Uses crt;

Type hocsinh=record Ten:string[30]; Lop:string[5];

Diem:array[1 5] of real;

(86)

Dtb: real; End;

Var hs: hocsinh; I:Integer; Begin

Clrscr;

Writeln(‘Nhap thong tin cua hoc sinh:’); Write(‘Ho va ten: ‘); readln(hs.ten); Write(‘Hoc lop: ‘); readln(hs.lop); Hs.dtb:=0;

For i:=1 to Begin

Write(‘Nhap diem thu ‘, i); readln(hs.diem[i]);

Hs.dtb:=hs.dtb+hs.diem[i]; End;

Hs.dtb:=hs.dtb/5;

If hs.dtb<3.5 then write(‘Hoc luc loai KEM’) Else

if hs.dtb<5 then write(‘Hoc luc loai YEU’) Else

if hs.dtb<6.5 then write(‘Hoc luc loai TB’)

Else if hs.dtb<8 then write(‘Hoc luc loai KHA’) Else write(‘Hoc luc loai GIOI’);

Readln; END

0.25 0.25 1 0.5

1

0.5

Đáp án đề 2 Biểu điểm

- Khởi động chơng trình Pascal Program de2;

Uses crt;

Type phanso=record Tu,mau: real;

(87)

Tong, hieu: real; Begin

Clrscr;

Writeln(‘Nhap gia tri cho phan so thu nhat:’); Write(‘tu so: ‘); read(ps1.tu);

Write(‘, mau so‘); readln(ps1.mau);

Writeln(‘Nhap gia tri cho phan so thu nhat:’); Write(‘tu so: ‘); read(ps1.tu);

Write(‘, mau so‘); readln(ps1.mau);

Tong:=(ps1.tu*ps2.mau+ps1.mau*ps2.tu)/(ps1.mau*ps2.mau); Hieu:= (ps1.tu*ps2.mau-ps1.mau*ps2.tu)/(ps1.mau*ps2.mau); Readln;

END

0.25 0.25 1 0.5 2 0.5

5 Đánh giá - cho ®iĨm

(88)

TiÕt 35

kiĨu tệp

Ngày soạn: Ngày giảng: I Mục tiêu: 1 KiÕn thøc: - Kh¸i niƯm tƯp - KiĨu tƯp

- Các thủ tục hàm thao tác tệp 2 Kĩ năng:

- Học sinh biết cách lấy liệu từ tệp lu trữ dới dạng tệp

- Học sinh ghi nhớ, biết cách sử dụng thủ tục hàm thao tác tệp 3 Thái độ:

- Học sinh thấy đợc cần thiết tiện lợi kiểu liệu lu trữ dới dạng tệp

- Häc sinh cã ý thøc lu trữ liệu cách khoa học, phòng chống mát nhiễm virus - Học sinh ý thức tôn trọng quyền, không sữa chữa vô ý thức phần mềm cha mua quyền

II Dự kiến phơng pháp phơng tiện giảng dạy: Ph ơng pháp:

- Hi ỏp

- Gii vấn đề Ph ơng tiện: - Bảng đen, phn

- Chơng trình minh hoạ III Tiến trình lªn líp:

ổ n định tình hình lớp:(2 phút) - Sỹ số: có mặt: vắng mặt: - ổn định trật tự lớp

Giíi thiƯu giÊo viªn dự Kiểm tra cũ: (5phút) - Câu hái:

Hãy khai báo mảng có n phần tử ( n) mảng A có kiểu phần tử xâu (string) mảng B có kiểu phần tử kí tự (Char)

(gọi học sinh xung phong lên bảng học sinh khác nhận xét, hỏi thêm hai phần tử mảng có gán giá trị cho đợc khơng)

(89)

0 …

DÊu hiÖu cuèi tÖp Cưa sỉ tƯp

* khơng thể gán đợc chúng không kiểu liệu Nội dung mới:

Đặt vấn đề: (1’)

Ta biết kiểu liệu học đợc lu trữ nhớ RAM mang tính chất tạm thời phục vụ cho q trình xử lí thơng tin Vì mà dừng chơng trình mất điện giá trị chúng bị Đối với tốn liệu đợc lu trữ để xử lí nhiều lần với khối lợng lớn cần có kiểu liệu khác với kiểu liệu học Trong Turbo Pascal kiểu liệu tệp

TG Hoạt động

HS Hoạt động GV Nội dung ghi bảng

5’

- HS: a mm, a cng, a CD

Không bị tắt nguồn, lâu dài

Giống: dÃy gồm phÇn tư cïng kiĨu

Khác: số phần tử khơng xác định trớc, lu trữ thiết bị ngoài…

Các em hình dung thực tế tệp giống nh phim Trong phim gồm nhiêù ảnh Khi ta khơng muốn xem ảnh ảnh phim không bị đi; ta xem phim nhiều lần Và tệp nh ?Nhắc lại thiết bị Tệp đợc lu trữ thiết bị tệp có u điểm gì?

Tại thời điểm tất ô bị che trừ ô gọi cửa sổ tệp Nhờ cửa sổ tệp đọc ghi liệu vào tệp vị trí sau thành phần cuối tệp dấu hiệu cuối tệp So sỏnh vi mng?

Để làm việc với biến tệp trớc hết phải biết cách khai báo mét biÕn kiĨu tƯp

Gi¶i thÝch vd1?

Khai báo biến sothuc chứa số thực?

Bài 14: kiĨu tƯp. 1 Kh¸i niƯm tƯp:

Tệp tập hợp liệu kiểu đợc nhóm với thờng đ-ợc lu trữ thiết bị ngoi vi mt tờn no ú

lâu dài, không đdùng nguồn điện, với khối lỵng lín

* CÊu tróc cđa tƯp:

… EOF

2 Khai b¸o biÕn kiĨu tƯp: Cã hai c¸ch:

+ Gi¸n tiÕp:

TYPE <kiĨutƯp> = FILE OF <kiĨuphÇntư>;

VAR biÕntƯp: kiĨutƯp; + Trùc tiÕp

VAR biÕntƯp: FILE OF <kiĨuphÇntư>;

Trong đó:

<kiĨutƯp>: lµ biÕn kiĨu tƯp

(90)

5’

BiÕn tÖp f1 chøa số nguyên Var sothuc: file of real;

Hoặc Type thuc= FILE OF

REAL;

Var sothuc:thuc;

Giải thích ví dụ Học sinh lên bảng

Khi khai báo var x: integer giá trị cha đợc xác định, phải dùng lệnh gán chẳng hạn x:= thủ tục Read(x) để nhập giá trị cho x từ bàn phím Cũng nh khai báo var f : file of integer thi f biến tệp số nguyên cha tơng ứng với tệp thực Để gán tên cho biến tệp f ta phải sử dụng thủ tục : Mọi thao tác tệp thông qua <tờnbintp>

Vì muốn làm thao tác khác tệp trớc tiên phải sử dụng thủ tục

Vd1: giả sử có biến xâu s cần gán biến tệp f với tệp có tên dulieu.dat

Cần gán biến tệp f1 với tệp có tên solieu.dat th mục gốc ổ đĩa C?

Muốn thao tác tệp ta phải mở tệp để đọc liệu từ tệp ta tạo tệp

Gi¶i thÝch vÝ dơ?

Muốn tạo tệp có tên lop11vp.dat th mục khoi11 ổ đĩa C?

Gi¶i thÝch vÝ dơ?

cđa tƯp vÝ dơ1:

var f1: file of integer; vd2

3 Các hàm thủ tục thao tác trên tệp:

a Thủ tục gán tên cho biến tệp: cú pháp: ASSIGN(tênbiếntệp, têntệp);

chức năng: gán <têntệp> cho

<tờnbintp> Trong <têntệp> biến kiểu xâu xâu;

<tênbiếntệp> đặt tên theo qui tắc Turbo Pascal

Vd1:

S:= ‘dulieu.dat’; ASSIGN(f, s); Hc ASSIGN(f, ‘dulieu.dat’); b Thđ tơc më tƯp:

* Më tƯp míi: cú pháp:

ASSIGN(tênbiếntệp, têntệp); REWRITE(tênbiếntệp); chức năng: tạo tƯp míi vd1:

ASSIGN(f, ‘dulieu.dat’); REWRITE(f);

Chó ý:

- Nếu <têntệp> tồn nội dung tệp bị xoá tạo thành tệp có kích thớc byte

- Nếu <têntệp> khơng có đờng dẫn tệp đợc tạo th mục hành

Vd2:

(91)

5’

Häc sinh giải thích

Học sinh lên bảng

Học sinh tr¶ lêi

Read(x): nhập giá trị cho x từ bàn phím cịn read(f,x) đọc liệu từ tệp có tên gán cho biến tệp f gán cho biến x

Khi mở tệp tức tạo tệp nh chúng cần phải ghi liệu vào tệp Chúng ta biết cách ghi liệu vào tệp, làm để đọc liệu từ tệp ra?

đọc giá trị từ tệp gắn cho biến tệp f1 gán cho biến a? Sự khác Read(x) Read(f,x)?

3 -31 410 32 -33

Sau làm việcvới tệp xong phải đóng tệp lại để tránh mát thơng tin

RESET(tªnbiÕntƯp);

chức năng: mở tệp có tên gán cho <tênbiếntệp> trớc để sẵn sàng truy xuất (đọc/ ghi) liệu tệp Vd:

Assign(f,’solieu.dat’); Reset(f);

c Thđ tơc ghi liệu: cú pháp:

WRITE(tênbiếntệp, bt1,bt2, ,btn);

chức năng:lần lợt ghi giá trị bt1,bt2, ,btn vào tệp bắt đầu vị trí cửa sổ tệp

Vd: write(f,a);

Chú ý: biểu thức phải kiểu liệu với thành phần tệp d Thủ tục đọc liệu từ tệp: cú pháp:

READ(tªnbiÕntƯp, biÕn1,biÕn 2, ,biÕnn);

chức năng:lần lợt đọc giá trị tệp vị trí cửa sổ tệp gán cho biến tơng ứng

Vd1: read(f,a); Vd2: read(f,a,b,c);

Chó ý: c¸c biĨu thức phải kiểu liệu với thành phần tệp d Thủ tục Seek:

cú pháp: SEEK(tênbiếntệp, biÕnnguyªn);

Chức năng:đa cửa sổ tệp vị trí phần tử có số thứ tự xác định giá trị <biếnnguyên>

vd: seek(f1,4);

e Thủ tục đóng tp:

cú pháp: CLOSE(tênbiếntệp); f Một số hàm:

- Hàm EOF(tênbiếntệp): có giá trị True cửa sổ tệp cuối tệp cho giá trị False ngợc lại

(92)

Assign((tªnbiÕntƯp, tªntƯp);

Rewrite(tªnbiÕntƯp); Rewrite(tªnbiÕntƯp); Write(tªnbiÕntƯp, bthøc); Read(tªnbiÕntƯp, biÕn); 5’

- Hàm FILESIZE(tênbiếntệp): cho biết kích thớc tệp

4 Cñng cè kiÕn thøc (2’):

(93)

TiÕt 36

vÝ dơ lµm viƯc víi tƯp Ngµy soạn:

- Cđng cè kiÕn thøc kiÐn thøc vỊ tƯp thao tác với tệp Kỹ

- Khai báo sử dụng biến tệp:

- Sử dụng số thủ tục hàm tệp

- Sử dụng biến kiểu tệp để giải đợc số toán đơn giản ứng dụng thực tế Thái độ

- Góp phần rèn luyện tác phong, t lập trình: Tự giác, tích cực Chủ động sáng tạo tìm kiếm kin thc

- Phòng máy vi tính, máy chiếu Projector Chuẩn bị học sinh:

1 Hoạt động 1: Ôn tập kiến thức lý thuyết a Mục tiêu:

- Häc sinh nhí kiÕn thøc kiĨu tƯp b Néi dung:

- Gán tên tệp, mở tệp, tạo tệp đóng tệp - c/ghi bn

- Các hàm thủ tục liên quan c Các bớc tiến hành

TG Hoạt động giáo viên Hoạt động học sinh 15’ Gợi ý học sinh nhớ lại kiến thức

lý thuyết học kiểu tệp - Hỏi: Cách khai báo biến kiểu tệp?

- Hái: Có hàm thủ tục làm việc với tệp?

- Theo dõi hình suy nghĩ trả lời câu hỏi

- Var <tên_biến_tệp>: text;

- Assign(<tªn_biÕn_tªp>,<tªn_tƯp>); - Rewrite(<tªn_biÕn_tƯp>);

Reset(<Tªn_biÕn_tƯp>); Close(<Tªn_biÕn_tƯp>);

Read/readln(<tªn_biÕn_tƯp>,<ds_biÕn>); Write/Writeln(<tªn_biÕn_tƯp>,<ds_biÕn>); - Eof(<tªn_biÕn_tƯp>);

Seek(<Tªn_biÕn_tƯp>);

Học sinh hiểu đợc nội dung chơng trình Biết đợc đầu vào đầu chơng trình b Nội dung:

- VÝ dơ vµ - sgk c Các bớc tiến hành

TG Hot ng ca giỏo viên Hoạt động học sinh 15' Chiếu nội dung ví dụ - sgk - tr87

- Gợi ý cho HS hiểu đợc chơng trình - Hỏi: hàm Eof(f) có chức gì? - Có thể sử dụng cấu trúc For thay While đợc không?

- Chơng trình thực cơng việc gì? - Thực chơng trình để hs thấy đợc

- Theo dâi néi dung vÝ dô

- Hàm Eof(f) cho giá trị True trỏ tệp định vị v trớ kt thỳc

- Không, số lợng phần tử tệp

(94)

kÕt qu¶

2 ChiÕu néi dung vÝ dơ

- Chiếu mô kết nối điện trở - Hỏi: Cơng thức tính điện trở sơ đồ I, II III?

- ChiÕu vÝ dụ lên bảng

- Hi: Mng a dựng lu trữ giá trị nào? - Cho file liệu gồm hai dịng, u cầu học sinh tính kết quả?

- Thực chơng trình để học sinh thấy đợc kết

-2 Quan s¸t vÝ dơ

- Nêu công thức tính điện trở

- Dùng để lu điện trở tơng đơng điện trở mắc theo cách

- Quan s¸t kÕt qu¶

Học sinh vận dụng tổng hợp kiến thức học kiểu liệu liệu xâu để giải toán cụ thể

b Néi dung:

Viết chơng trình nhập vào xâu Thực loại bỏ kí tự trắng d thừa: Kí tự trắng đầu cuối xâu từ có nhiều kí tự trắng xố kí tự trắng để cho từ phân cách kí tự trắng

TG Hoạt động giáo viên Hoạt động học sinh 15' - Chiếu nội dung tập lên hình

- Hái: ThÕ nµo lµ kÝ tự trắng d thừa? - Để xóa kí tự xâu, cần thao tác ntn?

- Xóa kí tự, vị trí nào? - Để kiểm tra từ có nhiều kí tự trắng hay không, thao tác ntn?

- Quan sát nội dung tập hình - Kí tự trắng d thừa kí tự trắng đầu xâu cuối xâu nhiều kí tự phân cách từ

- Sử dụng thủ tục Delete

- Kiểm tra hai kí tự liên mà có nhiều kí tự xóa kí tự IV Đánh giá cuối (5ph)

1 Kiến thức học

Học sinh thực đợc số thuật toán bản: + Thao tác với mảng chiều

+ Thao t¸c víi mảng hai chiều

+ Thao tác với biến xâu, sử dụng thủ thục xâu Câu hỏi vµ bµi tËp vỊ nhµ

(95)

TiÕt 37

thực hành - kiểu tệp Ngày soạn:

- Khắc sâu thêm phần kiến thức lý thuyết kiểu tÖp

- Hiểu vận dụng kiểu tệp vào giải số toán đơn giản Kỹ

- Khai b¸o biÕn tƯp

- Đóng, mở tệp, gán tên tệp,tạo tệp mới, đọc ghi thông tin tệp - Sử dụng đợc số hàm thủ tục liên quan đến tệp

3 Thái độ

- Phòng máy vi tính, máy chiếu Projector Chuẩn bị học sinh:

1 Hoạt động 1: Rèn luyện kỹ phân tích lập trình a Mục tiêu:

- Học sinh biết phân tích toán áp dụng kiểu tệp vào giải toán cụ thể b Néi dung:

- Bµi 5.5 – sbt –tr.53 c Các b ớc tiến hành

20’ Tìm hiu bi

- yêu cầu: Tìm hiểu chơng trình, cho biết đoạn lệnh đầu thực công việc gì?

- Vòng lặp While thứ thực nhiệm vụ gì?

- Vòng lặp While thứ hai thực công việc gì?

- chng trỡnh thc cơng việc gì? Chia lớp thành nhiều nhóm, nhóm học sinh máy tính thực máy báo cáo kết để kiểm nghiệm

- Quan sát nội dung tập suy nghĩ trả lời câu hỏi

- Gỏn tờn cho f1, f2, mở tệp f1 để đọc mở tệp f2: tệp để ghi

- Thực đọc số dơng file f1- tệp: TEP_A.txt ghi vào file f2

- Thực đọc số dơng file f1- tệp: TEP_B.txt ghi vào file f2

- Lọc số dơng file TEP_A.txt vµ file TEP_B.txt lu vµo f2 – file: TEP_AB.txt

- Thực chơng trình máy bóa cáo kết thu đợc

- Học sinh biết phân tích toán áp dơng kiĨu tƯp vµ sư dơng mét sè hµm, thđ tục liên quan

b Nội dung:

- Bài 5.11 sbt-tr.57 c Các b ớc tiến hành

(96)

- Nờu nhim v chớnh để giải toán?

2 Yêu cầu học sinh viết chơng trình máy đợc giao

- Yêu cầu học sinh lập trình xong sớm tìm mét sè bé test

- Xác nhận chơng trình viết ađúng, sai

- xác định thao tác cần thực - Xóa kí tự trắng d thừa

- Thông báo kết sửa lại chơng trình cho hoàn chỉnh

IV Đánh giá cuối (5’) 1, Những kiến thức học

- Một số thuật toán đơn giản liên quan đến tệp áp dụng đợc thủ tục hàm liên quan đến tệp vào giải toán

(97)

TiÕt 38

Bài tập - kiểu tệp Ngày soạn:

- Khắc sâu thêm phần kiến thức lý thuyết kiểu tệp

- Hiểu vận dụng kiểu tệp vào giải số toán đơn giản Kỹ

- Khai b¸o biÕn tƯp

- Đóng, mở tệp, gán tên tệp,tạo tệp mới, đọc ghi thông tin tệp - Sử dụng đợc số hàm thủ tục liên quan đến tệp

3 Thái độ

1 ChuÈn bÞ giáo viên

- Phòng máy vi tính, máy chiÕu Projector Chn bÞ cđa häc sinh:

- Häc sinh biết phân tích toán áp dụng kiểu tệp vào giải toán cụ thể b Nội dung:

- Bài 5.7 sbt tr.55 c Các b íc tiÕn hµnh

- Giới thiệu đầu lên hình chiếu Nêu mục đích tốn

- Chia lớp thành nhiều nhóm, nhóm học sinh m¸y tÝnh

- Nêu liệu vào, liệu tốn? - Nêu nhiệm vụ để giải toán?

2 Yêu cầu học sinh viết chơng trình máy đợc giao - Yêu cầu học sinh lập trình xong sớm tìm số test - Yêu cầu học sinh nhập liệu vào theo test giáo viên chọn thơng báo lên kết thực chơng trình

- Xác nhận chơng trình viết đúng, sai

- Quan sát nội dung tập suy nghĩ trả lời câu hỏi

- nghiờn cu u bi gii quyt bi toỏn

- Đọc liệu tõ hai tƯp

nguyen1.txt vµ

nguyen2.txt , ghi vào tệp nguyen12.txt

- Viết chơng trình máy

- Test với liệu báo cáo kết

2 Hot ng 2: Rốn luyn kỹ lập trình a Mục tiêu:

- Häc sinh biết phân tích toán áp dụng kiểu tệp sử dụng số hàm, thủ tục liên quan

b Néi dung:

- Viết chơng trình đọc file văn đếm số từ file với quy định kết thúc từ khaỏng trắng, TAB xuống hàng

c C¸c b íc tiÕn hµnh

(98)

- Nờu nhim vụ để giải tốn?

- Yêu cầu học sinh lập trình xong sím t×m mét sè bé test

- u cầu học sinh nhập liệu vào theo test giáo viên chọn thông báo lên kết thực chơng trình

- Xác nhận chơng trình viết đúng, sai

- Xác định thao tác cần thực

- Đếm từ file: Từ đợc kết thúc kí tự trắng, Tab xuống hàng

- Thông báo kết sửa lại chơng trình cho hoµn chØnh

- Một số thuật toán đơn giản liên quan đến tệp áp dụng đợc thủ tục hàm liên quan đến tệp vào giải toán

(99)

Tiết 39

Chơng vi: chơng trình lập trình có cấu trúc

i17 chơng trình phân loại

Ngày soạn: Ngày giảng: I Mục tiªu KiÕn thøc

- Biết đợc khái niệm chơng trình

- Biết đợc ý nghĩa chơng trình cần thiết sử dụng chơng trình để giải tốn

2 Kü

- Nhn bit c cỏc thnh phn phần đầu chơng trình - Nhận biết đợc loại tham số hình thức chơng trình - Biết cách khai báo gọi chơng trình

3 Thái độ: Rèn luyện tinh thần hợp tác làm việc theo nhóm, tn thủ u cầu cụng vic chung

- Máy vi tính, m¸y chiÕu Projector

2 Chuẩn bị học sinh: tài liệu sách giáo khoa III Hoạt động dạy học

1 Hoạt động 1: Xét ví dụ

a Mục tiêu: Từ cách giải toán để rút khái niệm chơng trình

b Nội dung: Xét ví dụ: Tính tổng luỹ thừa: Y= Am+Bn+Cp+Dq, A, B, C, D các biểu thức Chia lớp thành nhóm – ngời, tìm cách giải tốn cho kết nhanh nht?

c Các bơc thực

Tg Hoạt động giáo viên Hoạt động học sinh 20’ Chiếu ví dụ lên hình

- yêu cầu: Chia lớp thành nhớm, nhóm gồm häc sinh Thùc hiÖn tÝnh Y, cho kÕt nhanh

- Để đa kết nhanh nhÊt, cÇn tỉ chøc thùc hiƯn tÝnh Y nh thÕ nµo?

- Diễn giải: Để giải tốn máy tính, phân nhỏ toán thành toán con, tốn thực nhiệm vụ tốn Pascal cung cấp cho cấu trúc chơng trình con: Thủ tục hàm

- Theo dâi néi dung vÝ dơ trªn hình

- T chc theo nhúm, v ỳng vị trí nhóm

- Tổ chức nhóm cách phân việc cho mội ngời nhóm thực phép tính luỹ thừa, sau kết tổng bốn luỹ thừa cộng lại

(100)

a Mục tiêu: Nắm đợc khái niệm chơng trình con, cách khai báo ý nghĩa sử dụng chơng trình giải toán

b Néi dung:

- Chơng trình dãy câu lệnh mơ tả số thao tác định thực nhiều vị trí chơng trình

- Lợi ích việc sử dụng chơng trình c Các bơc thực

Tg Hot ng giáo viên Hoạt động học sinh 20’ Tìm hiểu ý nghĩa khái niệm chơng

tr×nh

- Chiếu hai chơng trình ví dụ thủ tục hàm chơng trình khơng sử dụng chơng tình con: Chơng trình tính : Y= Am+Bn+Cp+Dq, đẻ học sinh từ thấy đợc ý nghiẫ việc dùng chơng trình

- Hỏi: Nhận xét hai chơng trình đó?

- Hỏi: Khi nên viết chơng trình để giải tốn?

- Yêu cầu học sinh đọc sgk để đa khái niệm chơng trình con?

- Yêu cầu học sinh phát biểu lợi ích việc sử dụng chơng trình để giải tốn?

2 Lấy ví dụ toán mà phân rÃ toán thành toán con?

- Phân rÃ toán thành toán nh nào?

- Quan sát hai chơng trình suy nghĩ trả lời

- Chng trỡnh s dụng chơng tình đợc viết ngắn gọn hơn, dễ hiểu so với chơng trình khơng sử dụng ch-ơng trỡnh

- Nêu khái niệm chơng trình - Nêu lợi ích chơng trình - Lấy ví dụ toán tính tổng hiệu hai phân số (Phân số tổ chức kiểu ghi)

- Tổ chức chơng trình tính ớc chung lớn cđa mÉu sè

- sau thực phép cộng trừ hai phân số (kết tối gin)

1 Kiến thức học:- Khái niệm chơng trình - Lợi ích chơng trình

(101)

Tiết 40

i17 chơng trình phân loại

Ngày soạn: Ngày giảng: I Mục tiªu KiÕn thøc

- Biết đợc ý nghĩa chơng trình cần thiết sử dụng chơng trình để giải tốn

- Biết đợc cấu trúc chơng trình

- Nhn bit c cỏc thnh phần phần đầu chơng trình - Nhận biết đợc loại tham số hình thức chơng trình - Biết cách khai báo gọi chơng trình

3 Thái độ: Rèn luyện tinh thần hợp tác làm việc theo nhóm, tuân thủ yêu cầu vỡ mt cụng vic chung

- Máy vi tÝnh, m¸y chiÕu Projector

1 Hoạt động 1: Phân loại cấu trúc chơng trình

a Mơc tiªu:

- Phân loại đợc chơng trình con: Thủ tục hàm - Cấu trúc chơng trình

b Nội dung:

- Phân loại chơng trình con: Thủ tục hàm - Cấu trúc chơng trình gồm phần: <Phần đầu>

<Phần khai báo> <phần thân>

+ Phần đầu chơng trình bao gồm phần tên chơng trình tham số chơng trình Các tham số đợc gọi tham số hình thức

+ Phần khai báo khai báo biến dùng chơng trình Các biến đợc khai báo để dùng riêng chơng trình goi l bin cc b

+ Phần thân: Là dÃy câu lệnh nằm cặp từ khóa Begin….End; + Tham sè h×nh thøc:

(102)

Tg Hoạt động giáo viên Hoạt động học sinh 20’ Phân loại

- Yêu cầu đọc tài liệu, đa phân loại chơng trình con?

- Khái niệm thủ tục? - Khái niệm hàm?

- Giáo viên chiếu ví dụ để rõ cho học sinh hàm thủ tục

- Hái: ý nghÜa cđa thđ tơc? - Hái: ý nghÜa cđa hµm?

2 Cấu trúc chơng trình

- Hỏi: Cấu trúc chung chơng trình? - Giới thiệu cấu trúc chung chơng trình

- So sánh với cấu trúc chơng trình chính? - Chiếu vÝ dơ vỊ hµm vµ thđ tơc

- Diễn giải: Trong phần đầu chơng trình có tên chơng trình tham số, tham số đợc gọi tham số hình thức Phần khai báo khai báo biến, biến dùng chơng trình goi biến cục

Thân chơng trình đợc bao cặp từ khóa nào?

- Thân chơng trình đợc bao cặp từ kháo Begin…End; nhng sau từ khóa end dấu ; dấu chấm (.)

- Chơng trình dợc định nghĩa đâu chng trỡnh chớnh?

- Chơng trình có hai loại: Thủ tục hàm

- Nêu khái niệm thủ tục - Nêu khái niệm hàm

- Quan sát ví dụ hình để thấy rõ hàm thủ tục

- Nªu ý nghĩa thủ tục - Nêu ý nghĩa hàm

- Cấu trúc chung chơng trình gồm ba phần

- Theo dõi cấu trúc chơng trình

- Cũng có ba phần, khác chỗ đầu chơng trình bắt buộc phải có

- Cặp từ kháo Begin End

- Định nghĩa phần khai báo, sau phần khai báo biến

2 Hoạt động 2: Thực chơng trình

a Mục tiêu: Hiểu rõ đợc tham số hình thức tham số thực Biết cách gọi hàm thủ tục

b Néi dung:

- Tham số hình thức biến đợc khai báo cho liệu vào/ra

- Tham số thực sự: Là hằng, biến tơng ứng với liệu vào / để thực chơng trình

- Gọi thủ tục hàm: Để thực (gọi) chơng trình con, tham số hình thức dùng để nhập liệu vào nhận giá trị tham số thực tơng ứng, cịn tham số hình thức dùng để lu liệu trả giá trị cho tham số thc s tng ng

c Các bơc thực

Tg Hoạt động giáo viên Hoạt động học sinh 20’ Thực chơng trình

(103)

- Sư dơng hµm vµ thđ tơc chuẩn em thờng viết đâu chơng trình chính?

- DiƠn gi¶i:

- Tham số hình thức biến đợc khai báo cho liệu vào/ra

- Tham số thực sự: Là hằng, biến tơng ứng với liệu vào / để thực chơng trình

- Gọi thủ tục hàm: Để thực (gọi) chơng trình con, tham số hình thức dùng để nhập liệu vào nhận giá trị tham số thực tơng ứng, cịn tham số hình thức dùng để lu liệu trả giá trị cho tham số thực tơng ứng

- Viết chơng trình Viết thủ tục hàm kèm theo tham số kết thúc dấu chấm phẩy (;) Viết hàm lệnh thủ tục, khơng c vit hm nh mt cõu lnh

IV Đánh giá cuối bài

1 Kin thc ó hc:- Cu trúc chơng trình

- Tham sè h×nh thøc tham số thực - Thực chơng trình

(104)

TiÕt 41

Ch¬ng vi: ch¬ng trình lập trình có cấu trúc

i18 ví dụ cách viết sử dụng chơng trình con

Ngày soạn: Ngày giảng: I Mục tiêu KiÕn thøc

- Biết đợc cấu trúc chung vị trí thủ tục chơng trình - Phân biệt đợc tham trị tham biến

- Nắm đợc biến toàn cục biến cục Kỹ

- Nhận biết đợc thành phần phần đầu thủ tục

- Nhận đợc hai loại tham số hình thức phần đầu thủ tục

- BiÕt c¸ch khai b¸o hai loại chơng trình với tham số hình thức chúng - Sử dụng lời gọi chơng tình thân chơng trình

- Phõn bit v sử dụng biến toàn cục biến cục

3 Thái độ: Rèn luyện tinh thần hợp tác làm việc theo nhóm, tn thủ u cầu cụng vic chung

- Máy vi tính, m¸y chiÕu Projector

1 Hoạt động 1: Tìm hiểu cấu trúc vị trí chơng trình chơng trình

a Mơc tiªu:

- Học sinh biết đợc cấu trúc chung thủ tục vị trí khai báo thủ tục thân chơng trình

- Học sinh biết đợc khái niệm tham số hình thức tham số thực sự, tham biến tham trị

- Học sinh biết đợc khái niệm biến cục biến toàn cục

b Nội dung:

1 Cách viết sử dơng thđ tơc:

- VÝ dơ: VÏ mét h×nh chữ nhật hình với chơng trình dùng thủ tục chơng trình không dùng thủ tục

- Cấu trúc thủ tục vị trí thủ tục thân chơng trình chính: Program <tên chơng trình>;

(105)

Procedure <tên thủ tục> [(<dang sách tham số>)]; [<phần khai báo>];

Begin

[<dÃy câu lệnh>]; End;

Begin

Các câu lệnh thân chơng trình chính; Lời gọi thủ tục;

End

+ Phần đầu thủ tục: Gồm từ khoá Procedure, tioếp theo tên thủ thục Danh sách tham số có

+ Phn khai bỏo: Dùng để xác định hằng, biến, kiểu xác định chơng trình khác

+ Tham số hình thức tham số đợc đa vào định nghĩa chơng trình + Tham số thực tham số đợc đa vào gọi thủ tục

+ Tham biến: Khi khai báo bắt buộc phải có từ khố VAR trớc Khi gọi chơng trình con, tham số hình thức tham biến đợc phép thay tham số thực biến + Tham trị: Khi khai báo khơng có từ khố VAR trớc Khi gpọi chơng trình con, ác tham số hình thức tham số giá trị đợc thay tham số thực giá trị biến c Các bơc thực

Tg Hoạt động giáo viên Hoạt động học sinh 3’

5’

7’

1 Giíi thiƯu ví dụ mở đầu

- Chiếu chơng trình ví dụ lên bảng Giới thiệu cho học sinh cấu trúc thủ tục vị trí thủ tục, lời gọi thủ tục chơng trình Tìm hiểu cÊu tróc chung

- Hái: VÞ trÝ cđa thđ tục nằm phần chơng trình chính?

- Phân biệt giống khác chơng trình chơng trình chính?

- Chiếu cấu tróc chung cđa thđ tơc - Giíi thiƯu cÊu tróc chung cđa thđ tơc

- Lời gọi thủ tục đợc viết phần ch-ơng trình chính?

3 Tìm hiểu tham số hình thức tham số thùc sù

- ChiÕu vÝ dơ

- Yªu cầu học sinh nhận xét chơng trình sử dụng thđ tơc ë vÝ dơ nµy so víi vÝ dơ tríc? - DiƠn gi¶i: Thđ tơc ve_HCN cho phÐp vÏ hình chữ nhật với nhiều kích thớc khác

- Hỏi: Quan sát chơng trình cho biết, ch-ơng trình ta vẽ đợc

- Quan s¸t vÝ dơ

2 Quan s¸t vÝ dụ suy nghĩ trả lời - Nắm phần khai báo chơng trình

- Giống: Cấu trúc chung

- Khác: Trong phần tên, từ khoá khai báo thủ tục Procedure có tham số

- Lời gọi thủ tục nằm phần thân chơng trình

3 Quan sát ví dụ

(106)

10’

h×nh CN?

- Tham số cd,cr đợc gọi tham số hình thức - Trong lời gọi thủ tục tham số hình thức đsợc thay tham số thực

- So s¸nh lêi gäi thđ tơc: ve_hcn(5,10) ve_hcn(a,b)?

4 Tìm hiểu tham, biến tham trị

- Diễn giải: Tham số có hai chức năng: Đa liệu vào cho chơng trình đa liệu chơng trình tìm đợc

- Hái: C¸c tham số ví dụ thuộc loại nào?

- Chiếu chơng trình ví dụ tham biến - Hỏi: tham số x, y thuộc loại nào?

- Diễn giải: Trong lời gọi thủ tục, tham số hình thức đợc thay tham số thực tơng ứng tên biến chứa liệu đợc gọi tham biến

- Hái: x, y tham trị hay tham biến?

- Hỏi: Có nhận xét khai báo tham số hình thức tham trị tham biến?

- Chiu ví dụ tham biến giải thích để học sinh thấy đợc khác biệt tham trị tham bin

- Vẽ dợc hình

- tham sè thùc sù thđ tơc ve_hcn(5,10) lµ h»ng sè, tham số thực thủ tục ve_hcn(a,b) biến

- Đa liệu vào cho chơng trình xö lý

- đa liệu sau chơng trình xử lý

- Lµ tham biÕn

- Cã tõ lkho¸ Var tríc tham sè h×nh thøc

2 Hoạt động 2: Rèn luyện kỹ

a Mục tiêu: Sử dụng thủ tục để giải số toán

b Néi dung:

- Vẽ hình chữ nhật với kích thíc kh¸c c C¸c bíc thùc hiƯn

Tg Hoạt động giáo viên Hoạt động học sinh 15’ Chiếu nội dung ví dụ lên hình

- Yêu cầu theo dõi nội dung ví dụ suy nghĩ trả lời câu hỏi

- Hi: để vẽ đợc hình chữ nhật có kích thớc khác nhau, thủ tục cần có tham số nào?

- hai tham số tham biến hay tham trị? - Giá trị chiều dài, chiều rộng có kiểu liệu gì?

- Trong thân thủ tục, cần dùng câu lệnh để vẽ đợc hình chữ nht?

- Quan sát nội dung ví dụ suy nghĩ tgrả lời câu hỏi

- Cần có hai tham sè lu chiỊu dµi vµ chiỊu réng

- Tham trị - Số nguyên

(107)

- Hai học sinh máy, viết chơng trình máy

- Thực chơng trình báo cáo kết

và báo cáo kết

1 Kin thc ó hc

- CÊu tróc chung cđa mét thđ tơc vµ vị trí khai báo thủ tục thân chơng trình - Kái niệm tham số hình thức tham số thực sự, tham biến tham trị

- Khái niệm biến cục biến toàn cục

(108)

Tiết 42

i18 ví dụ cách viết sử dụng chơng trình con

Ngày soạn: Ngày giảng: I Mơc tiªu KiÕn thøc

- Biết đợc cấu trúc chung vị trí hàm chơng trình - Phân biệt đợc tham trị tham biến hàm

- Nắm đợc biến toàn cục biến cục Kỹ

- Nhận biết đợc thành phần phần đầu hàm

- Nhận đợc hai loại tham số hình thức phần đầu hàm

- BiÕt c¸ch khai b¸o hai loại chơng trình với tham số hình thức chúng - Sử dụng lời gọi chơng tình thân chơng trình

- Phõn bit đợc khác thủ tục hàm, biết đợc dùng thủ tục dùng hàm

- Phân biệt sử dụng biến toàn cục biến cục

3 Thái độ: Rèn luyện tinh thần hợp tác làm việc theo nhóm, tn thủ u cầu cơng việc chung

- Máy vi tính, máy chiếu Projector

1 Hoạt động 1: Tìm hiểu cấu trúc vị trí hàm chơng trình

a Mơc tiªu:

- Học sinh biết đợc cấu trúc chung hàm vị trí khai báo hàm thân chơng trình

- Học sinh biết đợc khái niệm tham số hình thức tham số thực sự, tham biến tham trị

- Học sinh biết đợc khái niệm biến cục biến tồn cục

b Néi dung:

1 C¸ch viÕt vµ sư dơng hµm: - VÝ dơ mét sè hµm chuẩn

- Cấu trúc hàm vị trí hàm thân chơng trình chính: Program <tên chơng trình>;

(109)

Var khai_báo_biến;

Function <tên hàm> (<dang sách tham số>) : <kiểu liệu hàm>; [<phần khai báo>];

Begin

[<dÃy câu lệnh hàm>]; <Tên hàm >:= <biểu thức>; End;

Begin

Các câu lệnh thân chơng trình chính; Lời gọi thủ tục câu lệnh chứa lời gọi hàm; End

+ Kiểu liệu hàm kiểu liệu kết trả la f kiểu liệu Integer, Real, char, string

+ Sư dơng hµm gièng nh sử dụng hàm chuẩn, viết tên hàm cần gọi thay tham số hình thức tham số thực tơng ứng Lời gọi hàm tham gia vào biểu thức nh toán hạng chí tham số lời gọi hàm thủ tục khác

+ Bin cuc b có ảnh hởng chơng trình đợc sử dụng chơng tình + Biến tồn biến có phạm vi iảnh hởng tồn chơng trình, đợc khai báo phần khai báo chơng trình

c C¸c bíc thùc hiƯn

Tg Hoạt động giáo viên Hoạt động học sinh 3’

5’

7’

1 Giới thiệu ví dụ mở đầu số hàm chuẩn ó hc

- Chiếu chơng trình ví dụ lên bảng Giới thiệu cho học sinh cấu trúc hàm vị trí hàm, lời gọi hàm chơng trình Tìm hiểu cấu trúc chung

- Hỏi: Vị trí thủ tục nằm phần chơng trình chính?

- Phân biệt giống khác thủ tục hàm?

- ChiÕu cÊu tróc chung cđa hµm - Giíi thiƯu cÊu tróc chung cđa hµm

- Lời gọi hàm đợc viết phần chơng trình chính?

3 Tìm hiểu hàm thông qua ví dụ - Chiếu vÝ dơ

- Hàm UCLN(x,y) dùng để làm gì? - Lời gọi hàm đâu?

- Lêi gäi hàm có khác với lời gọi thủ tục? - ChiÕu vÝ dơ

1 Quan s¸t vÝ dơ

- Quan sát ví dụ suy nghĩ trả lời câu hỏi

2 Quan sát cấu trúc chung

- Khai báo phần khai báo chơng trình chÝnh

- Gièng: Cã cÊu tróc t¬ng tù, cã c¸c tham sè…

- Khác nhau: Tên hàm phải quy định kiểu liệu; thân hàm phải có lệnh <tờn hm> := <biu thc>;

Khai báo hàm từ khoá Function Quan sát tìm hiểu ví dơ

- Quan s¸t vÝ dơ

(110)

10

- Hỏi: Trong chơng trình có hàm chức hàm?

- Có lời gọi hàm chơng trình chính?

4 Tìm hiểu biến cục biến toàn cục - Chiếu chơng trình ví dụ

- Hi: Có biến đợc sử dụng chơng trình?

Các biến đợc khai báo chỗ chơng trình?

- DiƠn gi¶i: BiÕn tuso, mauso, A có ảnh hởng toàn chơng trình

- Hỏi: Phân biệt biến toàn cục biến cục bộ, có giống khác nhau?

- Cú mt hàm đợc khai báo - Hàm đợc sử dụng lần

4 Tìm hiểu biến tồn cục, biến cục - Quan sát chơng trình giáo viên - Có biến: tuso, mauso, A, sodu - Các biến tuso, mauso, A đợc khai báo chơng trình

- Biến sodu đợc khai báo chơng trình

- BiÕn cơc bé cã ¶nh hëng cơng trình con, biến cục có ảnh h-ởng chơng trình

2 Hot ng 2: Rốn luyn kỹ

a Mục tiêu: Sử dụng hàm để giải số toán

b Néi dung:

- T×m sè nhá nhÊt cđa sè a, b, c d c Các bớc thực

Tg Hoạt động giáo viên Hoạt động học sinh 15’ Chiếu nội dung ví dụ

- Chiếu ví dụ gợi ý:

- Hỏi: Nêu cách tìm số nhỏ số?

- Để tìm số , chia thành hai cặp một, tìm cặp, so sánh đa kết Có hai cặp, tơng ứng hai lần thực tìm hai số Sử dụng hàm hay thủ tục? - Gọi đến hm tỡm my ln?

- Dùng hàm tìm số nhỏ hai số, cần biến kiểu trả hàm tìm kiểu gì?

2 Viết chơng trình

- Soạn thoả chơng trình máy

1 Quan sát nội dung vÝ dơ

- So sánh cặp số, tìm cặp số so sánh đợc số

- Sư dơng hàm, ví có giá trị trả kiểu số nguyªn

- Gọi hai lần đến hàm tìm

1 Kin thc học

(111)

(112)

TiÕt 43

Bài tập thực hành 6 Ngày soạn:

- Khắc sâu thêm phần kiến thức lý thuyết kiểu xâu kí tự, chơng trình

- Hiu vận dụng kiểu xâu, sử dụng chơng trình vào giải số toán đơn giản

2 Kỹ

- Khai bỏo bin xõu, cỏch sử dụng hàm thủ tục Thái độ

1 ChuÈn bÞ giáo viên

- Phòng máy vi tính, máy chiÕu Projector Chn bÞ cđa häc sinh:

- Häc sinh biết phân tích toán áp dụng kiểu xâu sử dụng chơng trình vào giải toán cụ thể

b Nội dung:

- Tìm hiểu việc xây dựng hai thủ tục sgk- tr.103 c Các b ớc tiến hành

TG Hot động GV Hoạt động HS

20’ Tỡm hiu bi

- yêu cầu: Tìm hiểu thủ tục catdan thực công việc gì?

Câu lệnh copy(s1,2,length(s1)-1); thực nhiệm vụ gì?

Câu lệnh s2:= copy(s1,2,length(s1)-1)+s1[1]; thùc hiƯn nhiƯm vơ g×? - Thđ tơc catdan thực công việc gì?

2 Chia lớp thành nhiều nhóm, nhóm học sinh máy tính thực máy báo cáo kết để kiểm nghiệm

- Quan s¸t néi dung tập suy nghĩ trả lời câu hỏi

- chép length(s1)-1 kí tự liên tiếp xâu s1 tõ vÞ trÝ sè

- Tạo xâu s2 xâu s1 sau đảo kí tự vị trí cuối

- Thực chơng trình máy bóa cáo kết thu đợc

- Häc sinh biÕt phân tích toán áp dụng kiểu xâu sư dơng mét sè hµm, thđ tơc b Néi dung:

(113)

- Chiếu chơng trình lên hình - Hỏi: Chức chơng trình? Cho học sinh viết chơng trình máy

- Viết chơng trình máy - Thực chơng trình

- Trả lời kết chơng trình - Hỏi: Thđ tơc goto(x,y); delay vµ keypressed?

3 Giíi thiƯu cho häc sinh c¸c thđ tơc chn: goto(x,y); delay vµ keypressed

- Thực chơng trình để học sinh thấy đợc kết chơng trình

- Chức chơng trình: Nhập xâu kí tự đa hình dịng chữ chạy mn hỡnh

- Cỏc th tc thc đa trỏ vị trí x, y tốc độ chữ chạy hình

- Theo dõi thực máy nghe gv phân tích chức thủ tục

- Một số thuật toán đơn giản liên quan đến xâu áp dụng đợc thủ tục hàm liên quan đến vào giải toán

(114)

TiÕt 44

Bµi tËp vµ thực hành 6 Ngày soạn:

- Khắc sâu thêm phần kiến thức lý thuyết kiểu xâu kí tự, chơng tr×nh

- Hiểu vận dụng kiểu xâu, sử dụng chơng trình vào giải số bi toỏn n gin

2 Kỹ

- Khai báo biến xâu, cách sử dụng hàm thủ tục Thái độ

- Tích cực, chủ động sáng tạo thực hành II Đồ dùng dạy hc

1 Hoạt động 1: Rèn luyện kỹ phân tích lập trình a Mc tiờu:

- Học sinh biết phân tích toán áp dụng chơng trình vào giải toán cụ thể b Nội dung:

- Vit chơng trình nhập xâu kí tự đa hình dịng chữ chạy dịng ch-ơng trình quy định

- Néi dung ch¬ng trình giống nh chơng trình phần b- sgk-tr.103 c Các b íc tiÕn hµnh

TG Hoạt động GV Hot ng ca HS

20 Chiếu yêu cầu tập

- Chiếu chơng trình phần b- sgk-tr.103, lên hình

- Hỏi: Yêu cầu bài?

2 Cho học sinh viết chơng trình máy

- Trả lời kết chơng trình báo cáo kết chơng trình

- Theo dõi nội dung chơng trình

- u cầu chơng trình: Nhập xâu kí tự đa hình dịng chữ chạy hình giống nh phần b, khác chạy dịng chơng trình quy định Vì phải truyền tham số quy định vị trí dịng chạy hình

2 Hot ng 2: Rèn luyện kỹ lập trình a Mục tiêu:

(115)

TG Hoạt động GV Hoạt động HS 20’ Chiếu nội dung tập

- Hớng dẫn gợi ý: + Tính n! nh thÕ nµo?

+ Dung hàm hay thủ tục để tính n!? + N số biết cha?

+ Vậy phải khai báo n nh để tính đợc n! chơng trình quy định?

2 Yêu cầu hs viết chơng trình máy

- Soạn thảo chơng trình máy - Thực chơng trình báo cáo kết

1 Quan sát yêu câu tập

- Tính n!= nÕu n=0 , nÕu n>0 th× n! =1*2*3*…*n;

- Dùng hàm để tính n! kết liệu có kiểu số nguyên

- N số nhập từ bàn phím thân chơng trình Vì vậy, phai khai báo chơng hàm tính n! tham số

2 Viết chơng trình máy, thực chơng trình báo cáo kết

(116)

TiÕt 45

Bài tập Ngày soạn:

- Khắc sâu thêm phần kiến thức lý thuyết chơng trình

- Hiểu vận dụng chơng trình vào giải số toán đơn giản Kỹ

- Tích cực, chủ động sáng tạo thực hành II Đồ dùng dy hc

- Phòng máy vi tính, máy chiếu Projector Chuẩn bÞ cđa häc sinh:

Bài sgk tr.117 c Các b ớc tiến hành

20 Chiếu yêu cầu tập - Hỏi: Yêu cầu bài?

- Tỡm c BCNN hai số nguyên dơng a b ntn?

- Theo dõi nội dung chơng trình

- Yêu cầu chơng trình: Tìm bội chung nhỏ hai số nguyên dơng a, b có sử dụng hàm thủ tục So sánh cách dùng thủ tục cách dùng hàm

- Tìm UCLN,

- BCNN= (a*b)/UCLN;

- Học sinh biết phân tích toán áp dụng hàm, thủ tục để giải toán b Nội dung:

(117)

20’ ChiÕu néi dung bµi tËp - Híng dÉn vµ gợi ý: + Kiểu trả hàm?

+ Xây dựng hàm trả ký tự in thờng vÒ ký tù in hoa ntn?

- Ký tự ú nhp t bn phớm,

1 Quan sát yêu câu bµi tËp - KiĨu ký tù

- Kiểm tra ký tự chữ in hoa gán lại ký tự cho ký tự in thờng Ngc li gi nguyờn

2 Viết chơng trình máy, thực chơng trình báo cáo kết

(118)

TiÕt 46

KiĨm tra 45 – bµi sè 2

Ngµy soạn: Ngày giảng:

1 Mc tiờu cn ỏnh giỏ

- KiĨm tra kÕt qu¶ tiÕp thu cđa häc sinh sau häc xong ch¬ng V – sư dơng thủ tục hàm - Đánh giá kỹ nhận xét, phân tích toán kỹ lập trình giải toán

- Cú thái độ tự giác, tích cực làm kiểm tra Mục đích – yêu cầu đề

- Kiến thức: Học sinh nắm đợc kiến thức kiểu liệu kiểu liệu có cấu trúc, sử dụng đợc chơng trình vào gii quyt mt s bi toỏn

- Kỹ năng: Có kỹ phân tích toán, soạn thảo chơng trình, biên dịch, thực sửa lỗi chơng trình

3 Chuẩn bị:

- GV: Chun b phòng máy (2hs/1máy – kiểm tra lợt – 20phút – 1hs) - HS: Chuẩn bị đầy đủ kiến thức đợc học ôn tập

4 Nội dung đề kiểm tra * Kiểm tra thực hành:

- Đề : Viết chơng trình tìm đa bội số chung hai số nguyên dơng a b? - Đề 2: Viết chơng trình tính

! ! ! 1

n

y với n số nguyên dơng nhËp tõ bµn phÝm

- Khởi động chơng trình Pascal Program ktra;

Uses crt;

Var a, b,bcnn: Integer;

Function ucln(n,m:Integer):Integer; Begin

If m>n then m:=m-n else n:=n-m; Ucln:=m;

End; Begin Clrscr;

0.25 0.25

4.0

(119)

readln(a,b);

bcnn:=(a*b)/ucln(a,b);

write(‘BCNN cua’,a,’va’,b,’la: ’,bcnn); Readln;

END

3 0.5 0.25

- Khởi động chơng trình Pascal Program de2;

Uses crt; Var y:real; N,i:Integer;

Function gthua(var a:integer):integer; Var i,gt:integer;

Begin Gt:=1;

For i:=1 to a gt:=gt*i; Gthua:=gt;

Begin Clrscr;

Writeln(‘Nhap gia tri N=:’); readln(N);

y:=0;

for i:=1 to N y:=y+1/gthua(i); Writeln(‘Gia tri cua y=:’,y); Readln;

END

0.25 0.25 0.5

4

0.25 0.5 0.25

5 Đánh giá - cho điểm

(120)

Tiết 48

Bài tập thực hành 7 Ngày soạn:

- Khắc sâu thêm phần kiến thức lý thuyết chơng trình con, tham biến, tham trị, phân biệt tham số hình thức vµ tham sè thùc sù

- Hiểu vận dụng sử dụng chơng trình vào giải số toán đơn giản Kỹ

- Tích cực, chủ động sáng tạo thực hành II Đồ dùng dạy hc

- Tìm hiểu cách xây dựng hàm thủ tục chơng trình thực liên quan đến tam giác

b Néi dung:

- Tìm hiểu hàm thủ tục phần a sgk tr.105 c Các b ớc tiến hành

20 Tìm hiểu việc xây dựng hàm thủ tục

- Chiếu chơng trình phần a- sgk-tr.105, lên hình

- Chiếu khai báo kiểu liệu dem tam giác Chiếu hàm thủ tục lên

- Hỏi: Chức chơng trình con?

- Có tham số nào? Tham

1 Tìm hiểu thủ tục hàm - Theo dõi nội dung chơng trình

- Chức chơng trình con:

+ Chng trỡnh daicanh(): Tớnh dài ba cạnh a, b, c tam giác r

+ chuvi():real; cho giá trị chu vi tam giác r + dientich():real; cho giá trị diện tÝch cđa tam gi¸c r

+ Tinhchat(); khẳng định tính chất tam giác: hay cân hay vng

+ hienthi(); hiển thị tọa độ ba đỉnh tam giác hình

(121)

2 Hot ng 2: Rèn luyện kỹ lập trình a Mục tiêu:

- Học sinh biết phân tích tốn áp dụng hàm, thủ tục để giải toán b Ni dung:

phần b sgk-tr.106 c Các b íc tiÕn hµnh

20’ ChiÕu néi dung bµi tập - Chiếu chơng trình câu b - Hỏi: Chơng trình thực gì?

1 Quan sát yêu câu tËp

- Chơng trình thực hiện: Nhập vào tọa độ ba đỉnh tam giác khảo sát tính chất tam giác khảo sát tính chất tam giác: Cân, vuông In chu vi diện tích tam giác

2 ViÕt chơng trình máy, thực chơng trình báo cáo kết

IV ỏnh giỏ cui bi (5) 1, Những kiến thức học

- Một số thuật toán đơn giản, áp dụng đợc thủ tục hàm liên quan đến vào giải tốn

(122)

TiÕt 49

Bµi tËp thực hành 7 Ngày soạn:

- Khắc sâu thêm phần kiến thức lý thuyết chơng trình con, tham biến, tham trị, phân biệt tham số hình thức tham sè thùc sù

- Hiểu vận dụng sử dụng chơng trình vào giải số toán đơn giản Kỹ

- Tìm hiểu cách xây dựng hàm thủ tục chơng trình thực liên quan đến tam giác

b Néi dung:

- phÇn c sgk tr.106 c Các b ớc tiến hành

20’ Phân tích yêu cầu đề - Chiếu chơng trình phần c- sgk-tr.106, lên hình

- Hỏi: Cần chỗ chơng trình phần b nh nào?

- Cách giải toán? Cho học sinh viết chơng trình máy

2 Nhận xét đánh giá kết - Viết chơng trình

-

- Thuật tốn đếm số lợng loại tam giác

- Phải khai báo tệp, đọc liệu tệp để đếm số tam giác lấy tọa độ đỉnh tam giác - Ba số nguyên dơng số lợng ba loại hình tam giác ba số ghi ba dòng tệp

- cần thay đổi đoạn chơng trình nhập liệu chơng trình để đọc liệu từ tệp Tamgiac.inp, thay vào đoạn chơng trình In hình chơng trình để in ba số nguyên dơng số l-ợng ba loại hình tệp tamgiac.out

+ Tht to¸n:

Nếu deu d:=d+1, ngợc lại can c:=c+1 ng-ợc lại v:=v+1;

(123)

- Nhn xét đánh giá

- Học sinh biết phân tích tốn áp dụng hàm, thủ tục để giải toán b Nội dung:

Bài 7.39 sbt tr.75 c Các b íc tiÕn hµnh

20’ T×m hiĨu néi dung bµi tËp - ChiÕu néi dung bµi tËp - Hái: Giải toán ntn? - Sử dụng hàm hay thủ tục? - Kiểu trả hàm? - Gọi hàm lần?

- Hai lần gọi hàm hai lần kiểm tra với hai số khác nhau: Vậy sử dụng biến ntn?

1 Quan sát yêu cầu tập

- kim tra s N có chia hết cho khơng kiểu tra số có chia hết cho khơng - Sử dụng hàm

- KiĨu Boolean - Hai lÇn

- Dïng tham biÕn

2 ViÕt chơng trình máy, thực chơng trình báo cáo kết

IV ỏnh giỏ cui bi (5) 1, Những kiến thức học

- Một số thuật toán đơn giản, áp dụng đợc thủ tục hàm liên quan đến vào giải tốn

(124)

TiÕt 50

Th viƯn chơng trình chuẩn

Ngày soạn: Ngày giảng: I Mơc tiªu KiÕn thøc:

- BiÕt mét sè th viện chơng trình chuẩn Kỹ

- Bớc đầu sử dụng đợc số th viện chơng trình chuẩn - Khởi động đợc chế độ đồ hoạ

- Sử dụng đợc thủ tục vẽ điểm, đờng thẳng, đờng trịn hình elíp, hình chữ nhật Thái độ

- Tích cực, chủ động sáng tạo thực hành II dựng dy hc

1 Hoạt động 1: Tìm hiểu th viện CRT a Mục tiêu:

- Học sinh biết đợc số th viện chuẩn th viện b Nội dung:

- Th viện CRT chứa thủ tục liên quan đến việc quản lý khai thác hình bàn phím

- Thủ tục: clrscr dùng để xố nàm hình

- Thủ tục Textcolor(c): Đặt màu chữ hình c biến có giá trị nguyên không âm để xác định màu

- Thủ tục textbackground(c): Đặt màu cho hình

- Thủ tục gotõy(x,y): Đa trỏ đến vị trí cột x dịng y hình c Các b ớc tiến hành

15’ T×m hiĨu thđ tục Clrscr;

- Yêu cầu học sinh nghiên cứu sgk, kể tên chơng trình th viện CR

- Chiếu chơng trình sau: Begin

Clrscr; Readln; End

- Biên dịch chơng trình

- Tại xuất lỗi? Khắc phục ntn?

- Chức thủ tục Clrscr;? - Giới thiệu số chơng trình th viện CRT đa chơng trình

- Nghiên cứu sgk suy nghĩ trả lời

- Quan sát chơng trình

(125)

2 Hoạt động 2: Tìm hiểu th viện GRAPH a Mục tiêu:

- Học sinh biết chơng trình th viện Gragh, khởi động thoát đợc chế độ đồ hoạ

b Néi dung:

- Th viện Gragp chứa chơng trình phục vụ khai thác khả đồ hoạ máy tính mức độ thơng dụng nh vẽ điểm, đờng thẳng, hình trịng, tơ màu

- Các thiết bị chơng trình hỗ trợ chế độ đồ hoạ: + Có hai chế độ hình: Văn đồ họa

+ Pascal cung cấp chơng trình hỗ trợ chế độ đồ hoạ (có phần mở rộng BGI) tơng ứng với loại card đồ hoạ Khi khởi động chế độ đồ hoạ phải đờng dẫn đến chơng trình

+ Toạ độ hình đồ hoạ đợc đánh số từ Cột đợc đánh từ trái sang phải, dòng đợc đánh từ xuống dới Giá trị lớn toạ độ dòng cột đợc gọi độ phân giải hình

+ Để thực đợc chức đồ hoạ cần sử dụng thủ tục hàm th viện Gragp - Khởi động chế độ đồ hoạ: Initgragh(dr,md:Integer; pth:string);

Trong đó:

+ dr: Là số hiệu trình điều khiển BGI; + md: Là số hiệu độ phân giải

+ pth: Là đờng dẫn đến tệp BGI

- Kết thúc chế độ đồ hoạ trở chế độ văn bản: CloseGragh;

- Các thủ tục hàm vẽ điểm, đờng thẳng, hình trịn, hình vng, elíp - Các thủ tục hàm liên quan đến trỏ

TG Hot ng ca GV Hoạt động HS

20’ Yêu cầu học sinh nghiên cứu sgk để trả lời câu hỏi

- Hỏi: Các dạng liệu đ-ợc hiển thị hình?

- Hỏi: Nhiệm vụ Card hình?

- Hi: Khi nói hình có độ phân giải 640x480 nói đến điều gì? Đa cấu trúc chung thủ tục khởi tạo đồ hoạ

- Chiếu cú pháp chung khởi tạo đồ hoạ

- Chiếu ví dụ khởi tạo đồ hoạ

3 Giới thiệu số thủ tục hàm chế độ đồ hoạ

- Chiếu số thủ tục hàm chế độ đồ hoạ

- ChiÕu vÝ dô

4 Giới thiệu thủ tục trở chế độ văn

1 Nghiên cứu sgk để trả lời câu hỏi - Văn hình ảnh

- Làm cầu nối CPU hình thể hiƯn th«ng tin

- Là nói đến hình có 640 dịng 480 cột Quan sát cấu trúc thủ tục khởi tạo đồ họa

- Theo dâi vÝ dô

3 Quan sát thủ tục hàm chế độ đồ họa

4 Quan sát thủ tục đóng chế độ đồ họa

3 Hoạt động 3: Tìm hiểu số th viện khác sử dụng th viện

(126)

- Th viện System chứa hàm sơ cấp thủ tục/hàm mà chơng trình dùng tới - Th viện Dos chứa thủ tục cho phép thực trực tiếp lệnh tạo th mục, thiết lập ngày hệ thống

- Th viÖn Printer cung cấp th viện làm việc với máy in c Các bớc tiến hành

TG Hot ng ca GV Hoạt động HS

5’ Yêu cầu học sinh nghiên cứu sgk để trả lời câu hỏi

2 Yêu cầu học sinh nêu chức th viện

1 Các th viện: System, Dos, Printer Chức th viện

(127)

TiÕt 51

ôn tập học kì 2 Ngày soạn:

Ngày giảng: I Mục tiêu

1 Kiến thức

- Tổng hợp kiến thức kì 2: + Kiểu liệu có cấu trúc + Tệp thao tác với tệp + Chơng trình Kĩ năng:

- Vận dụng kiến thức vào giải toán đơn giản - Viết đợc chơng trình hồn chỉnh

II Chuẩn bị GV HS Giáo viên:

- Sgk, Sgv, Sbt, tập, giáo án, máy chiếu, máy tính Học sinh

- Học cũ, Sgk III Néi dung

15’

25’

1 KiÕn thức

- Yêu cầu HS nhắc lại kiến thức (Cách khai báo, chức năng,):

+ Kiểu liệu có cấu trúc + Tệp thao tác với tệp + Chơng trình áp dụng vào tập

- Yêu cầu HS nghiên cứu tập tổng hợp sbt

- HS nhớ lại - HS trả lêi

(128)

TiÕt 53

Bµi tËp thực hành 8 Ngày soạn:

Ngày giảng: I Mơc tiªu KiÕn thøc:

- Học sinh biết đợc khả đồ họa Pascal Kỹ

- Sử dụng đợc thủ tục đồ họa để viết đợc chơng trình trình đơn giản Thái độ

1 Hoạt động 1: tìm hiểu số chơng trình Pascal a Mục tiêu:

- Chơng trình vẽ đờng gấp khúc ngẫu nhiên nhờ thủ tục Lineto, đoạn có màu ngẫu nhiên Vị trí bắt đầu vẽ tâm hình Kết thúc việc vẽ cách ngẫu nhiên phím

b Néi dung:

- phÇn c sgk tr.106 c Các b ớc tiến hành

20 Giới thiệu chơng trình câu a - Chiếu nội dung chơng trình lên - Hỏi: Hàm Detectinit có chức gì?

- Thủ tục Moveto(getmaxx div 2, getmaxy div 2) thực công việc gì?

- Chơng trình thực cơng việc gì? - Thực chơng trình để học sinh thấy kết chng trỡnh ny

2 Giới thiệu chơng trình câu b

- Yêu cầu học sinh nghiên cứu sgk cho biết chơng trình thực chức gì?

- thực chơng trình để học sinh thấy đợc kết

- Yêu cầu học sinh thay đổi tham số màu vẽ, tọa độ thực lại chơng trình

- Nhận xét v ỏnh giỏ,

1 Quan sát nội dung chơng trình - cho giá trị có lỗi khởi tạo - Chuyển trỏ vị trí tâm hình

- V ng gp khỳc ngu nhiờn

2, Quan sát nội dung chơng trình - Vẽ hình chữ nhật với nét vẽ màu vàng

- Vẽ đờng màu xanh

- Thay đổi tham số thực lại chơng trình , báo cáo kết

2 Hoạt động 2: Rèn luyện kỹ xử lý đồ họa a Mục tiêu:

(129)

TG Hot động GV Hoạt động HS

20’ Giới thiệu nội dung đề lên bảng

- ChiÕu néi dung bµi tËp - Híng dÉn häc sinh lËp tr×nh:

Từ điểm trái, dùng thủ tục linere(0,100)để vẽ đoạn thẳng đến đỉnh góc dới Tơng tự nh thực để vẽ hình vng

2 Yêu cầu viết chơng trình máy Thực chơng trình báo cáo kết Giáo viên nhận xét đánh giá

1 Quan s¸t néi dung bµi tËp vµ nghe híng dÉn

2 Thùc viết chơng trình máy báo cáo kết qu¶

- Một số thuật toán đơn giản, áp dụng đợc thủ tục hàm liên quan đến vào giải toán

Định dạng
Số trang	129
Dung lượng	1,81 MB