Giao an tin 8 ca nam

Kiến thức : Hiểu cấu trúc rẽ nhánh gồm 2 dạng : thiếu và đủ; biết mọi ngôn ngữ lập trình đều có câu lệnh để thể hiện cấu trúc rẽ nhánh; hiểu cú pháp hoạt động của các câu lệnh điều kiện[r]

(1)

Ngày soạn: 20/8/2008 Ngày giảng: 25/08/2008

Tiết 1

Bài Máy tính

và chơng trình máy tính

I Mục tiêu:

* Kiến thức: HS hiểu đợc số khái niệm thuật ngữ đơn giản chơng trình

máy tính

* Kĩ năng: HS biết dùng lệnh sống hàng ngày để thực vài

ví dụ

HS Biết áp dụng lện quen thuộc vào to¸n thĨ.

* Thái độ: HS nghiêm túc học tập nghiên cứu học.

II Chuẩn bị:

*GV: SGK, M¸y chiÕu

* HS: ChuÈn bị trớc nhà.

III Ph

ng phỏp

: vấn đáp, thuyết trình, trực quan

IV Tiến trình giảng

A ổn định lớp

B KiÓm tra cũ: : Không kiểm tra

HĐ thầy HĐ trò Ghi bảng

HĐ Tìm hiểu việc

con ngời lệnh cho MT

nh nào.

- GV: Để máy tính có thể

thực công việc

theo mong muốn mình,

con ngời phải đa những

chỉ dẫn thích hợp cho máy

tính.

VD: Nhỏy đúp chuột lên

biểu tợng  lệnh cho

MT khởi động phần mềm.

? Khi thực chép 1

đoạn Vb, ta lệnh

cho MT thực hiện

HĐ2 Tìm hiểu hoạt động

của RoBot quột nh.

( GV chiếu màn

chiếu)

Giả sử có đống rác và

một rơ-bốt vị trí nh

hình dới Từ vị trí

hiện thời rơ-bốt, ta cần

ra lệnh để dẫn

rô-bốt nhặt rác bỏ rác vào

thùng rác để nơi quy

định

- Nghe vµ ghi

chÐp

- HS lÊy VD

- HS : lÖnh:

HS quan sát trên

mà chiếu.

1.Con ngời lệnh cho máy

tính nh nào?

-

ch dẫn máy tính thực hiện

một cơng việc đó, ngời

đa cho máy tính hoặc

nhiều lệnh, máy tính lần lợt

thực lệnh theo

đúng thứ tự nhận đợc

VD1 : Gõ chữ A lên

hình Ra lệnh cho MT ghi

chữ lên hình.

VD Sao chép đoạn vb là

yêu cầu MT thực lệnh:

sao chép ghi vào nhớ sao

chép từ nhớ vị trí mới.

2 Ví dụ: rô-bốt quét nhà

(2)

? Nhìn vào hình, em hãy

mơ tả bớc để Robot có

thể thực nhặt rác bỏ

vào thùng

Giả sử lệnh đợc viết lu tệp với tên "Hãy nhặt rác " Khi ta cần lệnh "Hãy nhặt rác", lệnh tệp điều khiển rô-bốt tự động thực lần lợt lnh núi trờn

- Quan sát trên

màn chiếu trả

lời.

D Cđng cè

- Ghi nhí 1.

- lµm bµi tËp SGK

E Hướng dẫn nhà:.

- Häc bµi theo SGK

- Häc ghi nhí làm lại BT 1; BT1 SGK

Ngy soạn: 25/08/2008 TiÕt 2

Ngày giảng: 28/08/2008

Bµi Máy tính

và chơng trình máy tính(tiếp theo)

I Mơc tiªu:

* Kiến thức: HS hiểu đợc số khái niệm thuật ngữ đơn giản v chng trỡnh mỏy

tớnh

* Kĩ năng:

- HS biết dùng lệnh sống hàng ngày để thực vài ví dụ

- HS Biết áp dụng lệnh quen thuộc vào tốn cụ thể.

- Biết viết chơng trình đơn giản lệnh cho MT làm việc.

* Thái độ

HS nghiêm túc học tập nghiên cứu học.

* GV: SGK, M¸y chiÕu

* HS: Chuẩn bị trớc nhà.

(3)

IV Tiến trình giảng

A ổn nh lp

B Kiểm tra cũ:: Không kiểm tra

HĐ thầy HĐ trò Ghi bảng

HĐ Cách Viết

ch-ơng trình lệnh cho

MT làm việc

- Việc viết lệnh để

điều khiển rô-bốt về

thực chất có

nghĩa viết chơng

trình.

- Khi thực chơng

trình, máy tính thực

hiện lệnh có trong

chơng trình cách

tuần tự

HĐ2 Tìm hiểu lý

phải viết chơng trình

? Để thực đợc

cơng việc, máy tính

phải hiểu lệnh đợc

viết chơng trình.

Vậy làm để

máy tính hiểu đợc các

lệnh ngời? Ta

có thể lệnh cho máy

tính cách nói

hoặc gõ phím bất

kì đợc khơng?

các ngơn ngữ lập trình

đã đời để giảm nhẹ

khó khăn việc

viết chng trỡnh

GV: Mô tả máy

chiếu việc lệnh cho

máy tính làm việc

Nghe ghi chép.

- Quan sát màn

chiếu.

- Suy nghĩ trả lời

- Nghe ghi ché

3 Viết chơng trình: lệnh cho máy

tính làm việc

Trở lại ví dụ rô-bốt nhặt rác,

ch-ơng trình có lệnh nh sau

4 Tại cần viết chơng trình?

- Máy tính nói Hiểu bằng

một ngôn ngữ riêng ngôn ngữ máy

tính

- Viết chơng trình sử dụng từ

cã nghÜa (thêng lµ tiÕng Anh)

- Các chơng trình dịch đóng vai trị

"ngời phiên dịch" dịch

ch-ơng trình đợc viết ngơn ngữ lập

trình sang ngơn ngữ máy để máy

tính hiểu đợc

 Nh vậy, thông tin đa vào máy

phải đợc chuyển đổi thành dạng dãy

bit

dãy tín hiệu đợc kí hiệu bằng

0 1

D Cđng cè

- Ghi nhí 1.

- Ghi nhí 2

(4)

- Häc bµi theo SGK

- Häc ghi nhí 1, vµ làm lại BT 2,3 SGK

Ngy son: 25/08/2008 Tiết 3

Ngày giảng: 29/08/2008

Bài Từ tốn đến chơng trình

( TiÕt 1)

I Mơc tiªu:

*KiÕn thøc:

- Biết người dẫn cho máy tính thực cơng việc thơng qua lệnh.

- Biết chương trình cách để người dẫn cho máy tính thực nhiều

cơng việc liên tiếp cách tự động.

- Biết viết chương trình viết lệnh để dẫn máy tính thực các

cơng việc hay giải tốn cụ thể.

- Biết ngơn ngữ dùng để viết chương trình máy tính gọi ngơn ngữ lập trình

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

GV: SGK, Máy chiếu

HS: Chuẩn bị trớc bµi ë nhµ.

III Ph

ơng pháp

: vấn đáp, thuyết trình, luyện tập.

IV Tiến trình giảng

A ổn định lớp

B Bài cũ: Nêu vài ví dụ mà em hiểu “lệnh” đa để máy tính hiểu thực

hiƯn?

C Bài

HĐ thầy

HĐ HS

Ghi bảng

(5)

toán?

- Để máy tính giúp

giải toán

nói chung, cũng

phải viết chơng trình, tức

chỉ dẫn cho máy tính

thực phần công

việc cụ thể thông qua các

lệnh cho kết qu¶ mong

mn.

Các tốn phong

phú đa dạng Ví dụ:

Tính diện tích hình tam

giác, tìm đờng tránh

các điểm nút nghẽn giao

thơng cao điểm,

nấu ăn từ những

thực phẩm có,

Vậy, Đối với tốn nấu

một ăn:

?§iỊu kiƯn cho tríc?

?Kết cần thu đợc?:

Muốn giải đợc việc

xác định tốn rất

quan trọng.

? Một bào toán máy

tính đợc giải nh thế

nào?

Máy tính khơng thể tự tìm lời giải toán Lời giải toán cụ thể phải t sáng tạo ngời kết t thuật tốn Một có thuật tốn, dựa vào thuật tốn chạy chơng trình cho ta lời giải tốn

- Nghe vµ ghi chÐp.

-Thùc phÈm hiƯn

cã (trøng, mì,

m¾m,

muối,

rau, );

- Một ăn.

- Suy nghÜ, cã thĨ

tr¶ lêi:

- Giải tốn trên

máy tính có nghĩa

là giao cho máy

tính cách thực hiện

các hoạt động cụ

thể qua bớc để

từ điều kiện cho

tr-ớc ta nhận đợc kết

quả cần thiết.

- Ghi chép.

một nhiệm vụ cần phải giải

quyết.

Chẳng hạn, với tốn ghi

màn hình tổng hai số a b

đợc gõ vào từ bàn phím, chơng

trình gồm lệnh nh

hình sau đây:

2 Bài toán cách xác định

bài toán

Để phát biểu toán cụ thể,

ngời ta cần xác định rõ điều

kiện cho trớc kết cần thu

đợc.

VÝ dơ

§Ĩ tính diện tích hình tam giác:

Điều kiện cho tríc: Mét

cạnh chiều cao tơng

ứng với cạnh đó;

 Kết cần thu đợc:

Diện tích hình tam giác.

3 Q trình giải toỏn trờn

mỏy tớnh

- Máy tính giải to¸n qua c¸c

bíc sau:

+ Xác định toỏn

+ Thiết lập phơng án giải (

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

+ Vit chng trỡnh ( lập trình )

Chú ý

:

D Cđng cè:

1 Cho toán (xác định toán) việc xác định điều kiện ban đầu (thông tin vào -INPUT) kết cần thu đợc (thông tin OUTPUT)

2 Giải toán máy tính có nghĩa giao cho máy tính cách thức (thuật toán) tìm lời giải cụ thể toán

(6)

E Hớng dẫn nhµ:

- Häc bµi theo SGK - Häc thuéc ghi nhớ - Làm tập

Ngày soạn 29/08/2008 Tiết 4

Ngày dạy 08/09/2008

Bi Từ tốn đến chơng trình

( tiếp )

I Mơc tiªu:

*KIÕN THØC: - BiÕt ngêi dẫn cho máy tính thực công việc thông qua

lƯnh.

- Biết chơng trình cách để ngời dẫn cho máy tính thực nhiều công việc

liên tiếp cách tự động.

- Biết viết chơng trình viết lệnh để dẫn máy tính thực cơng

việc hay giải tốn cụ thể.

- Biết ngơn ngữ dùng để viết chơng trình máy tính gọi ngơn ngữ lập trình

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

*Thái độ: HS nghiêm tóc học tập nghiên cứu học.

III Ph

ng phỏp

IV Tiến trình giảng:

B bµi cũ:: Trình bày ghi nhớ 1,2,3 sgk.

C Bài mới

HĐ thầy

HĐ HS

Ghi bảng

– Đa ví dụ: Việc pha trà mời khách đợc nêu thành bớc nh sau:

Bớc 1: Tráng ấm chén nớc sôi

Bớc 2: Cho trà vào ấm Bớc 3: Rót nớc sôi vào ấm đợi khoảng 3-4 phút Bớc 4: Rót trà chén để mời khách

Cách liệt kê bớc nh là phơng pháp thờng dùng để mơ tả thuật tốn.

? VËy Thuật toán gì?

- Nghe ghi

chép.

- Trả lời

4 Thuật toán mô tả thuật toán

VD: Bài toán giải phơng trình bậc

nhất dạng tổng quát bx + c = 0:

 Bíc NÕu b = chun tíi

bíc 3.

 Bíc TÝnh nghiƯm cđa

ph-ơng trình x =

c

b

rồi

chun tíi bíc 4.

 Bớc Nếu c  0, thơng

báo phơng trình cho vơ

nghiệm Ngợc lại (c = 0),

thông báo phơng trình có vơ

số nghiệm

 Bíc KÕt thóc tht to¸n.

Thuật tốn dãy thao tác cần thực theo trình tự xác định để thu đ-ợc kết cần tìm từ điều kiện cho trớc

(7)

- §a ví dụ 1trên màn

chiếu.

- Đa ví dụ

2,3,4,5,6 Sgk lên màn

chiếu cho HS quan sát

- quan sát ghi

chép.

- quan sát ghi

chép.

Thut toỏn n giản để tính diện tích hình A gồm bớc sau:

INPUT: a lµ 1/2 chiỊu réng b chiều dài hình chữ nhật, a bán kính của hình bán nguyệt

OUTPUT: Diện tÝch cđa A.

Bíc TÝnh S1 = 2a b {Tính diện tích hình chữ nhật}

Bc Tính S2 = π a2/2 {Tính diện tích hình bán nguyệt} Bớc Tính kết S = S1 + S2

* Trong biểu diễn thuật toán, ngời ta

thờng sử dụng kí hiệu a  A để chỉ

phép gán giá trị số biểu

thức A cho biến a Ví dụ:

x   c/b (biến x nhận giá trị

c/b);

i  i + (biến i đợc gán giá trị

hiện i cộng thêm đơn vị)

Trong trờng hợp ngợc lại (i > 100),

kết thúc thuật tốn.

D Cđng cè:

Thuật toán thuật toán dãy thao tác cần thực theo trình tự xác định để thu đợc kết cần tìm từ điều kiện cho trớc

Bµi tËp:

1.

H·y chØ INPUT vµ OUTPUT toán sau:

a)

Xỏc nh số học sinh lớp mang họ Trần.

b)

Tính tổng phần tử lớn d·y n sè cho tríc.

c)

Tìm số số có giá trị nhỏ n số cho.

E Híng dÉn vỊ nhµ:

: Häc bµi theo Sgk làm tập

Ngày soạn 30/08/2008 Tiết 5

Ngày dạy 09/09/2008

Bài Làm quen với ngôn ngữ lập trình

( Tiết1)

I Mơc tiªu:

* KiÕn thøc:

- Häc sinh: Biết ngơn ngữ lập trình gồm thành phần bảng chữ và

các quy tắc để viết chương trình, câu lệnh.

(8)

- Biết tên ngơn ngữ lập trình người lập trình đặt ra, đặt tên phải

tn thủ quy tắc ngơn ngữ lập trình Tên khơng trùng với từ khố.

Biết cấu trúc chương trình bao gồm phần khai báo phần thân chương trình.

* Kỹ năng: Hs nêu đc lại cấu trúc của chơng trình; Đặt tên đợc cho một

chơng trình cụ thể

GV: SGK, M¸y chiếu

HS: Chuẩn bị trớc nhà.

III Ph

ơng pháp

A ổn định lp

B Bài cũ: Trình bày ghi nhớ 1,2,3, sgk trả lời tập1.

C Bài mới

HĐ Thầy HĐ trò Ghi bảng

? Tại phải lập trình cho máy tính

- GV mô tả hình ảnh chiếu.

? Ngôn ngữ lập trình gồm gì?

- GV đa ví dụ cụ trên chiếu.

- GV: Sử dụng Ví dụ trên để từ

- HS suy nghÜ tr¶ lêi

- HS ghi chÐp

HS Quan s¸t.

- HS suy nghÜ, tr¶ lêi:

- HS ghi chÐp

- quan s¸t vÝ dơ

1 Chơng trình ngôn ngữ lập trình.

- Để tạo chơng trình máy tính,

chúng ta phải viết chơng trình theo một

ngôn ngữ lập tr×nh

- Ngơn ngữ lập trình cơng cụ giúp để

tạo chơng trình máy tớnh

* Việc tạo chơng trình máy tÝnh thùc

chÊt gåm hai bíc sau:

(1) Viết chơng trình theo ngôn ng

ữ

lập

trình;

(2) Dịch chơng trình thành ngơn ngữ

máy để máy tính hiu c.

2 Ngôn ngữ lập trình gồm gì?

- Bng ch cái: thờng gồm chữ tiếng Anh số kí hiệu khác nh dấu phép tốn (+, , *, /, ), dấu đóng mở ngoặc, dấu nháy, Nói chung, kí tự có mặt bàn phím máy tính có mặt bảng chữ mi ngụn ng lp trỡnh

- Các quy tắc: cách viết (cú pháp) ý nghĩa chúng; cách bố trí câu lệnh thành ch-ơng trình,

(9)

kho¸

- GV lấy ví dụ đúng sai cách đặt tên chơng trình.

- HS tự đặt tên chơng trình.

a) Từ khoá: Program, Begin, uses,End. Là từ riêng, dành cho ngôn ngữ lập trình.

b) Sử dụng tên chơng trình.

- Hai i lng khác phải có tên

khác

- Tên khơng đợc trùng với từ

kho¸.

- Tên không đợc bắt đầu chữ số

và khơng đợc có khoảng trắng.

D Cđng cè:

Ngôn ngữ lập trình gồm gì?

? vài từ khoá?

? Nờu cỏch t tên chơng trình

E Hướng dẫn nhµ:: Häc bµi theo Sgk vµ vë ghi Häc ghi nhớ trả lời câu hỏi 1

gsk.

Ngày soạn 10/09/2008 Tiết 6

Ngày dạy 12/09/2008

Bài Làm quen với ngôn ngữ lập trình

( T2)

I Mơc tiªu:

* KiÕn thøc: + Häc sinh: Biết cấu trúc chương trình bao gồm phần khai báo và

phần thân chương trình.

* Kỹ năng: Hs nêu đc lại cấu trúc của chơng trình; Đặt tên đợc cho một

chơng trình cụ thể

III Ph

ng phỏp

B Bài cũ:: - Khi đặt tên cho chơng trình cần ý điều gì? Hãy kể tên vài từ

khoá chơng trình lập trình?

GV sử dụng lại VD trớc để mô tả cấu trúc chung ch-ơng trình cho hs:

+ Phần khai báo gồm hai lệnh khai báo tên chơng trình CT_dau_tien với từ khoá program khai b¸o th viƯn crt víi tõ kho¸ uses

+ Phần thân đơn giản

- HS quan sát

VD màn

chiếu nghe

GV giải thích.

3 Cấu trúc chung chơng trình.

Cấu trúc chơng trình gồm:

-Phần khai báo thờng gồm câu

lnh dựng :

+ Khai báo tên chơng trình;

(10)

ch-gồm từ khoá begin end cho biết điểm bắt đầu và điểm kết thúc phần thân chơng trình Phân thân có câu

lệnh thùc sù lµ

writeln('Chao Cac Ban') để in hình dịng chữ "Chao Cac Ban"

-GV sử dụng chiếu

để lấy ví dụ ngơn ngữ

lập trình cho HS quan

sát.

Khi khởi động phần mềm

Turbo Pascal, cửa sổ soạn

thảo chơng trình nh hình 8

dới Ta sử dụng

bàn phím để soạn thảo

ch-ơng trình tch-ơng tự nh soạn

thảo văn với Word.

Sau soạn thảo xong,

nhấn phím

F9

để kiểm tra

lỗi tả cú pháp của

lệnh (dịch) Nếu hết lỗi

chính tả, hình có dạng

nh hình di õy s xut

hin.

Để chạy chơng trình, ta

nhấn tổ hợp phím

Ctrl+F9

.

Trên cửa sổ kết

ch-ơng trình dòng

chữ "

" nh

hình

- HS ghi chép.

- HS quan sát

trên chiếu

ơng trình) số khai báo khác.

- Phần thân chơng trình gồm các

câu lệnh mà máy tính cần thực hiện.

Đây phần bắt buộc phải có

Phần khai báo có không

Tuy nhiên, có phần khai báo phải

c t trc phn thân chơng trình

4 VÝ dơ vỊ ngôn ngữ lập trình

Pascal.

D Củng cố:

Ghi nhí

1 Ngơn ngữ lập trình tập hợp kí hiệu quy tắc cho viết đợc các

lệnh tạo thành chơng trình hồn chỉnh chạy đợc máy tính.

2 Một chơng trình thờng có hai phần: Phần khai báo phần thân chơng trình

CÂU HỏI Vµ BµI TËP

1 Hãy cho biết bớc cần thực để tạo chơng trình máy tính.

2 Ngơn ngữ lập trình có thành phần nào? Những thành phần có

ý nghĩa, chức gì?

(11)

D

> H

ướ

ng d

ẫ

n v

ề

nhµ:

:

Häc bµi theo SGK vµ vë ghi

- Học thuộc phần ghi nhớ.

Ngày soạn 10/09/2008 Tiết + 8

Ngày dạy 12/09/2008

Bài thùc hµnh 1

Lµm quen víi Turbo pascal

I Mơc tiªu:

* Kiến thức: Hs đựoc làm quen với chơng trình lập trình Turbo Pascal.

*Kỹ năng:

 Thực đợc thao tác khởi động/kết thúc TP, làm quen với hình soạn thảo TP

 Thực đợc thao tác mở bảng chọn chọn lệnh.

 Soạn thảo đợc chơng trình Pascal đơn giản.

 Biết cách dịch, sửa lỗi chơng trình, chạy chơng trình xem kết

 Biết cần thiết phải tuân thủ quy định ngơn ngữ lập trình

* Thái độ: HS nghiêm tóc học tập thùc hành.

* HS: Chuẩn bị trớc nhà.

III Ph

ơng pháp

: thuyết trình, luyện tập.

A n nh lp

B Bài cũ:

1 Ngơn ngữ lập trình có thành phần nào? Những thành phần có ý

ngha, chc nng gỡ?

2.Cấu trúc chơng trình gồm phần nào? Phần quan trọng nhất?

C Bài mới

GV cho HS lm quen vi việc

khởi động thoát khỏi Turbo

Pascal Nhận biết thành phần

trên hình Turbo Pascal.

Quan sát hình Turbo

Pascal so sánh với hình 11 dới

đây:

-

HS nghe và

quan sát các

thao tác của

GV.

Bài Lµm quen víi viƯc khëi

động khỏi Turbo

Pascal Nhận biết thành

phần hình Turbo

Pascal.

a)Khởi động Turbo Pascal bằng

một hai cách:

Cách 1: Nháy đúp chuột trờn

biểu tợng

hình

nền (hoặc bảng chọn

Start

);

Cỏch 2: Nhỏy đúp chuột trên

(12)

+ GV cho HS nhận biết thành

phần: Thanh bảng chọn; tên tệp

đang mở; trỏ; dòng trợ giúp

phía dới hình

Quan sát lệnh từng

b¶ng chän.

Mở bảng chọn cách

khác: Nhấn tổ hợp phím

Alt

và

phím tắt bảng chọn (chữ màu

đỏ tên bảng chọn, ví dụ phím

tắt bảng chọn

File

F

, bảng

chọn

Run

R

, ).

Sử dụng phím mũi tên lên và

xuống ( ) để di chuyển giữa

các lệnh bảng chọn.

Nhấn tổ hợp phím

Alt+X

để thốt

khỏi Turbo Pascal.

- u cầu HS khởi động chơng

trình Turbo Pascal thực gõ

các dịng lệnh theo mẫu.

GV

:

Chó ý cho HS :

- Gõ khơng để sót các

dấu nháy đơn ('), dấu chấm

phẩy (;)và dấu chấm (.) trong

các dòng lệnh.

- Soạn thảo chơng trình cũng

tơng tự nh soạn thảo văn bản:

sử dụng phím mũi tên để

di chuyển trỏ, nhấn phím

Enter để xuống dịng mới,

nhấn phím Delete hoặc

BackSpace để xố.

a)

NhÊn phÝm

F2

(hc lƯnh

FileSave

) để lu chơng trình Khi

hộp thoại ra, gõ tên tệp (ví

dụ

)

Save file as

- HS gõ lện

lên máy tính cá

nhân.

- Nhấn phím

F10

để mở bảng

chọn, sử dụng phím mũi

tên ( ) để di chuyển qua

lại bảng chọn

- Nhấn phím

Enter

để mở một

bảng chọn

Bài 2.

Soạn thảo, lu, dịch và

chạy chơng trình đơn

giản.

a) Khởi động lại Turbo Pascal

và gõ dòng lệnh dới đây:

program CTDT; begin

writeln('Chao cac

ban');

write('Minh la Turbo Pascal');

(13)

(phần mở rộng ngầm định

.pas

)

và nhấn

Enter

(hoặc nháy

OK

).

b)

Nhấn tổ hợp phím

Alt+F9

để

biên dịch chơng trình Khi đó,

ch-ơng trình đợc biên dịch kết quả

hiện có dạng nh hình 14 sau

đây:

Nhấn phím để đóng hộp

thoại.

c)

NhÊn tỉ hỵp phÝm

Ctrl+F9

để chạy chơng trình quan sát

kết quả.

Nhấn

Enter

để quay hình

soạn thảo.

Nh vậy, viết đợc một

chơng trình hồn chỉnh chạy

đ-ợc.

a)

GV híng dÉn HS chØnh sửa

chơng trình.

b) Xoá dòng lệnh begin Biên dịch chơng trình quan sát thông báo lỗi nh hình dới đây:

Hình 16

c) Nhấn phím gõ lại lệnh begin Xoá dấu chấm sau chữ end Biên dịch chơng trình và quan sát thông báo lỗi

Hình 17

Nhn Alt+X để khỏi Turbo Pascal, nhng khơng lu chỉnh sửa

b)NhÊn phÝm

F2

(hc lƯnh

FileSave

) để lu chơng trình

c) Nhấn tổ hợp phím

Alt+F9

để

biên dịch chơng trình

Nhấn phím để đóng hộp

thoại.

d)

NhÊn tỉ hỵp phÝm

Ctrl+F9

để chạy chơng trình quan sát

kết quả.

(14)

lu vµ kÕt thóc.

D Cđng cè:

TỉNG KÕT

1 Các bớc thực hiện:

 Khởi động Turbo Pascal;  Soạn thảo chơng trình;

 Biên dịch chơng trình: Alt + F9; Chạy chơng tr×nh (Ctrl + F9) ;

2 Pascal khơng phân biệt chữ hoa, chữ thờng: begin, BeGin, hay BEGIN 3 Các từ khoá Pascal: program, begin, end.

4 Lệnh kết thúc chơng trình end (có dấu chấm), câu lệnh sau lệnh bị bỏ qua trong trình dịch chơng trình

5 Mỗi câu lệnh đợc kết thúc dấu chấm phẩy (;)

6 Lệnh writeln in hình đa trỏ xuống đầu dòng

Thơng tin cần in văn bản, số, đợc phân tách dấu phẩy Lệnh write tơng tự nh writeln, nhng khơng đa trỏ xuống đầu dịng

- Yêu cầu hs đọc đọc thêm

E Hướng dẫn nhµ:

(15)

Ngày soạn : 25/9/2008 Tiết : Tuần Ngày dạy : 27/8/2008

BàI :

CHƯƠNG TRÌNH MÁY TÍNH VÀ DỮ LIỆU

I Mục tiêu :

 Biết khỏi niệm kiểu liệu;

 Biết số phộp toỏn với liệu số;

II Chuẩn bị :

1 Giáo viên :

- Tài liệu, GA điện tử

- Đồ dùng dạy học máy tính kết nối projector, 2 Học sinh : - Kiến thức học.

- Đọc trước - Bảng phụ

III Tiến trình tiết dạy : 1 ổn định tổ chức lớp :

- Kiển tra sĩ số : - ổn định trật tự :

2 Kiểm tra cũ : 3 Dạy :

Hoạt động : Học sinh tìm hiểu liệu kiểu liệu.

Hoạt động GV Hoạt động HS Ghi bảng G : Nêu tình để gợi ý

về liệu kiểu liệu G : Đưa lên hình ví dụ SGK

G : Ta thực phép toán với liệu kiểu ?

G : Cịn với kiểu chữ phép tốn khơng có nghĩa

G : Theo em có kiểu liệu ? Lấy ví dụ cụ thể kiểu liệu G : Chốt hình kiểu liệu giải thích thêm

G : Trong ngơn ngữ lập trình có kiểu liệu hay cịn nhiều

H : Quan sát để phân biệt hai loại liệu quen thuộc chữ số H : Nghiên cứu SGK trả lời với kiểu số

H : Nghiên cứu SGK trả lời bảng phụ

H : Nghiên cứu SGK trả lời H : Đọc lại

H : Viết tên ý

1 Dữ liệu kiểu liệu.

Ví dụ 1: Minh hoạ kết quả thực chương trình in hình với kiểu dữ liệu quen thuộc chữ và số.

- Các ngôn ngữ lập trình định nghĩa sẵn số kiểu liệu

Dưới số kiểu liệu thường dùng nhất:

(16)

nữa ?

G : Đưa lên hình ví dụ SGK để giới thiệu tên số kiểu liệu NNLT pascal

G : Đọc tên kiểu liệu Integer, real, char, string G : Đưa ví dụ : 123 ‘123’ G : Đưa ý kiểu liệu char string

nghĩa kiểu liệu TP

H : Đọc tên hai kiểu liệu

sinh lớp, số sách trong thư viện,

 Số thực, ví dụ chiều cao của bạn Bình, điểm trung bình mơn Tốn,

 Xâu kí tự (hay xâu) dãy các "chữ cái" lấy từ bảng chữ ngôn ngữ lập trình, ví dụ: "Chao cac ban", "Lop 8E", "2/9/1945"

- Ngơn ngữ lập trình cụ thể cịn định nghĩa nhiều kiểu liệu khác Số kiểu liệu tên kiểu liệu ngôn ngữ lập trình khác Ví dụ Bảng SGK

Chú ý: Dữ liệu kiểu kớ tự kiểu xâu Pascal đặt trong cặp dấu nhỏy đơn.

Hoạt động : HS tìm hiểu, làm quen với phép toán kiểu liệu số.

Hoạt động GV Hoạt động HS Ghi bảng G : Viết lên bảng phụ

phép toán số học dùng cho liệu kiểu số thực số nguyên ?

G : Đưa lên hình bảng kí hiệu phép tốn dùng cho kiểu số thực số nguyên

G : Đưa số ví dụ sgk giải thích thêm

G : Đưa phép tốn viết dạng ngơn ngữ toán học :

8  xy 

x

yêu cầu H

H : Viết giơ bảng phụ có hiệu lệnh G

H : Quan sát để hiểu cách viết ý nghĩa phép toán ghi

H : Quan sát, lắng nghe ghi H : Viết giơ bảng phụ có hiệu lệnh G

G : Yêu cầu H viết lại phép toán

2

x y

(x 2) a b



 

 

2 Các phép toán với liệu kiểu số.

- Bảng kí hiệu phép tốn số học ngơn ngữ Pascal:

Dưới ví dụ phép chia, phép chia lấy phần nguyên phép chia lấy phần dư:

(17)

viết biểu thức ngôn ngữ TP

G : Nhận xét đưa bảng ví dụ SGK

G : Nhận xét chốt hình

G : Viết lại biểu thức ngôn ngữ lập trình Pascal





3

  

 ?

G : Nhận xét đưa ý

bằng ngôn ngữ TP H : Làm bảng phụ

H : Nêu quy tắc tính biểu thức số học

H : Viết bảng phụ

tính số học nói ngơn ngữ lập trình Pascal ví dụ :

Ngơn ngữ tốn Ngơn ngữ TP a ( b ( c + d a*b-c+d

a 15

2

  15+5*(a/2)

x y

(x 2) a b



 

 

(x+5)/(a+3)-y/ (b+5)*(x+2)*(x+2) Quy tắc tính biểu thức số

học:

 Các phép toán ngoặc thực trước tiên;  Trong dãy phép tốn

khơng có dấu ngoặc, phép nhân, phép chia, phép chia lấy phần nguyên phép chia lấy phần dư thực trước;

 Phép cộng phép trừ thực theo thứ tự từ trái sang phải

4.Củng cố kiến thức.

H : Nhắc lại kiến thức cần đạt G : Chốt lại kiến thức trọng tâm

5.Hướng dẫn nhà.

(18)

Ngày soạn :27/09/2008 Tiết 10 – Tuần Ngày dạy : 29/09/2008

BàI :

CHƯƠNG TRÌNH MÁY TÍNH VÀ DỮ LIỆU

I Mục tiêu :

 Biết phép tốn so sánh ngơn ngữ lập trình

 Biết khỏi niệm điều khiển tương tỏc người với mỏy tớnh

1 Giáo viên :

- Đồ dùng dạy học máy tính kết nối projector, 2 Học sinh : - Kiến thức học.

III Tiến trình tiết dạy : 1 ổn định tổ chức lớp :

2 Kiểm tra cũ :

(?) Nêu số kiểu liệu mà em học? Lấy ví dụ minh hoạ?

(?) Nêu số phép tốn số học có ngơn ngữ Pascal? Lấy ví dụ? (?) Hãy nêu hai kiểu liệu phép tốn thực kiểu liệu, phép tốn khơng có nghĩa kiểu liệu

(?) Dãy chữ số 2010 thuộc kiểu liệu nào? HS : Trả lời

GV : Nhận xét cho điểm

3 Dạy :

Hoạt động : HS biết ý nghĩa cách viết phép toán so sánh TP Hoạt động GV Hoạt động HS Ghi bảng

G : Đưa lên hình bảng kí hiệu phép toán so sánh toán học

G : Các phép toán so sánh dùng để làm ?

G : Đưa ví dụ : a) ( =

H : Nghiên cứu SGK trả lời

- để so sánh số, biểu thức với

H : Viết bảng phụ kết so sánh a, b, c

H : Trả lời theo ý hiểu

3 Các phép so sánh

Bảng kí hiệu phép so sánh viết ngơn ngữ Pascal:

Kí hiệu trong Pascal

Phép so

sánh tốn họcKí hiệu

(19)

b) 15 + > 20 (

c) + x ≤ 10 G : Theo em phép so sánh viết ngơn ngữ TP có giống tốn học khơng ? G : Đưa lên hình bảng

<> Khác ≠

< Nhỏ <

<= Nhỏ

≤

> Lớn >

>= Lớn

hoặc ≥

Hoạt động : HS làm quen với số dạng hình giao tiếp với máy tính. Hoạt động GV Hoạt động HS Ghi bảng

G : Nhận xét giải thích

G : Nêu hai tình tạm ngừng hình kết thơng qua lệnh hộp thoại

G : Giải thích tình

G : Đưa lên hình hộp thoại nhập liệu

G : Em phải làm xuất hộp thoại ?

G : Đưa ví dụ bảng thơng báo kết

G : Đưa ví dụ hộp thoại

: Quan sát, lắng nghe G giải thích H : Trả lời theo ý hiểu

H : Lắng nghe để hiểu

H : Quan sát lắng nghe G giải thích

4.Giao tiếp người - máy tính

a) Thơng báo kết tính tốn

- Lệnh :

write('Dien tich hinh tron la ',X);

- Thông báo :

b) Nhập liệu

- Lệnh :

write('Ban hay nhap nam sinh:');

read(NS); - Thông báo :

c) Chương trình tạm ngừng

- Lệnh :

Writeln('Cac ban cho giay nhe ');

Delay(2000); Thông báo : - Lệnh :

writeln('So Pi = ',Pi); read; {readln;}

(20)

d) Hộp thoại

4.Củng cố kiến thức.

H : Nhắc lại kiến thức cần đạt G : Chốt lại kiến thức trọng tâm H : Đọc phần ghi nhớ sgk

5.Hướng dẫn nhà.

1 Làm tập 5,

2 Học thuộc phần ghi nhớ

(21)

Ngày soạn : 25/9/2008 Tiết 11+12 : Tuần Ngày dạy :27/9/2008

THỰC HÀNH

I Mục tiêu:

 Giúp học sinh kĩ đọc hiểu đề

 Giúp Hs sửa chữa tập cho trước II Chuẩn bị:

 Gv: giáo án

 Hs: sách giáo khoa, tập III Tiến trình giảng dạy:

1 Kiểm tra cũ:

* Thế chương trình máy tính, nêu ví dụ? * Dữ liệu gì, kể tên loại liệu?

2 Bài mới:

Hoạt động 1: sửa tập

HĐ thầy trò Nội dung ghi bảng

- Gv hỏi Hs có tập khơng thể giải

- Hs nêu câu hỏi

- Gv giải đáp câu hỏi Hs tập mà Hs làm

- Hs ý lắng nghe

- Gv gọi Hs đọc đề tập

- Hs đọc đề

- Gv gọi đại diện tổ lên bảng làm

- Hs làm

- Gv gọi hs nhận xét - Hs: nhận xét

- Gv nhận xét

- Hs: lằng nghe, ghi nhớ

Nếu thay đổi thứ tự hai lệnh chương trình điều khiển rơ-bốt, rơ-bốt khơng thực cơng việc nhặt rác rơ-bốt khơng hướng khơng tới vị trí có rác, thực việc nhặt rác vị trí khơng có rác, Ví dụ, thay đổi thứ tự lệnh “Tiến bước” lệnh “Quay trái, tiến bước”, tác dụng hai lệnh “Quay trái tiến bước” Khi rơ-bốt nhặt rác vị trí khơng có rác Nói chung, lệnh điều khiển rơ-bốt hay chương trình cần đưa theo thứ tự xác định cho ta đạt kết mong muốn Trong số trường hợp, ta đưa lệnh khác nhau, đạt kết Chẳng hạn, ví dụ rơ-bốt, thay cho hai câu lệnh đầu tiên, ta điều khiển rơ-bốt đến vị trí có rác lệnh sau: “Quay trái, tiến bước” “Quay phải, tiến bước” “Quay phải, tiến bước”, “Quay trái, tiến bước” “Quay trái, tiến bước” Trong số trường hợp khác, việc thay đổi thứ tự vài câu lệnh cho kết yêu cầu

(22)

- Hs đọc đề

- Hs làm

- Gv gọi hs nhận xét - Hs nhận xét

- Gv nhận xét - Hs lắng nghe

- Hs đọc đề

- Hs làm

- Gv gọi hs nhận xét - HS nhận xét

- Hs đọc đề

- Hs làm

- Gv nhận xét - Hs lằng nghe

- Hs đọc đề

- Hs làm

- Gv gọi hs nhận xét - HS nhận xét

- Gv gọi hs nhận xét - Gv nhn xột

Vị trí ca rô-bốt sau thùc hiƯn xong lƯnh “Hãy quét nhà” vị trí có thùng rác (ở góc đối diện) Ta có nhiều cách khác để đưa hai lệnh để rơ-bốt trở lại vị trí ban đầu mình, cách hai lệnh “Quay trái, tiến bước” “Quay trái, tiến bước”

C¸c tên hợp lệ: a, Tamgiac, beginprogram, b1, abc, tên không hợp lệ: 8a (bắt đầu số), Tam giac (có dấu cách), end (trùng với từ khóa)

a) Chương trình chương trình Pascal đầy đủ hồn tồn hợp lệ, chương trình chẳng thực điều Phần thiết phải có chương trình phần thân chương trình đảm bảo hai từ begin end (có dấu chấm)

b) Chương trình chương trình Pascal khơng hợp lệ câu lệnh khai báo tên chương trình program CT_thu; nằm phần thân chương trình

Dãy chữ số 2010 thuộc kiểu liệu số nguyên, số thực kiểu xâu kí tự Tuy nhiên, để chương trình dịch Turbo Pascal hiểu 2010 liệu kiểu xâu, phải viết dãy số cặp dấu nháy đơn (’)

var a: real; b: integer; begin writeln('123'); writeln(123); a:=2010; b:=2010; end

Lệnh Writeln('5+20=','20+5'); in hình hai xâu ký tự '5+20' '20+5' liền nhau: 5+20 = 20+5, lệnh Writeln('5+20=',20+5); in hình xâu ký tự '5+20' tổng 20+5 sau: 5+20=25

(23)

- Hs đọc đề

- HS làm

ra hình số 100

Các biểu thức Pascal: a/b+c/d

a*x*x+b*x+c 1/x-a/5*(b+2)

(a*a+b)*(1+c)*(1+c)*(1+c)

Các biểu thức toán tương ứng:

(a b) x y

 

2

b a c

2 (2 )

a b c

1 1

1

2 2.3 3.4 4.5

   

Hoạt động 2: củng cố, dặn dò - Gv ý với Hs điểm hay sai Hs

- Hs: lắng nghe rút kinh nghiệm - Gv nhận xét:

- Hs lắng nghe

Sự chuẩn bị Hs

(24)

Ngày soạn :10/10/2008 Tiết 13 – Tuần 7 Ngày dạy :14/10/2008

BÀI

TẬP

I Mục tiêu:

 Giúp học sinh ôn lại khắc sâu kiến thức học  Hệ thống kiến thức kiến thức sở lập trình  Rèn luyện kỹ tư duy, suy luận logic

 Tạo thói quen làm việc độc lập  Hừng thú học tập mơn II Phương pháp:

Thuyết trình – vấn đáp III Tiến trình giảng:

1 ổn định: (2') Bài củ: (5')

- Thế chương trình, chương trình máy tính có tác dụng gì? - Tại phải viết chương trình, viết chương trình xin chào bạn? Bài mới: 38'

Ho t động 1: Vi t chế ương trình

Hoạt động GV Hoạt động HS Nội dung - Yêu cầu học sinh viết

chương trình giới thiệu

- Yêu cầu học sinh nhắc lại lệnh lập trình pascal?

? Lệnh nhập, xuât

? Để kiểm tra lổi ta thực

? Kể tên phếp toán so sánh

? Hàm mod có tác dụng

Viết chương trình

Trả lời câu hỏi

Trả lời câu hỏi Lấy phần dư

HS ghi nội dung sua gv sửa

Kí hiệu trong Pascal

Phép so

sánh tốn họcKí hiệu

= Bằng =

<> Khác ≠

< Nhỏ <

<= Nhỏ

hoặc ≤ > Lớn >

>= Lớn

≥

(25)

gì

Gọi học sinh trả lời yêu cầu lấy ví dụ

? Hàm div có tác dụng

Yêu cầu học sinh làm tập:

a) 15 30 12   ;

b) 10 18

 

  ;

c)

2 (10 2)

(3 1) 

 ;

d)

2 (10 2) 24

(3 1)

 



a) Thêm câu lệnh thích hợp để có chơng trình sau: uses crt;

begin

clrscr;

writeln('16/3 =', 16/3); delay(5000);

writeln('16 div =',16 div 3); delay(5000);

writeln('16 mod =',16 mod 3); delay(5000);

end.

phép chia

Lấy phần nguyên phép chia

Tiến hành làm tập:

VD: div =

HS ghi nội dung sua gv sửa

Hoạt động 2: Tổng kết tiết tập:

Giáo viên tổng kết nhận xét tiết thực hành

Ghi điểm học sinh làm tốt , nhắc nhở học sinh chưa nghiêm túc lớp

Dặn dò học sinh nhà xem tiết sau kiểm tra tiết lý thuyết

(26)

Ngày dạy :20/10/2008

KIỂM TRA TIẾT

 Giúp học sinh ôn lại khắc sâu kiến thức học  Hệ thống kiến thức kiến thức sở lập trình  Tạo thói quen làm việc độc lập

 Hừng thú học tập môn

 Kiểm tra lại kiến thức học học sinh II Phương pháp:

Dùng máy chiếu cho học sinh làm III Nội dung tiết kiểm tra

ĐỀ KIỂM TRA

Phần I: trắc nghiệm

Chọn phương án Theo em Pascal dùng để

a Là ngơn ngữ lập trình b Tạo vản

c Tạo bảng tính d Tất

2 Để thoát khỏi Pascal ta thực a Vào file>Exit

b Vào file>save

c Bấm vào dấu X góc phải d Khơng cách đún

3 Hiện dùng pascal loại sau? a Tobor Pascal 7.0

b Tobor Pascal 6.0 c Tobor Pascal 5.0 d Tobor Pascal 8.0 Ý sau

a F3 để mở tệp chương trình b F3 để lưu chương trình c F3 để lưu với tên d Tất Cả sai

5.Tổ hợp phím Alt+F3 có tác dụng a Để lưu tệp làm việc b Để đóng tệp

(27)

6 Tổ hợp phím Alt+X có tác dụng

a để kết thúc làm việc với TURBO PASCAL b Để khởi động chương trình Pascal

c Để lưu làm d Để tìm kiếm *

7 Để kiểm tra lỗi lập trình Pascal ta thực a F9

b Ctrl + F9 c Alt + F9 d

8.Để khai báo kiểu số nguyên ta thực kiểu cấc kiểu sau a integer, byte,longint

b Real, char c Tất sai d Tất

9.Để khai báo kiểu chuổi ta thực kiểu nào? a Char

b Sting c Var d Readln

10.Lệnh Write Writeln khác đâu?

a Writeln xuất kết xuống hàng Write khơng b Write xuất kết xuống hàng cịn Writeln khơng c Write xuất kết xuống hàng

d Tất sai 11.Hàm mod có tác dụng

a Lấy giá tri phàn dư phép chia b Lấy giá tri phàn nguyên số c Lấy bậc hai

d Hàm làm tròn số

12.Khi lưu tập tin với tên thấy

a Tập tin cũ cịn, có thêm tập tin với tên vừa lưu b Pascal sẽbáo sai

c tập tin cũ thay tên d Tất sai

13.Lệnh sau xuất Hình T:=6+8;

Writeln(‘tong hai so la:’,t); a Tong hai so la : 14 b Tong hai so la c Tong hai so la 8+6 d Tât ca sai

14 Div hàm

a Lấy phần nguyen phép chia b Lấy phần dư phép chia cLấy bậc hai

(28)

15 Integer dùng khai báo ? a Kiểu số nguyên

b Kiểu số thực c Kiểu kí tự

d Kiểu chuổi( xâu kí tự)

16 Phép toán <> pascal dùng để?

a Phép toán so sánh bằng b Phép toán so sánh khác c Phép toán so sánh lớn hơn d Phép toán so sánh nho hơn

17 Trong pascal có phân biệt chữ hoa chữ thường hay khơng?

a.Có b Khơng c Tùy lúc d Tất sai 18 Pascal sáng lập ra?

a Pascal b Niclaus Wirth c Tự có máy tính d Mycrosoft 19 Phần mở rộng file pascal là?

a .Pas b .doc c .exe d div 20.Lệnh real readln có tác dụng

a Tạm ngưng chương trình nhấn phím enter b Nhập liệu vào máy tính

c Xuất liệu hình d tất sai

Phần II: Tự luận

Viết chương trình xuất hình theo cấu trúc sau

" CHAO BAN ! "

" BAN HOC TRUONG NAO? LOP MAY?"

(29)

Ngày dạy :20/10/2008

Bài 4: SỬ DỤNG BIẾN TRONG CHƯƠNG TRÌNH I Mục tiêu:

– HS biết khái niệm biến

– HS biết vai trị biến lập trình – Biết cách khai báo biến

– GV: Giáo án, tài liệu tham khảo, máy tính – HS: SGK, tài liệu tham khảo, ghi III Tiến trình dạy học:

1 Ổn định(1') 2 Bài củ( không) 3 Bài mới:

Hoạt động 1: Biến công cụ lập trình

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

GV: Hoạt động chương trình máy tính xử lí liệu Trước máy tính xử lí, liệu nhập vào lưu nhớ máy tính Ví dụ, muốn cộng hai số a b, trước hết hai số nhập lưu nhớ máy tính, sau máy tính thực phép cộng a + b

? Để chương trình ln biết xác liệu cần xử lí lưu vị trí nhớ, ngơn ngữ lập trình cung cấp cơng cụ lập trình quan trọng Đó biến nhớ, hay gọi ngắn gọn biến

Biến dùng để lưu trữ liệu liệu biến lưu trữ thay đổi thực chương trình

Dữ liệu biến lưu trữ gọi giá trị biến

GV lấy ví dụ minh hoạ cho HS

Hoạt động 2: Khai báo biến

GV: Tất biến dùng chương trình cần phải khai báo phần khai báo chương trình Việc khai

Chú ý theo dõi

Trả lời câu hỏi

Ghi chép

1 Biến công cụ trong lập trình:

- Biến dùng để lưu trữ liệu liệu biến lưu trữ thay đổi thực chương trình

- Dữ liệu biến lưu trữ gọi giá trị biến

VD1: In giá trị tổng hai số a + b hình

Gán: X  a Y  b Write (X + Y)

VD2: Tính giá trị biểu

thức

50 100 ;

50

100 

ghi kết hình Gán:

X  100 + 50 X  X/3 ; Write (X) X  X/5 ; Write (X)

2 Khai báo biến: Việc khai báo biến gồm: - Khai báo tên biến

(30)

báo biến gồm:

- Khai báo tên biến;

- Khai báo kiểu liệu biến. Tên biến phải tuân theo quy tắc đặt tên ngôn ngữ lập trình

GV lấy VD khai báo biến pascal

GV: Gọi HS cho biết integer, real, string kiểu gì?

Integer: số nguyên Real: số thực String: xâu kí tự GV: Giải thích thêm

- var từ khố ngơn ngữ lập trình dùng để khai báo biến,

- m, n biến có kiểu nguyên (integer),

- S, dientich biến có kiểu thực (real),

- thong_bao là biến kiểu xâu (string) GV lưu ý HS:

Tên biến phải tuân theo quy tắc đặt tên ngơn ngữ lập trình

Tuỳ theo ngơn ngữ lập trình, cú pháp khai báo biến khác

Theo dỏi

của biến VD:

Var m, n: integer; S, dientich: Real; Thongbao: String;

4 : Củng cố

Cho HS thực câu 4/33

5.: Dặn dò

(31)

Ngày soạn :20/10/2008 Tiết 16 – Tuần8 Ngày dạy :28/10/2008

Bài 4: SỬ DỤNG BIẾN TRONG CHƯƠNG TRÌNH (tiếp) I Mục tiêu:

– HS biết khái niệm

– HS biết vai trò lập trình

– Biết cách khai báo, đặt tên cách sử dụng biến, – Hiểu lệnh gán

– GV: Giáo án, tài liệu tham khảo, máy tính – HS: SGK, tài liệu tham khảo, ghi III Tiến trình dạy học:

1 Ổn định(1') 2 Bài củ( 5')

* Biến dùng để làm gì? Cách khai báo biến? * Trả lời Câu 6/T33 SGK

3 Bài mới:

Hoạt động Sử dụng biến chương trình(10')

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

GV: Sau khai báo, ta sử dụng biến chương trình Các thao tác thực với biến là:

- Gán giá trị cho biến;

- Tính tốn với các biến

GV giới thiệu dạng câu lệnh gán giá trị cho biến lấy VD cho HS

Ví dụ:

x   c/b (biến x nhận giá trị bằng  c/b);

x  y (biến x gán giá trị của biến y);

i  i + (biến i gán giá trị i cộng thêm 5 đơn vị)

GV lấy ví dụ minh hoạ trang 31 cho HS

Suy nghĩ trả lời câu hỏi

Theo dõi gv hướng dẫn

Lấy ví dụ

3 Sử dụng biến chương trình:

Các thao tác thực với biến

- Gán giá trị cho biến; - Tính tốn với biến

Câu lệnh gán giá trị cho biến có dạng:

Tên biến  Biểu thức cần gán giá trị cho biến;

Trong ngơn ngữ Pascal, kí hiệu phép gán dấu :=

VD: SGK/31

Hoạt động Hằng(25')

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

Nội dung

GV: Ngồi cơng cụ để lưu trữ liệu biến, ngôn ngữ lập trình

(32)

cịn có cơng cụ khác Khác với biến, đại lượng có giá trị khơng đổi suốt q trình thực chương trình

Giống biến, muốn sử dụng hằng, ta cần phải khai báo tên Tuy nhiên phải gán giá trị khai báo

Tên phải tuân theo quy tắc đặt tên ngơn ngữ lập trình

GV lấy VD khai báo pascal giải thích cho HS

- const từ khoá để khai báo hằng,

- Các pi, bankinh gán giá trị tương ứng 3.14 Với khai báo trên, để tính chu vi hình trịn, ta dùng câu lệnh sau:

chuvi:=2*pi*bankinh;

GV: Vậy lợi ích việc sử dụng gì?

HS: Việc sử dụng hiệu giá trị (bán kính) sử dụng nhiều câu lệnh chương trình Nếu sử dụng hằng, cần thay đổi giá trị, ta cần chỉnh sửa lần, nơi khai báo mà tìm sửa chương trình

GV: Chính giá trị khơng đổi suốt chương trình nên khơng thể dùng câu lệnh để thay đổi giá trị (như biến) vị trí chương trình

GV lấy VD câu lệnh khộng hợp lệ

Theo dõi gv hướng dẫn

2 Hằng:

Hằng đại lượng có giá trị khơng đổi suốt chương trình

Việc khai báo gồm: - Khai báo tên - Gán giá trị cho VD:

Const pi = 3.14; Bankinh = 2;

Chú ý: Không thể dùng câu lệnh để thay đổi giá trị (như biến) vị trí chương trình

4 Củng cố(3')

Nhắc lại cách sử dụng biến chương trình Hằng đại lượng nào?

Cách khai báo hằng?

Nêu giống khác biến, cách khai báo? 5 Dặn dò(1')

(33)

Ngày soạn :29/10/2008 Tiết 17 – Tuần 9 Ngày dạy :30/10/2008

THỰC HÀNH

I Mục tiêu.

- Khắc sâu kiến thức lý thuyết kỷ thực hành cho học sinh - Hệ thống hoá kiến thức học Vận dụng giải toán

- Rèn luyện kỷ viết chương trình giải tốn ngơn ngữ Pascal

II Chuẩn bị.

- Đèn chiếu, giấy trong, thước , phấn màu

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

1 ổn định.(1') Bài củ (3ph)

Nêu giống khác biến, cách khai báo? Bài mới(.40')

VËn dông làm tập

HĐ GV HĐ HS Ghi bảng

! Gi hs đọc tóm tắt nêu y/c

? Hãy xác định liệu vào, toán

- GV chốt lại vấn đề

? Hãy nêu giải thuật toán - GV nhận xét đánh giá -GV hoàn chỉnh

!GV HD hs viÕt chơng trình + Chọn kiểu liệu: int, real + LƯnh nhËp cã thĨ sư dơng ba lƯnh riªng biƯt ghép lại + Nếu sử dụng kiểu real lÖnh xuÊt :

Writeln(‘Dien tich la ’, S:8:2); ! Y/c hs thực

! gọi hs lên bảng thực !GV nhắc ;

+ Căn bậc hai phải sử dụng hàm; SQRT

+ Giá trị trả hàm là: real

! GV nhn xét đánh giá ! GV đa giải lên hình

- Hs đọc trả lời y/c tốn

- HS nªu

- HS nhËn xÐt bổ sung - HS sinh

- HS lên bảng viết giải thuật

- hs lớp viết vào -HS nhËn xÐt bỉ sung - HS theo dâi vµ ghi bµi

- HS đọc tự nghiên cứu thực y/c toán

- HS lên bảng thực

- HS nhận xét bổ sung - HS ghi nhí

- HS theo dâi vµ ghi vë - HS ghi bµi

Bµi 1.

In: đáy lớn (a), đáy bé(b), chiều cao (h) Out: S (diện tích)

Gi¶i tht:

B1 Readln(a,b,h); B2 S := (a+b)*h; B3 Writeln(S); Program VD;

Var a,b,h,S : integer; Begin

Write(‘Hay nhap vao ba so nguyen duong’);

Readln(a,b,h); S := (a+b)*h;

Writeln(‘Dien tich la ’, S); Readln;

End Bµi Program VD; Var a : integer; Begin

Write(‘Hay nhap vao so nguyen duong’);

Readln(a);

Writeln(‘Can bac hai cua’ , a , ‘la ’ ’,SQRT(a):8:2);

Readln; End 4 H ớng dẫn nhà (1') + Học nắm kiến thức học

+ Làm lại tập

Ngày soạn :29/10/2008 Tiết 18 – Tuần 9

Ngày dạy :30/10/2008

THỰC HÀNH

I Mục tiêu.

(34)

- Hệ thống hoá kiến thức học Vận dụng giải toán

HĐ Xác định liệu(17')

H§ GV H§ HS Ghi b¶ng

GV Đưa tốn (lên hình)

Nhập hai số nguyên dương độ dài hai cạnh hình chữ nhật, tính chu vi diện tích

? Hãy xác định liệu vào toán

GV khẳng định vấn đề ? Từ liệu xác định giải thuật

! GV ghi giải thuật theo lời hs

GV hồn chỉnh

HS đọc tốn

HS trả lời HS khác nhận xét bổ sung HS đứng chổ nêu giải thuật

HS nhận xét bổ sung HS ghi

1 Xác định liệu giải thuật

Dữ liệu vào: hai số a,b >

Dữ liệu ra: Chu vi(C), diện tích (S)

Giải thuật B1 Nhập a,b

B2 Lập công thức C := (a+b)*2

S := a*b B3 Xuất C,S HĐ Hoàn thành chơng trình.(18')

! GV HD hs động chương trình tiến hành soạn thảo chương trình

! GV gõ nhanh chương trình vào (có sai lỗi)

HS theo dõi ghi nhớ bước

HS ghi lại

chương trình Program Tinh;Uses Crt;

Var a,b,C,S : integer; Begin

Clrscr;

Writeln(‘Nhap vao chieu dai a = ’); Readln(a);

(35)

? Để dịch chương trình ta thực thao tác? ! GVHD cách dịch chương trình

! GV dịch sữa cáclỗi sai chương trình cho hs thấy

! Sau sữa hoàn chỉnh chương trình Y/c hs nêu cách thực thao tác quản lý tệp

! GV thực chạy chương trình

! GVHD cách nhập liệu vào cho a,b

! GV nhập vào số nhấn Enter để thi hành

! Giải dịng ký tự hình

! GV kiểm tra kết tay để so sánh

HS trả lời HS theo dõi cách làm HS theo dõi thao tác sữa chương trình HS nêu thao tác quản lý tệp:

+ Lưu tệp + Đóng tệp HS ghi nhớ

C := (a + b) * 2; S := a * b;

Writeln(‘Chu vi hinh chu nhat la’,C:8:2); Writeln(‘Dien tich hinh chu nhat la’,S:8:2); Readln;

End

4 Củng cố(4')

Cho học sinh ghi lại số sai sót mà giáo viên sữa chữa

5 Híng dÉn vÌ nhà.(1')

Học nắm bớc hoàn thành chơng trình

Ngy son :02/11/2008 Tit 19 Tun 10

Ngày dạy :04/11/2008

BÀI TẬP

I Mục tiêu.

(36)

- Rèn luyện kỷ viết chương trình giải tốn ngôn ngữ Pascal

VËn dông làm tập SGK TRANG 35

! Gi hs đọc tóm tắt nêu y/c

? Hãy xác định liệu vào, toán

- GV chốt lại vấn đề

? Hãy nêu giải thuật toán - GV nhận xét đánh giá -GV hồn chỉnh

!GV HD hs viÕt ch¬ng trình + Chọn kiểu liệu: int, real + Lệnh nhập sử dụng ba lệnh riêng biệt ghép lại + Nếu sử dụng kiểu real lệnh xuÊt :

Writeln(‘Dien tich la ’, S:8:2); ! Y/c hs thực

! gọi hs lên bảng thực !GV nhắc ;

+ Căn bậc hai phải sử dụng hàm; SQRT

+ Giá trị trả hàm là: real

! GV nhn xột đánh giá ! GV đa giải lên hình

- Hs đọc trả lời y/c toán

- HS nªu

- HS nhËn xÐt bỉ sung - HS sinh

- HS lên bảng viết giải thuật

- hs lớp viết vào vỡ -HS nhËn xÐt bỉ sung - HS theo dâi vµ ghi bµi

- HS đọc tự nghiên cứu thực y/c tốn

- HS lªn b¶ng thùc hiƯn - HS nhËn xÐt bỉ sung - HS ghi nhí

- HS theo dâi vµ ghi vë - HS ghi bµi

Bµi 1.

Nhập số a,b,c tính tổng, hiệu, tích , thương

Bµi

Nhập số x,y ngun tính (a+b)2 (a-b)2

4 H ớng dẫn nhà (1') + Học nắm kiến thức học + Làm lại cỏc tập

Ngày soạn :02/10/2008 Tiết 20 – Tuần 10

Ngày dạy :04/10/2008

BÀI TẬP

I Mục tiêu.

- Khắc sâu kiến thức lý thuyết kỷ thực hành cho học sinh - Hệ thống hoá kiến thức học Vận dụng giải toán

(37)

b Bài củ (3ph)

Nêu giống khác biến, cách khai báo? c Bài mới(.40')

HĐ Xác định liệu(17')

GV a tốn (lên hình)

Nhập hai số ngun dương độ dài hai cạnh hình chữ nhật, tính chu vi diện tích

? Hãy xác định liệu vào toán

GV khẳng định vấn đề ? Từ liệu xác định giải thuật

! GV ghi giải thuật theo lời hs

GV hoàn chỉnh

HS đọc toán

HS trả lời HS khác nhận xét bổ sung HS đứng chổ nêu giải thuật

HS nhận xét bổ sung HS ghi

Bài 1: Nhập vào chiều dài chiều rộng hình chữ nhật sau tính chu vi diện tích hình chữ nhật

Dữ liệu vào: hai số a,b >

Dữ liệu ra: Chu vi(C), diện tích (S)

Giải thuật B1 Nhập a,b

B2 Lập công thức C := (a+b)*2

S := a*b B3 Xut C,S HĐ Hoàn thành chơng trình.(18')

! GV HD hs khởi động chương trình tiến hành soạn thảo chương trình

! GV gõ nhanh chương trình vào (có sai lỗi)

? Để dịch chương trình ta thực thao tác? ! GVHD cách dịch chương trình

! GV dịch sữa cáclỗi sai chương trình cho hs thấy

HS theo dõi ghi nhớ bước

HS ghi lại chương trình

HS trả lời HS theo dõi cách làm HS theo dõi thao tác sữa

Program Tinh; Uses Crt;

Var a,b,C,S : integer; Begin

Clrscr;

Writeln(‘Nhap vao chieu dai a = ’); Readln(a);

Writeln(‘Nhap vao chieu rong b = ’); Readln(b);

C := (a + b) * 2; S := a * b;

Writeln(‘Chu vi hinh chu nhat la’,C:8:2); Writeln(‘Dien tich hinh chu nhat la’,S:8:2); Readln;

(38)

! Sau sữa hồn chỉnh chương trình Y/c hs nêu cách thực thao tác quản lý tệp

! GV thực chạy chương trình

! GVHD cách nhập liệu vào cho a,b

! GV nhập vào số nhấn Enter để thi hành

! Giải dòng ký tự hình

! GV kiểm tra kết tay để so sánh

chương trình HS nêu thao tác quản lý tệp:

+ Lưu tệp + Đóng tệp HS ghi nhớ

d.Củng cố(4')

Cho học sinh ghi lại số sai sót mà giáo viên sữa chữa

e Híng dÉn vÌ nhà.(1')

Học nắm bớc hoàn thành chơng trình

Ngy son :05/11/2008 Tit 21-Tun 11

Ngày dạy : 15/11/2008

Bài :

TỪ BÀI TỐN ĐẾN CHƯƠNG TRÌNH

I Mục tiêu :

1 Kiến thức:

(39)

- xếp biến x,y,z có giá trị tăng dần tìm só lớn dãy số cho trước

3 Thái độ:

- Yêu thích môn, tự giác học tập

a Giáo viên :

- Đồ dùng dạy học máy tính kết nối projector, b Học sinh :

III Tiến trình dạy học : a ổn định tổ chức lớp :

b Kiểm tra cũ : (không) c Dạy :

Hoạt động : Học sinh tìm hiểu khái niệm tốn, thuật tốn(24')

hoạt động thày hoạt động trò kiến thức cần đạt GV:Muốn nhờ máy giải

bài toán em phải làm ?

Gv : Hãy viết lệnh để giải toán

Gv : Đưa tốn lên hình

Gv : Viết lệnh để giải toán

H : Trả lời

H : Viết lên bảng phụ

G : Kiểm tra chốt mơ hình chương trình giải tốn

1 Bài tốn chương trình

Bài tốn :

Tính tổng hai số a b gõ vào bàn phím

=> Viết chương trình gồm lệnh sau :

G : Nhận xét chốt mô hình chương trình hình

Hs : Đọc nghiên cứu để tìm cách giải tốn

Bài tốn :

Tính giá trị biểu thức P = (a*b-c)/d với a, b, c, d số thực tuỳ ý

(40)

G : Nhận xét chốt mơ hinh chương trình hình

Hs : Hoạt động nhóm viết vào bảng phụ nộp kết G yêu cầu

H : Nghiên cứu sơ đồ vị trí rơbốt

H : Viết chương trình gồm lệnh điều khiển rơbốt

Tính biểu thức ; Bắt đầu

- Nhập giá trị cho a, b, c, d

- Tính tích a*b nhớ kết vào P1 - Tính hiệu P1 – c nhớ kết vào P2

- Tính thương P2/d nhớ kết vào P

- In giá trị P hình Kết thúc

Bài tốn :

Hãy điều khiển rôbốt nhặt rác theo sơ đồ

=> Viết chương trình gồm lệnh sau :

Hoạt động : HS biết xác định tốn gì(15')

hoạt động thày hoạt động trò kiến thức cần đạt Em hiểu

toán

G : Muốn giải toán trước tiên em phải làm ?

G : Thu nhận kết chốt kiến thức

H : Trả lời khái niệm tốn

H : Các nhóm - Xác định đầu vào tốn tính diện tích hình tam giác, nấu ăn, vượt qua nút nghẽn giao thơng

2.Bài tốn xác định bài

toán

- Bài toán công việc hay nhiệm vụ cần phải giải

- Muốn giải toán trước hết phải xác định giả thiết kết luận tức đầu vào đầu toán

(41)

d.Củng cố kiến thức.(4')

? Nhắc lại khái niệm toán, đầu vào đầu toán ? Thế xác định toán

e Hướng dẫn nhà.(2')

? Xác định đầu vào đầu tốn : Tính diện tích hình tam giác, nấu ăn, vượt qua nút nghẽn giao thơng

? Tự đưa toán xác định đầu vào đầu tốn

Ngày soạn :12/11/2008 Tiết 22 - tuần 11

Ngày dạy : 17/11/2008

Bài :

TỪ BÀI TOÁN ĐẾN CHƯƠNG TRÌNH(tt)

I Mục tiêu :

1 Kiến thức:

 - Biết bước giải tốn máy tính;

 Biết chương trình thể thuật tốn ngơn ngữ cụ thể  Biết mơ tả thuật tốn phương pháp liệt kê bước

(42)

 Hiểu thuật tốn tính tổng N số tự nhiên đầu tiên, tìm số lớn dãy số

3 Thái độ:

- u thích mơn, tự giác học tập

1 Giáo viên :

- Đồ dùng dạy học máy tính kết nối projector, 2 Học sinh :

III Tiến trình tiết dạy : a Ổn định tổ chức lớp :

b Kiểm tra cũ :

? Trình bày khái niệm tốn Viết chương trình ?

? Đọc đề toán xác định đầu vào đầu tốn

c Dạy :

Hoạt động : Học sinh biết bước giải tốn máy tính.

hoạt động thày trị kiến thức cần đạt

G :Giải tốn máy tính nghĩa ?

G : Em hiểu thuật toán ? H : Trả lời

G : Để nhờ máy giải toán ta phải thực bước ?

H : Nghiên cứu SGK (hình 4) viết bảng nhóm

G : Thu kết nhận xét chốt

3 Q trình giải tốn máy tính

* Các bước để nhờ máy giải toán :  Bước : Xác định tốn xác định (thơng tin vào - INPUT) kết cần xác định (thông tin -OUTPUT)

 Bước : Thiết lập phương án giải quyết (xây dựng thuật tốn) tìm, lựa chọn thuật tốn mơ tả ngơn ngữ thơng thường.

(43)

bước

G : Em hiểu thực chất chương trình ?

hiện

Hoạt động : HS biết mô tả thuật toán phương pháp liệt kê bước.

G : Chỉ bước cần thiết để pha trà khách ?

H : Nghiên cứu SGK trả lời G : Mơ tả thuật tốn ? H : Trả lời theo ý hiểu

G : Chốt nhấn mạnh cách mơ tả thuật tốn

G : Đưa ví dụ tốn giải pt ax+b= hình

H : Nghiên cứu SGK

H : Mơ tả thuật tốn bước G : Đưa ví dụ tốn chuẩn bị trứng tráng

G : Đưa mơ tả thuật tốn bước bị xáo trộn

H : Nghiên cứu xếp lại theo trình tự để giải tốn

G : Phát biểu khái niệm thuật toán ? H : Trả lời

G : Chốt khái niệm H ghi Học sinh tiến hành làm tập

Gọi học sinh lên bảng làm

Học sinh tiến hành làm tập

Gọi học sinh lên bảng làm

4 Thuật tốn mơ tả thuật tốn

- Mơ tả thuật tốn liệt kê bước cần thiết để giải tốn

a Ví dụ :

Bài tốn giải phương trình bậc dạng tổng quát bx + c =

(SGK) b Ví dụ :

Bài tốn ”Chuẩn bị trứng tráng” (SGK)

Thuật toán dãy thao tác cần thực hiện theo trình tự xác định để thu được kết cần tìm từ điều kiện cho trước :

5 Một số ví dụ thuật tốn

a Ví dụ : Tính diện tích hình

(SGK)

b Ví dụ : Tính tổng 100 số tự nhiên đầu tiên.

* Xác định toán :

(44)

Ghi kết luận

OUTPUT: Giá trị SUM = + + + 100 Mô tả thuật toán :

Bước 1: Gán SUM ( 1; i ( Bước 2: Gán i ( i +

Bước 3: Nếu i ≤ 100, SUM ( SUM + i chuyển lên bước Trong trường hợp ngược lại (i > 100), kết thúc thuật toán

f Củng cố kiến thức.

Qua tiết học em nắm kiến thức ? H : Nhắc lại kiến thức

G : Chốt kiến thức trọng tâm tiết học :

g Hướng dẫn nhà.

1 Học thuộc khái niệm : Giải tốn gì, bước để giải tốn, thuật tốn gì, cách mơ tả thuật tốn

2 Mơ tả thuật tốn để tính P = (a x b - c)/d Đọc trước phần SGK

Ngày soạn :12/11/2008 Tiết 23+24 - tuần 12

Ngày dạy : 19/11/2008

BÀI TẬP

I MỤC TIÊU :

1 Kiến thức:

- Học sinh nắm vai trò biến, hằng, cách khai báo biến,

- Học sinh nắm cách sử dụng biến chương trình cấu trúc lệnh gán

- Rèn kĩ sử dụng biến chương trình

2 Kỹ năng: Thực yêu cầu tập đưa

(45)

II CHUẨN BỊ :

1 Giáo viên :

- SGK, SGV, giáo án, bảng phụ ,

2 Học sinh : Kiến thức học, tập, bảng nhóm,

III CÁC HOẠT ĐỘNG DẠY HỌC

a Ổn định, kiểm tra sĩ số :

b Kiểm tra cũ : Kiểm tra việc chuẩn bị nhà học sinh c Dạy :

HOẠT ĐỘNG CỦA GV HOẠT ĐỘNG CỦA HS NỘI DUNG - GV : Biến đại lượng

nhö ?

- GV : Cách khai báo biến ?

- GV : Có thể thực thao tác với biến ?

- GV : Viết cấu trúc lệnh gán, lệnh nhập giá trị cho biến, lệnh in giá trị biến ?

- GV : Nhận xét chốt kiến thức biến - GV : Hằng đại lượng ?

- GV : Cách khai báo ?

- GV : Nhận xét chốt kiến thức

GV : Đưa chương trình lên hình

- GV : Liên kết với phần mềm Turbo Pascal soạn sẵn chương trình

- HS : nghiên cứu sách tập trả lời câu hỏi GV

- HS : viết lên bảng dạng tổng quát để khai báo biến

- HS : trả lời

- HS : em lên bảng em viết lệnh hs nhận xét

- HS : Lắng nghe - HS : Lắng nghe trả lời

- HS : Viết bảng phụ để trả lời

- HS : Lắng nghe ghi

- HS quan sát

- HS : Từng em lỗi lên sửa máy

- HS : Nhận xét

Viết thật toán cho vd sau: Tính 2x+3y+2 với x=2; y=4 Tính max, số x,y - Biến dùng để đặt tên cho vùng nhớ máy tính Biến lưu trữ liệu (giá trị) Giá trị biến thay đổi q trình thực chương trình

- Trước sử dụng biến phải khai báo theo dạng sau : Var tên biến : kiểu biến;

- Các thao tác thực với biến gán giá trị cho biến nhập giá trị cho biến tính tốn với giá trị biến - Lệnh gán có dạng :Tên biến := biểu thức(gt);

- Lệnh nhập giá trị cho biến:Readln(tên biến);

- Lệnh in giá trị cho biến : Write(tên biến); Writeln(tên biến);

- Khai báo : Const tên hằng=giá trị;

* Bài :

Hãy lỗi sửa lỗi chương trình sau :

Const pi:=3.1416; Var cv,dt:integer R:real;

(46)

này

- GV : Hãy lỗi sửa ?

- GV : Nhấn phím F9 để dịch chương trình

- GV : Chạy chương trình nhấn Ctrl-F9

- GV : Đưa đề lên hình

- GV : Giúp học sinh phân tích tốn hướng dẫn cách viết bước để giải toán

- GV : Viết cơng thức tính S, c, d ?

- GV : Nhận xét đưa công thức lên hình - GV : Chốt tồn chương trình lên hình chạy thử Pascal

chương trình cịn lỗi khơng sửa (nếu cịn)

- HS : Nhận xét kết

- HS quan sát

- HS lắng nghe GV xây dựng

- HS lắng nghe trả lời theo nhóm bảng phụ

- HS quan sát

- HS lắng nghe làm theo nhóm - HS lắng nghe

Writeln(‘chu vi la:= cv’); Writeln(‘dien tich la:=dt’); Readln

End

* Bài :

Viết chương trình để :

Tính diện tích S hình tam giác với độ dài cạnh a chiều cao tương ứng h (a h số tự nhiên nhập vào từ bàn phím)

Program tinhtoan;

Var a,h : interger; S : real; a,b,c,d : integer;

Begin

Write(‘Nhap canh day chieu cao :’);

Readln (a,h); S:=(a*h)/2;

Writeln(‘ Dien tich hinh tam giac la :’,S:5:1);

Write(‘Nhap hai so a,b :’); Readln (a,b);

c:=a div b; d:=a mod b;

Writeln(‘ Phan nguyen cua a va b la :’,c);

Writeln(‘ Phan du cua a va b la :’,d);

d Củng cố: Chốt lại kiến thức trọng tâm cần nắm để áp dụng làm tập e Hướng dẫn nhà: Chuẩn bị tmới.

Ngày dạy : 24/11/2008

TÌM HIỂU THỜI GIAN VỚI PHẦN MỀM SUN TIMES

I MụcTiêu:

1 Kiến thức

- :HS hiểu chức phần mềm, sử dụng phần mềm để quan sát thời gian địa phương vị trí khác trái đất

- Hs tự thao tác thực số chức phần mềm Kỹ :

(47)

- Khởi động , thoát chương trình Thái độ :

- Thơng qua phần mềm HS hiểu biết thêm thiên nhiên, trái đất, từ nâng cao ý thức bảo vệ mơi trường sống

II/ Chuẩn bị:

- Gv: phòng máy, tập thực hành - Hs: kiến thức cũ, sgk

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

a Ổn định lớp: b Bài cũ:(không) c Dạy mới

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

Giáo viên giới thiệu phần mềm

-Trên đồ có vùng sáng, tối khác Vùng sáng cho biết vị trí thuộc vùng thời điểm thời ban ngày Ngược lại, vùng tối vị trí thuộc vùng ban đêm -Giữa vùng sáng tối có đường vạch liền, ranh giới ngày đêm Tại vùng có đường thời gian Mặt Trời lặn mọc đường chân

- Hs vị trí thực hành theo quy địng giáo viên - Hs lắng nghe Hs: thực hành Hs: trả lời

Hs: lắng nghe thực hành

Hs: thực hành Hs: thực hành, nhận xét kết câu

Hs: thêm lệng delay (5000) vào sau câu lệnh writeln chương trình Hs: chạy chương trình nhận xét

Hs: thực hành Hs: thực hành Hs: thực hành

1 Giới thiệu phần mềm

Phần mềm Sun Times giúp em nhìn tồn cảnh vị trí, thành phố thủ nước tồn giới với nhiều thơng tin liên quan đến thời gian Ngồi ra, phần mềm cịn cung cấp nhiều chức hữu ích khác liên quan đến thời gian Mặt Trời mọc, Mặt Trời lặn, nhật thực, nguyệt thực,

2 Màn hình phần mềm

a) Khởi động phần mềm

Nháy đúp vào biểu tượng để khởi động phần mềm

b) Màn hình chính

(48)

trời Chúng ta gọi đường đường phân chia thời gian sáng/tối

-Trên đồ có vị trí đánh dấu Đó thành phố thủ đô quốc gia Khi nháy chuột lên vị trí em nhìn thấy thơng tin chi tiết liên quan đến thành phố khung nhỏ phía hình

Muốn phóng to vùng hình chữ nhật đồ em dùng cách sau:

Trên đồ có vùng sáng, tối khác cho biết thời gian vùng ngày hay đêm Tại ranh giới phân chia ngày đêm, thời điểm chuyển giao đêm-ngày (Mặt Trời mọc) ngày-đêm (Mặt Trời lặn) thấy Mặt Trời chuyển động từ Đông sang Tây Trên đồ, ta thấy vùng tối "chuyển động" theo hướng từ phải sang trái Bây em tìm hiểu kĩ địa điểm,

Hs: Rút nhận xét Hs: lắng nghe Hs: thực hành

Hs: thực hành Hs: Rút nhận xét Hs: lắng nghe

c) Thoát khỏi phần mềm.

Alt+F4.

3 Hướng dẫn sử dụng

a) Phóng to quan sát vùng

bản đồ chi tiết

Nhấn giữ nút chuột phải kéo thả từ đỉnh đến đỉnh đối diện hình chữ nhật Một cửa sổ xuất hiển thị vùng đồ đánh dấu phóng to

b) Quan sát nhận biết thời

gian: ngày đêm

Chúng ta biết Trái Đất tự quay quay quanh Mặt Trời tạo ngày đêm Theo chuyển động Trái Đất

c) Quan sát xem thông tin thời

gian chi tiết địa điểm cụ

thể

d) Quan sát vùng đệm ngày

và đêm

(49)

thành phố Trái Đất:

Em quan sát vùng có màu đen đồ Đó vùng có thời gian ban đêm Xung quanh vùng có giải phân cách sáng - tối, vùng đệm ngày đêm

Thời gian chuyển động, thấy khối màu đen dịch chuyển từ phải sang trái



e) Đặt thời gian quan sát

Bằng cách nháy chuột lên nút lệnh thời gian em đặt lại thời gian Ngày, Tháng, Năm, Giờ, Phút Giây

d. Củng cố: - Cho học sinh khởi động thoát phần mềm e. Dặn dò: Về nhà xem tiết sau học tiếp

Ngày dạy : 24/11/2008

TÌM HIỂU THỜI GIAN VỚI PHẦN MỀM SUN TIMES(tt)

I MụcTiêu:

1 Kiến thức

- :HS hiểu chức phần mềm, sử dụng phần mềm để quan sát thời gian địa phương vị trí khác trái đất

- Hs tự thao tác thực số chức phần mềm Kỹ :

Vuứng ủeọm chuyeồn giửừa ngày đêm:

s¸ng sím Vùng đệm

chuyển ngày đêm:

(50)

- Xem vị trí tỉnh đak nơng, thị xã - Khởi động , chương trình Thái độ :

- Thông qua phần mềm HS hiểu biết thêm thiên nhiên, trái đất, từ nâng cao ý thức bảo vệ mơi trường sống

- Gv: phòng máy, tập thực hành - Hs: kiến thức cũ, sgk

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

a ổn định lớp: b Bài cũ: c Dạy mới

Hoạt động GV Ho?t d?ng GV Hoạt động HS Tại ranh giới phân chia ngày

đêm, thời điểm chuyển giao đêm-ngày (Mặt Trời mọc) ngày-đêm (Mặt Trời lặn)

chúng ta thấy Mặt Trời chuyển động từ Đông sang Tây Trên đồ, ta thấy vùng tối "chuyển động" theo hướng từ phải sang trái

Bây em tìm hiểu kĩ địa điểm, thành phố Trái Đất:

Khối đen đồ che khuất hình ảnh quốc gia thành phố Để vùng tối-sáng này, vào bảng chọn Options  Maps huỷ chọn mục Show Sky Color Khi đồ giới với múi có dạng sau:

4 Một số chức khác

a) Hiện khơng hình ảnh

bầu trời theo thời gian

Để hiển thị màu bầu trời em cần chọn lại Show Sky Color lệnh Options  Maps

b) Cố định vị trí thời gian

quan sát

(51)

Để thay đổi trạng thái thay đổi thông tin này, em thực lệnh Options  Maps huỷ chọn mục Hover Update Khi thơng tin thời gian thay đổi nháy chuột địa điểm

Một chức phần mềm cho phép tìm địa điểm khác Trái Đất có thơng tin thời gian ngày giống

Ví dụ, xem hơm có địa điểm giới có thời gian Mặt Trời mọc Hà Nội, Việt Nam Các bước thực hiện:

1 Chọn vị trí ban đầu (Hà Nội). 2 Thực lệnh Options  Anchor Time To chọn mục Sunrise để tìm theo thời gian Mặt Trời mọc (hoặc Sunset - Mặt Trời lặn)

Với phần mềm Sun Times em biết thời điểm xảy nhật thực tương lai khứ địa điểm Trái Đất

Nháy nút Find (Future) để tìm nhật thực tương lai nút Find (Past) để tìm nhật thực khứ Em thấy thời gian chuyển động (đến tương lai hay quay lại khứ) dừng lại tìm thấy nhật thực Trong ví dụ trên, ta thấy Hà

Ngày tháng năm 2008, địa điểm trên đường liền có thời gian Mặt Trời mọc giống Hà Nội, Việt Nam, vào lúc 5

giờ 31 phút 56 giây.

Ngày tháng 11 năm 2008, vị trí trên đường liền có thời gian Mặt Trời mọc giống Hà Nội, Việt Nam, vào lúc 6

giờ phút 44 giây.

d) Tìm kiếm quan sát nhật

thực Trái Đất

Cách thực sau:

1 Chọn địa điểm muốn tìm nhật thực. 2 Thực lệnh View  Eclipse Cửa sổ nhỏ sau xuất

Trong hình trên, Madrid thủ Tây Ban Nha xảy nhật thực phần vào 30 phút 43 giây sáng ngày tháng năm 2011

(52)

Nội xảy nhật thực phần vào 17 58 phút 17 giây ngày 01 tháng năm 2008 Cửa sổ Eclipse rõ hình ảnh nhật thực quan sát từ Hà Nội

Phần mềm có chức đặc biệt cho phép thời gian chuyển động với vận tốc nhanh chậm Em quan sát chuyển động ngày đêm vùng khác Trái Đất

Hãy quan sát nút lệnh sau công cụ:

thời gian

Để thời gian chuyển động nháy chuột vào nút Muốn dừng nháy chuột vào nút

d Củng cố: Cho học sinh lên máy chủ thực hành vấn đề học, lớp theo

dõi nhận xét, giáo viên kết luận

e Dặn dò: Về nhà xem lại lý thuyết tiết sau thực hành.

Ngày soạn :25/11/2008 Tiết 27+28 - tuần 13,14

Ngày dạy : 28/11/2008

THỰC HÀNH

TÌM HIỂU THỜI GIAN VỚI PHẦN MỀM SUN TIMES

I MụcTiêu:

1 Kiến thức

- HS hiểu chức phần mềm, sử dụng phần mềm để quan sát thời gian địa phương vị trí khác trái đất

(53)

- Xem vị trí tỉnh đak nơng, thị xã - Khởi động , chương trình Thái độ :

- Thông qua phần mềm HS hiểu biết thêm thiên nhiên, trái đất, từ nâng cao ý thức bảo vệ môi trường sống

II Chuẩn bị: Phịng máy có cài phần mềm suntimes, đèn chiếu…. III Tiến trình dạy học:

a Ổn định(1') Giáo viên cho học sinh ổn định chỗ ngồi, phân nhóm b Bài cũ(4')

- Nêu bước khởi động chương trình Sun time - Phóng to, thu nhỏ quan sát vị trí đồ c Bài mới(75')

Hoạt động GV HS Nội dung Giáo viên chia nhóm yêu cầu:

- Khởi động thóat khỏi phần mềm - Yêu cầu bước khởi động ( cách

khởi động)(5 phút)

- Gọi học sinh lên máy chủ thực

Yêu cầu học sinh tiến hành thực hành nội dung 2:

- Phóng to quan sát vùng đồ chi

tiết

- Quan sát nhận biết thời gian: ngày

và đêm

- Quan sát xem thông tin thời gian chi

tiết địa điểm cụ thể

1.Khởi động:

- Nháy đúp vào biểu tượng để khởi động phần mềm

2 Thoát:

(54)

- Quan sát vùng đệm ngày đêm

Tiếp tục cho học sinh thực thao tác Đặt thời gian quan sát

Bằng cách nháy chuột lên nút lệnh thời gian em đặt lại thời gian Ngày, Tháng, Năm, Giờ, Phút Giây

Giáo viên cho học sinh thực hành sau gọi số học sinh lên làm mẫu

Ghi điểm học sinh làm tốt

Tiết 2:

Tiêp tục cho học sinh thực hành Một số chức khác

1 Hiện khơng hình

ảnh bầu trời theo thời gian

Để hiển thị màu bầu trời em cần chọn lại Show Sky Color lệnh Options  Maps

b) Cố định vị trí thời gian quan sát

2 Tìm địa điểm có thơng tin

thời gian ngày giống nhau

Ngày tháng năm 2008, địa điểm đường liền có thời gian Mặt Trời mọc giống Hà

Nội, Việt Nam, vào lúc 31 phút 56 giây.

Ngày tháng 11 năm 2008, vị trí đường liền có thời gian Mặt Trời mọc giống Hà

Nội, Việt Nam, vào lúc phút 44 giây.

3 Tìm kiếm quan sát nhật thực

trên Trái Đất

Trong hình trên, Madrid thủ đô Tây Ban Nha xảy nhật thực phần vào 30 phút 43 giây sáng ngày tháng năm 2011

4 Quan sỏt chuyển động thời

1.

s¸ng sím Vùng đệm

chuyển ngày đêm:

(55)

gian

Để thời gian chuyển động nháy chuột vào nút Muốn dừng nháy chuột vào nút

Giáo viên cho học sinh thực hành sau gọi số học sinh lên làm mẫu

Ghi điểm học sinh làm tốt Nhác nhở học sinh chưa nghiêm túc

2 Thực lệnh View  Eclipse Cửa sổ nhỏ sau xuất

d Củng cố: (7')

- cho học sinh lên làm mẫu cho lớp theo dõi gọi học sinh nhận xét bổ sung e Dặn dò:(2')

Học tiết sau học lý thuyết câu lệnh điều kiện

Ngày soạn :10/12/2008 Tiết 29 - tuần 15

Ngày dạy : 15/12/2008

Bài : CÂU LỆNH ĐIỀU KIỆN

I Mục tiêu:

1 Kiến thức:

 Biết cần thiết câu trúc rẽ nhánh lập trình

 Biết cấu trúc rẽ nhánh sử dụng để dẫn cho máy tính thực thao tác phụ thuộc vào điều kiện

 Hiểu cấu trúc rẽ nhánh có hai dạng : Dạng thiếu dạng đủ

(56)

 Hiểu cú pháp, hoạt động câu lệnh điều kiện dạng thiếu dạng đủ Pascal

2 Kỹ năng:

 Bước đầu viết câu lệnh điều kiện Pascal  Vẽ số sơ đồ câu lệnh

3 Thái độ:

 u thích khoa học mơn

II Ch̉n bị :

1 Gv : Giáo án, SGK tranh vẽ hình 32.

2 Hs : Chuẩn bị cũ thật tốt, xem trước mới. III Tiến trình dạy học :

1 Ổn định lớp : (1 phút)

2 Kiểm tra cũ : (4 phút)

Hảy mơ tả thuật tốn tìm giá trị lớn hai số ?  Bước : Max:= a (hoặc Max:=b);

 Bước : Nếu a < b gán Max = b viết giá trị lớn hai số Max 3 Dạy mới:

Hoạt động giáo viên Hoạt động họcsinh Nội dung

Hoạt động 1: Hoạt động phụ thuộc vào điều kiện (8 phút)

- Cho ví dụ hoạt động phụ thuộc điều kiện ?

- Nếu chiều trời không mưa, em sẽ chơi bóng

- Nếu em bị ốm, em nghỉ học

+ Từ “ nếu” câu được dùng để “điều kiện” hoạt động sau phụ thuộc vào điều kiện

- Em nêu điều kiện hoạt động phụ thuộc điều kiện ví dụ ?

Các điều kiện : chiều trời không mưa, em bị ốm.

Các hoạt động phụ thuộc điều kiện : em chơi bóng, em nghi học. - GV yêu cầu hs nêu số ví dụ khác để minh họa việc thực hoạt động sống ngày cách theo thói quen theo kế hoạch xác định từ trước

- GV cho HS nhận xét ví dụ mà bạn vừa nêu

-Hs lắng nghe

-Hs trả lời.

Các điều kiện : chiều trời không mưa, em bị ốm.

Các hoạt động phụ thuộc điều kiện : em đi chơi bóng, em sẽ nghi học.

- Một số hs cho ví dụ

- Một số hs nhận xét

1 Hoạt động phụ thuộc vào

điều kiện - SGK

(57)

Hoạt động 2: Tính sai của các điều kiện (12 phút)

- GV : Mỗi điều kiện nói (trong sách giáo khoa) mô tả dạng phát biểu Hoạt động phụ thuộc vào kết kiểm tra phát biểu hay sai

Vậy kết kiểm tra gì? Ví dụ :

(GV treo bảng phụ trình chiếu) - GV yêu cầu HS lấy thêm ví dụ khác - GV : Khi kết kiểm tra đúng, ta nói điều kiện thoả mãn, cịn khi kết kiểm tra sai, ta nói điều kiện khơng thoả mãn

- GV nêu ví dụ thường gặp tin hoc (như sách giáo khoa)

- Hs lắng nghe trả lời

- Hs ghi vào

-Hs nêu ví dụ

2 Tính sai của các điều

kiện

- Khi đưa câu điều kiện, kết kiểm tra đúng, ta nói điều kiện thoả mãn, cịn kết kiểm tra sai, ta nói điều kiện khơng thoả mãn -

+Nếu nhấn phím Pause/Break, (thì) chương trình (sẽ bị) ngưng

Hoạt động 3: Điều kiện phép so sánh (10 phút)

- Các phép so sánh có vai trị quan trọng việc mơ tả thuật tốn lập trình Phép so sánh cho kết có nghĩa điều kiện thoả mãn; ngược lại điều kiện không thoả mãn

- Cho ví dụ :

Vd 1: Nếu a > b, phép so sánh thì in giá trị a hình; ngược lại in giá trị b hình.

- GV : Để so sánh hai giá trị số hoặc hai biểu thức có giá trị số, đã sử dụng kí hiệu tốn học nào? - Các phép so sánh có kết thế nào?.

Quan sát SGK

+ Các phép so sánh có kết sai

3 Điều kiện phép so sánh

Để so sánh hai giá trị số hai biểu thức có giá trị số, sử dụng kí hiệu toán học như: =, ≠, <, ≤, > ≥ Các phép so sánh có kết sai

4 Củng cố: (4 phút)

Cho HS làm tập trang 50

5 Dặn dò: (1 phút)

* Làm tập 2, trang 50, 51

Ngày soạn :10/12/2008 Tiết 30 - tuần 15

Ngày dạy : 15/12/2008

CÂU LỆNH ĐIỀU KIỆN

(TT)

I MỤC TIÊU:

1 Kiến thức : Hiểu cấu trúc rẽ nhánh gồm dạng : thiếu đủ; biết ngôn ngữ lập trình có câu lệnh để thể cấu trúc rẽ nhánh; hiểu cú pháp hoạt động câu lệnh điều kiện dạng thiếu đủ Pascal

(58)

3 Thái độ: Nghiêm túc, hứng thú với môn học

II CHUẨN BỊ:

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

- Đồ dùng dạy học, sách giáo khoa,, giáo án, máy chiếu Chuẩn bị học sinh:

- Đồ dùng học tập, sách giáo khoa

III HOẠT ĐỘNG DẠY HỌC:

1 Ổn định tình hình lớp (1’)

- Kiểm tra sỉ số, nề nếp lớp học Kiểm tra cũ (3’)

Câu hỏi : 1.Giải tập (SGK/50) Dự kiến HS trả lời: a,b,c: đúng; d: sai Giảng mới:

Hoạt Động Giáo Viên Hoạt động Học sinh Nội Dung

HĐ1 Tìm hiểu cấu trúc rẽ nhánh (18 phút) Yêu cầu HS đọc vd2/SGK/ Tr48

? Hãy mơ tả HĐ tính tiền cho khách cách liệt kê bước?

GV nhận xét viết lại bước bảng GV: Cách thể hđ phụ thuộc điều kiện gọi cấu trúc rẽ nhánh dạng thiếu

GV dùng bảng phụ có sơ đồ cấu trúc rẽ nhánh dạng thiếu

GV giải thích sơ đồ -? Liên hệ thực tế, lấy ví dụ để minh hoạ sơ đồ

- Hãy nêu khác ví dụ

- GV nhận xét, bổ sung (nếu cần)

GV: Cách thể hđ phụ thuộc điều kiện gọi cấu trúc rẽ nhánh dạng đủ

GV dùng bảng phụ có sơ đồ cấu trúc rẽ nhánh dạng đủ

- Yêu cầu HS giải thích sơ đồ

HS: Đọc vd theo yêu cầu GV

HS: Mô tả bước Tất HS lại theo dõi, nhận xét

HS: Nếu bị đau: (đ kiện) - Đúng: Nghỉ học

- Sai:…” bỏ qua.”

HS đọc VD3

HS: Ở vd3, có thêm điều kiện: Tổng số tiền khơng đến 100.000 đ (nghĩa nhỏ 100.000 đ) Theo dõi

4 Cấu trúc rẽ nhánh.

a) Cấu trúc rẽ nhánh dạng thiếu:

VD2: SGK

Mô tả hoạt động tính tiền cho khách hàng:

B1: Tính tổng số tiền T khách hàng mua sách

B2: Nếu T>= 100.000, số tiền phải toán là: (100%-30%) * T

B3: In hoá đơn

b Cấu trúc rẽ nhánh dạng đủ VD3: SGK Mô tả hoạt động tính tiền cho khách hàng:

B1: Tính tổng số tiền T khách hàng mua sách

B2: Nếu T>= 100.000, số tiền phải toán là: (100%-30%) * T

Ngược lại : số tiền phải tốn (100%-10%)*T

ĐKiện ?

Câu lệnh

S

(59)

- Nhận xét, bổ sung - u cầu HS tìm thêm ví dụ (về nhà làm)

- Mọi NNLT có câu lệnh để thực cấu trúc rẽ nhánh dạng thiếu đủ, để hiểu rõ vấn đề tìm hiểu phần

Quan sát sơ đồ HS giải thích, HS khác bổ sung

B3: In hoá đơn

HĐ2 Tìm hiểu câu lệnh điều kiện (17 phút) Trong NNLT, cấu trúc rẽ nhánh thể câu lệnh điều kiện

- - Yêu cầu HS nêu theo dõi ví dụ SGK

+ Nêu yêu cầu VD4: Hãy thử viết câu lệnh thực

+ VD5: ? hoạt động chương trình biểu diễn thành bước

+ Yêu cầu HS nêu bước thực

+ Nhận xét

+ Đưa mẫu câu lệnh tổng quát

GV Kết luận

HS giải thích : gặp câu lệnh điều kiện này, chương trình kiểm tra điều kiện Nếu điều kiện thoả mãn chương trình thực câu lệnh sau từ khố Then, ngược lại bỏ qua HS:

Nếu a > b ghi hình giá trị a

If a > b then write(a) ; + Nêu bước hoạt động + Trả lời …

+ Trả lời + Trả lời

5 Câu lệnh điều kiện

a Câu lệnh điều kiện dạng thiếu

- Cú pháp :

If <điều kiện> then <câu lệnh >; - Ví dụ 4:

b Câu lệnh điều kiện dạng đủ Ví Dụ 6: SGK

Cú pháp :

If <điều kiện> then <câu lệnh 1> Else

<câu lệnh 2>;

4 Củng Cố(4')

? Viết lại cú pháp câu lệnh dạng thiếu dạng đủ ? Trả lời câu hỏi 5+ SGK 5 Dặn dò: (2’) - Chuẩn bị tiết học sau: Bài Thực hành 4.

Ngày soạn :10/12/2008

Tiết 31+32 - tuần 16

Ngày dạy : 15/12/2008

THỰC HÀNH

I Môc tiªu.

- Học sinh nắm cấu trúc lệnh if Biết sữ dụng lệnh if giải số toán - Phân biệt đợc đợc dạng cấu trúc lệnh if sử dụng thành thạo cấu trúc - HS thấy đợc cần thiết lệnh if Và cách thực lệnh if Pascal

(60)

- Đèn chiếu, giÊy trong, thíc , phÊn mµu

III Tiến trình dạy - học. 1 ổn định.

2 Bµi cđ (5 ph)

?1 Viết chơng trình nhập vào từ bàn phím số chiều dài hình vuông Tính chu vi diện tích hình vuông cạnh dơng ngợc lại thông báo : Sai liệu

3 Néi dung TH

+ Khởi động Turbo Pascal

+ Soạn thảo chơng trình VD SGK + Dịch lỗi chơng trình

+ Chạy thử chơng trình + Kiểm tra thuật toán

4 Bài mới.

HĐ Soạn thảo chơng trình.

! GV nêu nội dung y/c bi thùc hµnh

! Gọi hs đọc tốn ! HD học sinh khởi động máy tính soạn thảo văn theo y/c SGk

? §Ĩ dịch chơng trình ta thực thao tác?

! GVHD cách dịch chơng trình

! GV dịch sữa cáclỗi sai chơng trình cho hs thấy

! Sau sữa hoàn chỉnh chơng trình

Y/c hs nêu cách thực thao tác quản lý tệp ! GV thực chạy ch-ơng trình

! GVHD cách nhập liệu vào choa,b,c

! GV nhập vào số nhấn Enter để thi hành ! Giải thích dịng ký tự hình

! GV kiĨm tra kÕt qu¶

- HS nghe tiếp thu - HS đọc toán xác định y/c

- HS khởi động soạn thảo ch-ơng trình vào máy tính

HS trả lời HS theo dõi cách làm HS theo dõi thao tác sữa chơng trình HS nêu thao tác quản lý tệp: + Lu tệp

+ HS chạy ch-ơng trình thử ct

HS ghi nhí

Program VD; Var a, S, C : real; Begin

Write(‘Hay nhap vao mot so: ’); Readln(a);

If a > then Begin S:= a*a;

Writeln(‘Dien tich la : ’, S:8:2); C:= 4*a;

Writeln(‘Chu vi la : ’, C:8:2); End

Else Write(‘Du lieu sai’); Readln;

End

Bài tập:

Bài 1: Viết chương trình nhập vào số

nguyên a, b Tính a+b xuất kết

ra hình.

nguyên a, b Tính a+b, a-b, a*b xuất kết

quả hình.

(61)

bằng tay để so sánh Giỏo viờn cho học sinh làm tập

Bài giải

write(‘ nhap a=’);readln(a); write(‘ nhap b=’);readln(b); write(‘ Tong

la’);writeln(a+b); Readln;

end

nguyên a, b Tính a

xuất kết

màn hình.

nguyên a, b Tính a

+ b

xuất kết

ra hình.

Bài giải tham khảo Program bai2;

Var a,b:integer; Begin

write(‘ nhap a=’);readln(a); write(‘ nhap b=’);readln(b); write(‘ Tong la’);writeln(a+b); write(‘ Hieu la’);writeln(a-b); Readln;

5 Nhận xét đánh giá + Những đạt đợc:

+ Những cha đạt đợc: + Những vấn đề cần khắc phục:

6 Híng dÉn vÌ nhµ.

- Häc nắm cấu trúc lệnh if

- Rốn luyn kỷ thực hành vận dụng lệnh if để giải toán - Bài tập:

Ngày soạn :20/12/2008

Tiết 33 - tuần 17

Ngày dạy : 21/12/2008

KIỂM TRA THỰC HÀNH

I MỤC TIÊU

*Củng cố lại kiến thức học

* Ôn tập lại kỹ soạn thảo chương trình Pascal * Rèn luyện khả tư logic

* Giáo dục tính cẩn thận khéo léo

II HÌNH THỨC KIỂM TRA Viết giấy

III NộI DUNG Đề:

ĐỀ THI THỰC HÀNH MÔN TIN HỌC 8

Đề: Viết chương trình nhập vào số nguyên a, b Xuất tất ước chung a b VD: Nhập a=12, b=18

Xuất:

* Lưu ý Học sinh lưu với tên kết hợp với lớp

VD: học sinh trần Quốc Cường lớp 8A1 lưu với tên là: D:\cuong8a1.pas

(62)

Ngày soạn :20/12/2008

Tiết 34-35 - tuần 17,18

Ngày dạy : 21/12/2008

ÔN TẬP

I MụC TIÊU:

*Giúp học sinh hệ thống lại kiến thức lập trình Pascal.

*Hiểu rỏ cách viết chương trình cú sử dụng thuật toỏn Max - Min *Hiểu rỏ cỏch chạy chương trình cú sử dụng thuật tốn ìf then *Sửa số lỗi thường gặp

II CHUẨN BỊ

GV:*Chẩn bị phòng máy, tập, HS:

*Ôn lại lý thuyết học

* Giải trước tập nhà vào tập để thực hành III TIẾN TRÌNH ƠN TẬP

Bài 1: Viết chương trình nhập vào số nguyờn a, b Xuất số lớn màng hình Bài giải: Program bai1;

Var a, b:integer; Begin

Write(‘ nhap vao so nguyen a = ‘); Readln(a); Write(‘ nhap vao so nguyen b = ‘); Readln(b); Max:=a;

If b> max then Max:=b;

Write(‘ so lan nhat la ‘,max); Readln; End

Bài 2: Viết chương trỡnh nhập vào số nguyờn a,b, c, d Xuất số lớn nhất, nhỏ hỡnh

Bài giải: rogram bai2; Var a, b, c, d:integer;

Begin Write(‘ nhap vao so nguyen a = ‘); Readln(a); Write(‘ nhap vao so nguyen b = ‘); Readln(b); Write(‘ nhap vao so nguyen c = ‘); Readln(c); Write(‘ nhap vao so nguyen d = ‘); Readln(d); Max:=a; If b> max then Max:=b;

If c> max then Max:=c; If d> max then Max:=d; Write(‘ so lon nhat la ‘,max); Min:=a; If b< Min then Min:=b; If c< Min then Min:=c;

If d< Min then Min:=d;

Write(‘ so nho nhat la ‘,Min); Readln;End

(63)

Bài 3: Viết chương trình nhập vào điểm văn, tốn, lý , tin Tính trung bình mơn Nếu trung bình >=8 xếp loại giỏi, trung bình>=6 <8 xếp loại khà, ngược lại xếp ttrung bình

**************************

Ngày soạn :25/12/2008

Tiết 36 - tuần 17,18

Ngày dạy : 227/12/2008

KIỂM TRA HỌC KỲ I

I Mục tiêu:

- Giúp học sinh hệ thống lại nội dung kiến thức học chương trình Pascal

- Rèn luyện kỹ suy luận logic lài - HS khắc sâu kiến thức học

- Ơn lại kiến thức làm tốn lập trình II Chuẩn bị:

GV: Đề, phịng máy, phiếu làm HS: Ôn lại kiến thức học

III Hệ thống câu hỏi:

ĐỀ 1:

I.

TRẮC NGHIỆM: (5 điểm):

Hãy khoanh tròn chữ đứng trước câu trả lời đúng:

Câu 1: Trong từ sau, từ từ khoá?

A Ct_dau_tien B End C Begin D Program Câu 2: Từ khóa sau dùng để khai báo hằng?

A Uses B Var C Const D Program Câu 3: Ngơn ngữ lập trình là:

A chương trình máy tính B một thuật tốn

C mơi trường lập trình D ngơn ngữ dùng để viết ngơn ngữ máy tính Câu 4: Khi ta khai báo biến x có kiểu integer phép gán sau hợp lệ?

A x:= 5000000; B x:= ‘tin_hoc’; C x:= 200; D x:= 1.23; Câu 5: Cấu trúc chung chương trình gồm phần?

A 2 phần B 1 phần C 4 phần D 3 phần Câu 6: Để khai báo biến x thuộc kiểu số thực ta khai báo:

A Var x: String; B Var x: integer;C Var x: Char; D Var x: Real;

Câu 7: Hãy cho biết kết xuất hình sau thực câu lệnh Writeln(‘16*2-3=’,16*2-3);

A 16*2-3= B 16*2-3=29 C 29 D 16*2-3 Câu 8: Câu lệnh cho phép ta nhập giá trị a từ bàn phím là:

A Writeln(a); B readln(a);

C Write(‘nhap gia tri cua a:’); D Write(a); Câu 9: Sau câu lệnh x:=5; x:=x*x; Giá trị biến x là:

A 5 B 10 C 15 D 25

Câu 10: Để gán giá trị 12 cho biến x ta dùng lệnh:

(64)

II TỰ LUẬN( 5ĐIỂM)

1 Vieát chương trình nhập vào số x in x2 (2.5đ)

2 Viết chương trình nhập vào số a Nếu a>= 10 in a3 ngược lại in a (2.5đ)

ĐỀ 2:

II.

TRẮC NGHIỆM: (5 điểm):

Hãy khoanh trịn chữ đứng trước câu trả lời đúng:

Câu 1: Để gán giá trị 12 cho biến x ta dùng lệnh:

A x:12; B x:= 12; C x = 12; D x =: 12; Câu 2: Để khai báo biến x thuộc kiểu số thực ta khai báo:

A Var x: Real; B Var x: String; C Var x: integer; D Var x: Char; Câu 3: Câu lệnh cho phép ta nhập giá trị a từ bàn phím là:

A Write(a); B readln(a);C Writeln(a); D Write(‘nhap gia tri cua a:’); Câu 4: Biểu thức toán học

6

5 12

 



viết dạng biểu thức Pascal là:

A 12-5/4+6-2 B (12-5)/(4+6)-2C (12-5-2)/(4+6)D (12-5)/(4+6-2)

Câu 5: Hãy cho biết kết xuất hình sau thực câu lệnh Writeln(‘16*2-3=’,16*2-3);

A 16*2-3=29 B 16*2-3= C 29 D 16*2-3 Câu 6: Sau câu lệnh x:=5; x:=x*x; Giá trị biến x là:

A 15 B 10 C 25 D 5

Câu 7: Khi ta khai báo biến x có kiểu integer phép gán sau hợp lệ?

A x:= 5000000; B x:= 1.23; C x:= 200; D x:= ‘tin_hoc’; Câu 8: Caáu trúc chung chương trình gồm phần?

A 2 phần B 4 phần C 3 phần D 1 phần Câu 9: Ngơn ngữ lập trình là:

A một thuật tốn B ngơn ngữ dùng để viết ngơn ngữ máy tính

C mơi trường lập trình D chương trình máy tính Câu 10: Trong từ sau, từ khơng phải từ khố?

A End B Begin C Program D Ct_dau_tien

II TỰ LUẬN( 5ĐIỂM)

3 Viết chương trình nhập vào số x in x2 (2.5đ)

4 Viết chương trình nhập vào số a Nếu a>0 in a4 ngược lại xuất thông báo bạn nhập sai (2.5đ)

Đáp án:

ĐỀ 1:

1 A. 2 C. 3 A. 4 C. 5 B. 6 D. 7 B. 8 B. 9

D. 10 D.

(65)

1 B. 2 A. 3 B. 4 B. 5 A. 6 C. 7 C. 8 D. 9

D. 10 D.

Ngày soạn :25/12/2008

Ti

ết 37- tuần 17,18

Ngày dạy : 27/12/2008

Bài 7:

Câu lệnh lặp

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

- BiÕt nhu cÇu cÇn có câu lệnh lặp ngôn ngữ lập trình

- Biết ngơn ngữ lập trình dùng cấu trúc lặp để dẫn máy tính thực lặp lặp lại cơng việc số lần

- Hiểu hoạt động câu lệnh lặp với số lần biết trớc for …trong pascal 2 Kỹ năng: Viết đợc lệnh for….rong số tình đơn giản.

3.Thái độ: Thái độ học tập nghiêm túc, tích cực làm dạng tập ứng dụng. II/ Chuẩn bị:

- Sách giáo khoa, giáo án, tài liệu tin học có liên quan - Đọc tài liệu nhà trớc

III Tiến trình lên lớp: 1 Tổ chøc.

2 KiÓm tra

- KiÓm tra sù chn bÞ cđa häc sinh

- ? Trình bày cấu trúc câu lệnh rẽ nhánh pascal, nêu ý nghĩa hoạt động câu lệnh? - ? Mơ tả thuật thốn tính tổng 100 số tự nhiên đầu tiên?

3 Bµi míi :(35’)

Hoạt động giáo viên Và HS Nôị dung

Hoạt động 1: Các công việc phải thực nhiều lần (5’) ?Hàng ngày thờng phải làm s vic

lặp lặp lại số lần, em h·y lÊy vÝ dơ vỊ mét sè viƯc hµng ngày em phải làm

- HS: em lấy mét sè vÝ dơ

- GV: Ghi ví dụ học sinh lên bảng - HS: em khác lấy thêm số ví dụ ? Qua ví dụ bạn vừa lấy bảng công việc biết trớc số lần lặp lặp lại công việc cha biết số lần lặp lại nó?

- HS: Tách ví dụ thành hai loại (một loại biết trớc số lần lặp loại cha biêt số lần lặp ) - GV: Nhận xét chốt lại

1 Các công việc phải thực hiền nhiều lần - Công việc trớc số lần lặp lại: học thuộc hết bài,

- Công việc biết trớc số lần lặp: học sáng tiết, ngày tập thể dục buổi sáng, đánh ngày lần,

=> Để cho máy tính thực công việc, nhiều trờng hợp viết chơng trình máy tính phải viết lặp lại nhiều câu lệnh thực phép tính nh

VD1: Để tính số tự nhiên đầu tiªn ta cã thĨ viÕt nh sau:

begin

I=0; Tong:=0;

I:=i+1; Tong:=Tong+i; I:=i+1; Tong:=Tong+i; I:=i+1; Tong:=Tong+i; I:=i+1; Tong:=Tong+i; I:=i+1; Tong:=Tong+i; Readln; end

Hoạt động 2: Câu lện lặp - lệnh thay cho nhiều lệnh (15) -HS: nghiên cứu ví dụ SGK - 56,57

- HS: Mơ tả lại thuật tốn, phân tích thuật tốn ? Qua hai ví dụ trên, em công việc đợc lặp i lp li?

-HS: Chỉ công việc lặp lại vd1 vd2 - GV: Kết luận

2 Câu lện lặp - lệnh thay cho nhiều lệnh VD1: Vẽ hình vuông giống

- tht to¸n (SGK T56,57)

VD2: Tính tổng 100 số tự nhiên - thuật toán: (đã nghiên cứu học số 5) => Kết luận: - Cáng mơ tả hoạt động lặp thuật tốn nh ví dụ đợc gọi cấu trúc lặp

(66)

Hoạt động 3: Ví dụ câu lệnh lặp (15) - GV: Trình bày cấu trúc vòng lặp For …… to……

…………

- HS: Ghi cấu trúc vòng lặp vào

GV: Giải thích thành phần cấu trúc lƯnh

-HS: Nghe, ghi chÐp

GV: vËn dơng câu lệnh viết vòng lặp cho ví dụ phần

Var i, tong: integer; Begin

Tong:=0;

For i: = to Tong:= tong + i; Write(‘tong=’,tong); Readln;

End

3 VÝ dơ vỊ câu lệnh lặp

- Trong pascal câu lệnh lặp có dạng: +Câu lệnh lặp dạng tiến:

For <bin đếm>:= <giá trị đầu> to <giá trị cuối> do <câu lệnh>;

Trong đó: for, to, do từ khố, Biếnđếm biến đơn có kiểu ngun (có thể kiểu kí tự kiểu đoạn con)

Giá trị đầu, giá trị cuối số cụ thể biểu thức có kiểu kiểu với biến đếm, giá trị cuối phải lớn giá trị đầu

Câu lệnh có thể câu lệnh đơn câu lệnh kép

- Câu lệnh đợc thực nhiều lần, lần thực câu lệnh lần lặp sau lần lặp biến đếm tự động tăng lên đơn vị, tăng giá trị biến đếm lớn giá trị cuối vịng lặp đợc dừng lại

4 Cđng cố: (2) Giáo viên hệ thống lại toàn nội dung bµi häc 5 H íng dÉn häc ë nhµ

- Học theo sách giáo khoa ghi, Ơn lại kiến thức học luyện viết, làm làm lại nhiều lần

- Học kĩ lí thuyết, viết chơng trình tính tông 100 số tự nhiên, N số tự nhiên - Làm tập lại,

- c bi để sau học

-o0o -Ngày soạn :25/12/2008

Tiết 38- tuần 19

Ngày dạy : 27/12/2008

Bài 7:

Câu lệnh lặp( tiếp)

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

- HiĨu cÊu trúc câu lệnh ghép

2 Kỹ năng: biết kết hợp câu lệnh ghép câu lệnh lặp for vào giải số toán

3 Thái độ Thái độ học tập nghiêm túc, tích cực làm dạng tập ứng dụng. II/ Chuẩn bị:

III Tiến trình lên lớp: 1 Tỉ chøc.

2 KiĨm tra

- KiĨm tra sù chn bÞ cđa häc sinh

- ? Trình bày cầu trúc câu lệnh lặp pascal, nêu ý nghĩa thành phần cấu tróc?

3 Bµi míi : (35’)

Hoạt động 1: Ví dụ câu lệnh lặp (15’) -GV: Trình bày cấu trúc câu lệnh lặp lùi

pascal

For …… downto……….do

3 VÝ dơ vỊ câu lệnh lặp (tiếp) - Cấu trúc câu lệnh lỈp lïi:

(67)

HS: Ghi chÐp cÊu tróc vµo vë

GV: Giải thích hoạt động câu lện - HS: Đọc tìm hiểu chơng trình

- HS: em đứng chỗ phân tích hoạt động ví dụ

- HS: Các em khác thảo luận cho ý kiến - GV: cho chạy chơng trình mẫu gõ trớc máy, yêu cầu học sinh quan sát kết

- GV: Giải thích kết chơng trình

- HS: Đọc tìm hiểu chơng trình

- HS: mt em đứng chỗ phân tích hoạt động ví d

- HS: Các em khác thảo luận cho ý kiến - GV: Trình bày cấu trúc câu lÖnh ghÐp - HS: Nghe, ghi chÐp

- GV: cho chạy chơng trình mẫu gõ trớc máy, yêu cầu học sinh quan sát kết

- GV: Giải thích kết chơng trình

- Câu lệnh đợc thực nhiều lần, lần thực câu lệnh lần lặp sau lần lặp biến đếm tự động giảm đi1 đơn vị, giảm giá trị biến đếm nhỏ giá trị đầu vịng lặp đợc dng li

-số lần lặp = giá trị cuối-giá trị đầu+1

=> for cấu trúc lặp với số lần lặp biết tr-ớc

- Ví dụ (SGK-58) in hình thứ tự lần lặp Program lap;

Var i: integer; Begin

For i:=1 to 10

Writeln(‘day la lan lap thu’, i); Readln;

End

- VD4 (SGK-58) Viết chơng trình đa hình chữ theo hình trứng r¬i

Program trung_roi; Uses crt;

Var i: integer; Begin

Clrscr;

For i:=1 to 10 begin

Writeln(‘0’); delay(100); end;

Readln; End

- Tập hợp câu lệnh đợc đặt cặp từ khoá begin end; đợc gọi câu lệnh ghép Hoạt động 2: Tính tổng tích câu lệnh lặp (20)

- GV: Đa đề lên bng

- HS: em lên bảng làm vd5, em lên làm vd6 (mô tả thuật toán) (5)

ở dới lớp cá cem làm theo nhóm, dÃy làm bài, dÃy làm vd5

- HS: Đại diện dÃy nhận xét thuật toán bảng

-GV: Giỳp HS sa li ỳng thut toỏn

-HS: em lên bảng viết chơng trình cho (5)

- HS: di hoạt động theo nhóm, chia dãy nh ban đầu

- HS: đại diện dãy nhận xét viết bảng

GV: Giúp học sinh sửa chơng trình cho chạy chơng trình máy

- HS: Quan sát kết

4 Tính tổng tích câu lệnh lặp Ví dụ Tính tổng N số tự nhiên (Chơng trình SGK)

VÝ dơ TÝnh day tha cđa N sè tự nhiên (Chơng trình SGK)

4 Củng cố:

- Giáo viên hệ thống lại toàn néi dung bµi häc

- HS đọc ghi nhớ SGK, giáo viên tổng kết đánh giá buổi học. 5 H ớng dẫn nhà:

- Học theo sách giáo khoa ghi, Ôn lại kiến thức học luyện viết, làm làm lại nhiều lần

- Häc kÜ lÝ thuyÕt, viÕt chơng trình tính tông 100 số tự nhiên, N số tự nhiên - Về nhà làm tập trang 60-61.

- Đọc để sau học

(68)

Ngày dạy : 02/01/2009

Bài tập

I/ Mục tiêu:

1 Kiến thức Củng cố kiến thức vòng lặp với số lần biết trớc câu lệnh ghép

2 K năng: Vận dụng vòng lặp for …….to…….do câu lệnh ghép viết số toán đơn giản

3 Thái độ Thái độ học tập nghiêm túc, tích cực làm dạng tập ứng dụng.

III Tiến trình lên líp: 1 Tỉ chøc.

2 KiĨm tra

- ? Sử dụng vòng lặp for viết chơng trình tính tổng 10 số tự nhiên đầu tiên? 3 Bài mới:

Hot ng ca giỏo viên Và HS Nôị dung

Hoạt động 1: Bài tập dạng lí thuyết (10’) GV: Đa đề toán, yêu cầu học sinh nghiên

cøu theo nhãm

-HS: Hoạt động theo nhóm tìm câu trả lời - HS: Đại diện hai nhóm trình bày kết nhóm

-GV: NhËn xÐt kÕt qu¶ ci cïng

- GV: Đa tập lên bảng, yêu cầu học sinh đứng chỗ trả lời

- HS: Một học sinh đứng chỗ trả lời tập học sinh khác đứng chỗ nhận xét

- GV: KÕt luËn kÕt qu¶ cđa bµi

-GV: GV: Đa đề tốn, u cầu học sinh nghiên cứu theo nhóm

-HS: Hoạt động theo nhóm tìm câu trả lời - HS: Đại diện hai nhóm trình bày kết nhóm

- GV: NhËn xÐt

Bµi 1: SGK (T60)

Bµi 2: SGK (T60)

- Câu lệnh lặp có tác dụng dẫn cho máy tính thực lặp lại câu lệnh hay nhóm câu lệnh với số lần định

- Câu lệnh lặp làm giảm nhẹ công sức ngời viết chơng trình

Bài SGK (T60)

- Điều kiện cần kiểm tra câu lệnh lặp for … giá trị biến đếm phải nằm đoạn [giá trị đầu, giá trị cuối ], thoả mãn điều kiện câu lệnh đợc thực hiện, không thoả mãn câu lệnh bị bỏ qua

Hoạt động 2: Bài tập dạng thực hành (25’) GV: Đa đề toán yêu cầu học sình

đứng vị trí để trả lời tập

-HS: 1em đứng vị trí trả lời, em khác nhận xét

- GV: Nhận xét kết câu trả lời bạn - GV: Đa tập

- HS: Suy luËn kÕt qu¶ theo lÝ thuyÕt - GV: Ghi kÕt suy luận học sinh

lên bảng

- HS: gõ chơng trình vào máy chạy thử - HS: So sánh kết nhận đợc với kết

đã suy lận

- HS giải thích kết thu đợc - GV Đa tập

- HS: Làm việc theo nhóm, sau phút đại

Bµi SGK (T61)

Tất câu lệnh khơng hợp lệ vì: a) giá trị đầu lớn giá trị cuối

b) giá trị đầu giá trị cuối có kiểu số thực không kiểu với biến đếm

e) biến đếm có kiểu kiểu số thực nên khơng hợp lệ

Bµi SGK (T61)

Giá trị j sau lần lặp đợc tăng thêm đơn vị

2, 4, 6, 8, 10, 12

Bµi SGK (T 61)

(69)

diện nhóm lên báo báo kết - Các nhóm khác nhận xét

- GV: Giúp em hoàn thành thuật toán

A<-0, i<-1 Bíc 2: A<- 2\i(i+2) Bíc 3: i<-i+1

Bíc 4: nÕu i<=n quay vỊ bíc

Bớc 5: ghi kết A hình kết thúc thuật toán

4 Củng cố:

- Giáo viên hệ thống lại toàn nội dung học - Giáo viên nhận xét tiết học, rút kinh nghiƯm tiÕt häc

-5 H íng dÉn vỊ nhµ:

- Học kĩ lí thuyết, viết chơng trình tính tông 100 số tự nhiên, N số tự nhiên - về nhà viết chơng trình pascal SGK (T61)

******************************

Ngày soạn :29/12/2008 Tiết 40- tuần 20

Ngày dạy : 07/01/2009

Bµi tËp

I/ Mơc tiªu:

1 KiÕn thøc Cđng cè kiÕn thøc vòng lặp với số lần biết trớc câu lệnh ghÐp

2 Kỹ năng: Vận dụng vòng lặp for …….to…….do câu lệnh ghép viết số toán đơn giản

3 Thái độ Thái độ học tập nghiêm túc, tích cực làm dạng tập ng dng.

III Tiến trình lên lớp: 1 Tổ chức.

2 KiÓm tra

(70)

- ? Mét em lên bảng viết chơng trình pascal cho SGK (T61) 3 Bµi míi:

Hoạt động 1:Bài tập vận dụng - Giáo viên đa nội dung tp,

- HS phân tích toán tìm hớng gi¶i quyÕt

- Gv: hớng dẫn học sinh cách làm viết chơng trình lên bảng yêu cầu học sinh đọc hiểu

- HS: đọc lại chơng trình giáo viên viết bảng tìm hiểu câu lệnh - GV: yêu cầu học sinh ng ti v trớ

diễn tả ý nghĩa chơng trình thông qua diễn tả công việc lệnh chơng trình

- GV: din tả lại lần để học sinh hiểu sâu v chng trỡnh

- Giáo viên đa nội dung tập, - HS phân tích toán tìm hớng giải

quyết

- GV: Đa công thøc tÝnh day thõa: day thõa = 1*2*3*4*5*….*n

- HS: dựa vào tập viết chơng trình cho toán (viết theo nhóm)

- i din ca nhóm đứng lên bảng trình bày kết Các nhóm khác nhận xét, rút kinh nghiệm

- GV: KÕt luận kết cuối

- Yêu cầu học sinh lên máy gõ chơng trình vào máy, lớp sửa lỗi có, cho chơng trình chạy thử, học sinh quan sát kết

- HS: chép lại chơng trình chạy vào vởi

Bµi tập 1: Nhập vào n số nguyên từ bàn phím,

t×m sè lín nhÊt d·y sè võa nhËp Program tim_max;

Uses crt;

Var i, n, smax, A : integer; Begin

Clrscr;

Writeln(‘nhap vao n’); readln(n); Smax:=-23768;

For i:= to n Begin

Writeln(‘nhap vao so thu ’,i); readln(A); If smax<A then smax:=A;

End;

Writeln(‘so lon nhat la’,A); readln End

Bài tập 2: Viết chơng trình tính day thừa n

số tự nhiên Program tinh_day_thua; Uses crt;

Var i, n : integer; kq: longint; Begin

Clrscr;

Writeln(‘nhap vao n’); readln(n); Kq:=1;

For i:= to n Kq:=kq*i;

(71)

4 Củng cố:

- Giáo viên hệ thống lại toàn nội dung học

- Nhấn mạnh ý nghĩa công dụng, cách sử dụng vòng lặp for - Nhận xét, rut kinh nghiƯm bi häc

5 H íng dÉn vỊ nhµ:

- Học kĩ lí thuyết, viết chơng trình tính tông 100 số tự nhiên, N số tự nhiên

- Häc sinh vỊ nhµ lµm bµi tËp:

tÝnh tỉng cđa n sè tự nhiên

Vit chng trình tìm xem có số dơng n số nhập vào từ bàn phím Đọc để sau học

-o0o -Ngày soạn :06/01/2009 Tiết 41- tuần 21

Ngày dạy : 12/01/2009

thực hành

sử dụng lệnh lặp for do I/ Mơc tiªu:

1 Kiến thức Vận dụng kiến thức vòng lặp for… do, câu lệnh ghép vit chng trỡnh

2 Kỹ

Viết đợc chơng trình có sử dụng vịng lặp for … do; Sử dụng đợc câu lệnh ghép;

Rèn luyện kỹ đọc hiểu chơng trình có sử dụng vòng lặp for …

3 Thái độ: Thái độ học tập nghiêm túc, tích cực làm tập thực hành.

II/ ChuÈn bÞ:

- Sách giáo khoa, giáo án, tài liệu tin học có liên quan Phòng máy - Đọc tài liệu nhà trớc

2 KiĨm tra

- KiĨm tra chuẩn bị học sinh 3 Bài míi :

Chúng ta nghiên cứu lý thuyết vòng lặp for … để biết vòng lặp chạy nh hơm vào tiết thực hành Giáo viên ghi tên học lên bảng

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

Hoạt động 1: Viết chơng trình cho tập cho nhà (15’) - GV: yêu cầu dãy gõ vào

Bµi 1: TÝnh tỉng cđa n sè tự nhiên

Program tinh_tong;

(72)

máy (10)

- HS: gõ chơng trình, chạy thử chơng trình, báo cáo kết

- GV: hỗ trợ học sinh trình thực hành

- Sau kết chạy chơng trình đúng, gv yêu cầu học sinh chữa làm nhà cho theo chơng trình chạy

Var i, n: integer; tong: longin; Begin

Clrscr; Tong:=0;

Writeln(‘Nhap vao so n’); readln(n); For i:=1 to n

Tong: = Tong+i;

Writeln(‘Tong cña’, n,’so tu nhien dautien la’,tong);

Readln;

End

2 Viết chơng trình tìm xem có số dơng n số nhập vào từ bàn phím

Program tinh_so_cac_so_duong;

Uses crt;

Var i,A, dem, n: integer; Begin

Clrscr; Dem:=0;

begin

writeln(‘nhap vao so thu’,i); readln(A); if A>0 then dem:=dem+1;

end;

Writeln(‘So cac so duong la’,dem); Readln;

End

Hoạt động 2: Bảng cửu chơng - GV: Đa nội dung tốn

- HS: Nghiªn cøu toán, tìm input output

- GV: a nội dung chơng trình lên hình, yêu cầu học sinh đọc hiểu chơng trình

- HS: đọc, phân tích câu lệnh tìm hiểu hoạt động chơng trình

- GV: yêu cầu học sinh đứng vị trí trình bày hoạt động chơng trình, nhóm khác tham gia phân tích

- HS: tham gia hoạt động giáo viên - GV: yêu cầu học sinh lập bảng hoạt

động chơng trình theo mẫu: Giả sử N=2:

Bớc i i<=10 Writeln(n,’.’,i,’=’,n*i) 1 2.1=2

- HS: nhóm lập bảng đại diện nhóm báo cáo kết

- GV: nhËn xÐt

- GV: cho ch¬ng trình chạy máy, yêu cầu học sinh quan sát kết

Bài 2: Viết chơng trình in hình bảng

nhõn ca mt s t đến 9, dừng hình để quan sát kết

Program Bang_cuu_chuong;

Uses crt;

Var i, n: integer; Begin

Clrscr;

Writeln(‘Nhap vao so n’); readln(n); Writeln(‘Bang nha’,n);

Writeln;

For i:=1 to 10

Writeln(n,’x’,i:2,’=’,n*i:3); Readln;

End

NhËn xét, rút kinh nghiệm tiết thực hành

6 Dặn dò học sinh nhà (1) nhà xem

tr-ớc thực hành SGK (T63) viết chơng trình in hình bảng cửu chơng từ đến

4 Cñng cè:

(73)

- Häc kÜ lÝ thuyết, viết chơng trình tính tông 100 số tự nhiên, N số tự nhiên - nhà xem trớc thực hành SGK (T63) viết chơng trình in hình bảng cửu

chng t đến

Ngày soạn :06/01/2009 Tiết 42- tuần 21

Ngày dạy : 15/01/2009

Thùc hµnh

I/ Mơc tiªu:

1 Kiến thức Vận dụng kiến thức vòng lặp for… do, câu lệnh ghép để viết chơng trình, tìm hiểu câu lệnh gotoxy(), where<>, lệnh for lng for

2 Kỹ

Viết chơng trình có sử dụng vòng lặp for do; Sử dụng câu lệnh ghép chơng trình;

Rốn luyện kỹ đọc hiểu chơng trình có sử dụng vòng lặp for … 3 Thái độ: Thái độ học tập nghiêm túc, tích cực làm thực hnh.

2 KiÓm tra

- KiÓm tra sù chuÈn bị học sinh 3 Bài mới:

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

Hoạt động 1: Làm đẹp hình kết lệnh gotoxy, where (20’) - Giáo viên cho chạy kết qu ca bi thc

hành Bang_cuu_chuong Yêu cầu học sinh quan sát kết nhận xét khoảng cách hàng, cột - HS: quan sát đa nhËn xÐt

- ? Có cách để khoảng cách hàng cột tăng lên?

- GV: Giới thiệu câu lệnh gotoxy where

- GV: yêu cầu học sinh mở chơng trình

Bang_cuu_chơng sửa lại chơng trình theo hình giáo viên - HS: gõ chơng trình vào máy, sửa lỗi

chính tả, chạy chơng trình, quan sát kết

- GV: yêu cầu học sinh quan sát kết

Bài sgk (T63)

a) Giíi thiƯu lƯnh gotoxy(), wherex - Gotoxy(a,b)

Trong đó: a số cột, b s hng

- ý nghĩa câu lệnh ®a trá vỊ cét a hµng b

- Wherex: cho biÕt sè thø tù cña cét, wherey cho biÕt sè thø tù cđa hµng

* Lu ý: Phải khai báo th viện crt trớc sử dụng hai lệnh

a) Chỉnh sửa chơng trình nh sau:

Program Bang_cuu_chuong;

Uses crt;

(74)

và so sánh với kết chơng trinh cha dùng lệnh gotoxy(5, wherey) - HS: quan sát nhận xét

Writeln;

gotoxy(5, wherey);

End

Hoạt động 2: sử dụng lệnh For lồng for (28’) - GV: giới thiệu cấu trúc lệnh for lồng,

h-íng dÉn häc sinh c¸ch sư dơng lƯnh - HS: ghi chÐp cÊu tróc lĩnh hội - GV: đa nội dung chơng trình bµi thùc

hành lên hình, u cầu học sinh đọc chơng trình, tìm hiểu hoạt động chơng trình

- HS: hoạt động theo nhóm, tìm hiểu hoạt động chơng trinh, đại diện nhóm báo cáo kết thảo luận

- GV: cho chạy chơng trình

- HS : quan sát kết hình

Bài SGK (T64)

- For <biến đếm1:= giá trị đầu> to <giá trị cuối> do

For <biến đếm 2:=giá trị đầu> to <giá trị cuố> do

< c©u lƯnh>;

Program Tao_bang;

Uses crt;

Var i,j: byte; Begin

Clrscr;For i:=1 to

BeginFor j:=0 to Writeln(10*i+j:4); Writeln;

End;

Readln;

End

Hoạt động 3: kết thúc (2’)

HS: t¾t chơng trình ứng dụng, tắt máy, tắt nguồn

4 Củng cố:

- Giáo viên hệ thống lại toàn bé néi dung bµi häc - NhËn xÐt rót kinh nghiƯm giê thùc hµnh

5 H íng dÉn vỊ nhµ:

- học sinh nhà sử dụng lệnh gotoxy để chỉnh sửa lại thực hành số cho kết in hình đẹp

(75)

Ngày soạn :15/02/2009 Tiết 43+44+45- tuần 22+23

Ngày dạy : 20/02/2009

học vẽ hình với phần mềm geogebra. I/ Mơc tiªu:

 Học sinh biết đợc ý nghĩa hình học geogebra Làm quen với phần mềm nh khởi động, công cụ, nút lệnh

 Nắm đợc cách vẽ hình sử dụng phần mềm geogebra  Hứng thú u thích mơn học

II/ Chn bị:

2 KiĨm tra

- KiĨm tra sù chn bÞ cđa häc sinh 3 Bµi míi:

Hoạt động 1: Giới thiệu phần mềm geogebra Cho học sinh đọc thông tin SGK

? Em biết phần mềm geogebra Nếu biết hÃy nêu vài ví dụ

? Phn mm geogebra có đặc điểm gì? Giáo viên giới thiệu lại cho học sinh nghe

1 Em biết GeoGebra?

(76)

vẫn giữ đợc mối quan hệ đối t-ợng

Hoạt động2: Làm quen với phần mềm Geogebra Giáo viên cho học sinh quan sát SGK giới thiệu bớc

Để ng ta lm nh th no?

Ngoài cách có cách không?

Màm hình phần mềm GeoGebra tiếng Việt có phần nào?

Em hiểu Bảng chọn gì?

Giáo viên chó ý cho HS

Thanh cơng cụ ? Hãy nêu lệnh (có thể cho HS lên bảng vẽ)

Gi¸o viên giới thiệu công cụ làm việc cho học sinh

Để chọn công cụ hÃy nháy chuột lên biểu t-ợng công cụ

Mỗi nút công cụ có nhiều công cụ nhóm Nháy chuột vào nút nhỏ hình tam giác phía dới biểu tợng làm xuất công cụ khác

Cỏc cụng c liờn quan đến đối tợng điểm

2 Lµm quen víi phÇn mỊm GeoGebra tiÕng ViƯt

a) Khởi động

Nháy chuột biểu tợng để khởi động chơng trỡnh

b) Giới thiệu hình GeoGebra tiếng ViƯt

Màn hình làm việc phần mềm bao gồm bảng chọn, công cụ khu vực th hin cỏc i tng

Bảng chọn hệ thống lệnh phần mềm Geogebra Với phần mềm Geogebra tiếng Việt em thấy lệnh b»ng tiÕng ViÖt

Chú ý lệnh bảng chọn khơng dùng để vẽ đối tợng-hình Các lệnh tác động trực tiếp với đối tợng hình học đợc thực thông qua công cụ công cụ phần mềm

 Thanh công cụ phần mềm chứa công cụ làm việc Đây cơng cụ dùng để vẽ, điều chỉnh làm việc với đối tợng

- Khi nháy chuột lên nút lệnh ta thấy xuất công cụ khác nhóm

- Mỗi cơng cụ có biểu tợng riêng tơng ứng Biểu tợng cho biết công dụng công c ú

c) Giới thiệu công cụ làm viƯc chÝnh

 Cơng cụ di chuyển có ý nghĩa đặc biệt khơng dùng để vẽ khởi tạo hình mà dùng để di chuyển hình Với cơng cụ này, kéo thả chuột lên đối tợng (điểm, đoạn, đờng, ) để di chuyển hình Công cụ dùng để chọn đối tợng thực lệnh điều khiển thuộc tính đối tợng

(77)

Các công cụ liên quan đến đoạn, đờng thẳng

khác, nhấn phím ESC để chuyển cơng cụ di chuyển

 Các công cụ liên quan đến đối tợng điểm

Công cụ dùng để tạo điểm Điểm đợc tạo điểm tự mặt phẳng điểm thuộc đối t-ợng khác (ví dụ đờng thẳng, đoạn thẳng) Cách tạo: chọn cơng cụ nháy chuột lên điểm trống hình nháy chuột lên đối tợng để tạo điểm thuộc đối tợng

Công cụ dùng để tạo điểm giao hai đối tợng có mặt phẳng Cách tạo: chọn cơng cụ lần lợt nháy chuột chọn hai đối tợng có mặt phẳng

Cơng cụ dùng để tạo trung điểm (đoạn thẳng nối) hai điểm cho trớc: chọn công cụ nháy chuột hai điểm để tạo trung điểm

 Các công cụ liên quan đến đoạn, đ-ờng thẳng

Các công cụ , , dùng để tạo đờng, đoạn, tia qua hai điểm cho tr-ớc Thao tác nh sau: chọn cơng cụ, sau nháy chuột chọn lần lợt hai điểm hình

Cơng cụ tạo đoạn thẳng qua điểm cho trớc với độ dài nhập trực tiếp từ bàn phím

Thao tác: chọn cơng cụ, chọn điểm cho trớc, sau nhập giá trị số vào cửa sổ có dạng:

Nháy nút áp dụng sau nhập xong độ dài đoạn thng

(78)

Các công cụ tạo mối quan hƯ h×nh häc

Các cơng cụ liên quan đến hình trịn

häc

- Cơng cụ dùng để tạo đờng thẳng qua điểm vuông góc với đờng đoạn thẳng cho trớc

- Thao tác: chọn cơng cụ, sau lần lợt chọn điểm, đờng (đoạn, tia) ngợc lại chọn đờng (đoạn, tia) chọn điểm - Công cụ tạo đờng thẳng song song với đờng (đoạn) cho trớc qua điểm cho trớc

Thao tác: chọn cơng cụ, sau lần lợt chọn điểm, đờng (đoạn, tia) ngợc lại chọn đờng (đoạn, tia) chọn điểm - Công cụ dùng để vẽ đờng trung trực đoạn thẳng hai điểm cho trớc

Thao tác: chọn công cụ, sau chọn đoạn thẳng chọn hai điểm cho trớc mặt phẳng

- Công cụ dùng để tạo đờng phân giác góc cho trớc Góc xác định ba điểm mặt phẳng

Thao tác: chọn cơng cụ sau lần lợt chọn ba điểm mặt phẳng Điểm chọn thứ hai đỉnh góc

 Các cơng cụ liên quan đến hình trịn

(79)

- Cơng cụ dùng để vẽ hình tròn qua ba điểm cho trớc Thao tác: chọn cơng cụ, sau lần lợt chọn ba điểm - Cơng cụ dùng để tạo nửa hình trịn qua hai điểm đối xứng tâm

- Thao tác: chọn cơng cụ, chọn lần lợt hai điểm Nửa hình trịn đợc tạo phần hình trịn theo chiều ngợc kim đồng hồ từ điểm thứ đến điểm thứ hai

- Công cụ tạo cung trịn phần hình trịn xác định trớc tâm hình trịn hai điểm cung trịn

- Thao tác: Chọn cơng cụ, chọn tâm hình trịn lần lợt chọn hai điểm Cung tròn xuất phát từ điểm thứ đến điểm thứ hai theo chiều ngợc chiều kim đồng hồ

- Cơng cụ xác định cung trịn qua ba điểm cho trớc Thao tác: chọn công cụ sau lần lợt chọn ba điểm mặt phẳng

 Các cơng cụ biến đổi hình học

- Công cụ dùng để tạo đối t-ợng đối xứng với đối tt-ợng cho trớc qua trục đờng đoạn thẳng - Thao tác: Chọn công cụ, chọn đối tợng cần biến đổi (có thể chọn nhiều đối tợng cách kéo thả chuột tạo thành khung chữ nhật chứa đối tợng muốn chọn), sau nháy chuột lên đờng đoạn thẳng làm trục đối xứng

- Công cụ dùng để tạo đối t-ợng đối xứng với đối tt-ợng cho trớc qua điểm cho trớc (điểm gọi tâm đối xứng)

(80)

đối xứng

d) C¸c thao t¸c víi tƯp

Mỗi trang hình vẽ đợc lu lại tệp có phần mở rộng ggb Để lu hình hãy nhấn tổ hợp phím Ctrl+S thực hiện lệnh Hồ sơ  Lu lại từ bảng chọn Nếu lần lu tệp, phần mềm yêu cầu nhập tên tệp Gõ tên tệp ti v trớ

File name nháy chuột vào nót Save.

Để mở tệp có, nhấn tổ hợp phím

Ctrl+O thực lệnh Hồ sơ  Mở Chọn tệp cần mở gõ tên File name, sau nháy chuột vo nỳt Open.

e) Thoát khỏi phần mềm

Nháy chuột chọn Hồ sơ Đóng nhÊn tỉ hỵp phÝm Alt+F4.

4 Cđng cè:

- Giáo viên hệ thống lại toàn nội dung bµi häc

Ngày soạn :19/02/2009 Tiết 46+47+48 - tuần 23

Ngày dạy : 22/02/2009

Thực hành học vẽ hình với phần mềm geogebra I/ Mơc tiªu:

 Học sinh nắm đợc đối tợng phần mềm hình học Geogebra Hiểu rõ đợc đối tợng danh sách đối tợng hình

 Vận dụng đợc vào vẽ hình thực tế

 Yªu thích môn học Có ý thức bảo vệ máy tính sư dơng

II/ Chn bÞ:

2 KiÓm tra

- KiÓm tra sù chuÈn bị học sinh 3 Bài mới:

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

Hoạt động1: Khái niệm đối tợng

? Em hiểu đối tợng hình học? a) Khái niệm đối tợng hình học

Một hình hình học bao gồm nhiều đối t-ợng Các đối tt-ợng hình học bao gồm: điểm, đoạn thẳng, đờng thẳng, tia, hình trịn, cung trịn

Hoạt động 2: Đối tợng tự đối tợng phụ thuộc

(81)

biÕt ý nghÜa cña nã

Một đối tợng khơng phụ thuộc vào đối tợng khác đợc gọi đối tợng tự Các đối tợng lại gọi đối tợng phụ thuộc Nh đối tợng hình học phần mềm Geogebra chia thành hai loại tự hay phụ thuộc

Hiện ẩn danh sách đối tợng hình

Thay đổi thuộc tính

Em đợc làm quen với khái niệm quan hệ đối tợng

Sau vài ví dụ:  Điểm thuộc đờng thẳng  Đờng thẳng qua hai điểm

Cho trớc hai điểm Vẽ đờng thẳng qua hai điểm Chúng ta có quan hệ "đi qua" Trong trờng hợp đờng thẳng có quan hệ phụ thuộc vào hai điểm cho tr-ớc

 Giao hai đối tợng hình học

Cho trớc hình trịn đờng thẳng Dùng công cụ để xác định giao đờng thẳng đờng tròn Chúng ta có quan hệ "giao nhau" Giao điểm, có, thuộc hai đối tợng ban đầu đờng tròn đờng thẳng

c) Danh sách đối tợng hình

Phần mềm Geogebra cho phép hiển thị danh sách tất đối tợng hình học có trang hình

Dïng lƯnh HiĨn thÞ  Hiển thị danh sách

i tng hin/n khung thụng tin ny

trên hình

d) Thay đổi thuộc tính đối tợng

Các đối tợng hình có tính chất nh tên (nhãn) đối tợng, cách thể kiểu đ-ờng, màu sắc,

Sau vài thao tác thờng dùng để thay đổi tính chất đối tợng

 ẩn đối tợng: Để ẩn đối tợng, thực thao tác sau:

1 Nháy nút phải chuột lên đối tợng; 2 Huỷ chọn Hiển thị đối tợng trong

b¶ng chän:

 ẩn/hiện tên (nhãn) đối tợng: Để làm ẩn hay tên đối tợng, thực thao tác sau:

1 Nháy nỳt phi chut lờn i tng

trên hình;

2 Huỷ chọn Hiển thị tên bảng

chän

 Thay đổi tên đối tợng: Muốn thay đổi tên đối tợng, thực thao tác sau:

1 Nháy nút phải chuột lên i tng

trên hình;

(82)

chän:

Sau nhập tên hộp thoại:

3 Nháy nút áp dụng để thay đổi,

nháy nút Huỷ bỏ không muốn đổi tên

 Đặt/huỷ vết chuyển động đối t-ợng: Chức đặt vết đối tợng chuyển động có ý nghĩa đặc biệt phần mềm "Toán học động" Chức đợc sử dụng toán dự đốn quĩ tích khảo sát tính chất hình đối tợng khác chuyển động

Để đặt/huỷ vết chuyển động cho đối t-ợng hình thực thao tác sau:

1 Nháy nút phải chuột lên đối tợng; 2 Chọn Mở dấu vết di chuyển

Để xoá vết đợc vẽ, nhấn tổ hợp phím

Ctrl+F.

 Xoá đối tợng: Muốn xoá hẳn đối tợng, ta thực thao tác sau:

1 Dùng công cụ chọn đối tợng rồi nhấn phím Delete

2 Nháy nút phải chut lờn i tng

và thực lệnh Xoá

3 Chọn công cụ công cụ nháy chuột lên đối tợng muốn xoá

4 Củng cố:

- Giáo viên hệ thống lại toµn bé néi dung bµi häc

- Häc kÜ lÝ thuyÕt,

(83)

Giảng ngày: Tiết 41: Bài thực hành 5: sử dụng lệnh lặp for do I/ Mục tiêu:

1 Kiến thức Vận dụng kiến thức vòng lặp for… do, câu lệnh ghép để viết chơng trình 2 Kỹ

Viết đợc chơng trình có sử dụng vòng lặp for … do; Sử dụng đợc câu lệnh ghép;

Rèn luyện kỹ đọc hiểu chơng trình có sử dụng vịng lặp for …

3 Thái độ: Thái độ học tập nghiêm túc, tích cực làm tập thực hành. II/ Chuẩn bị:

III Tiến trình lên líp: 6. Tỉ chøc.

7 KiĨm tra

- KiĨm tra sù chn bÞ cđa häc sinh Bµi míi :

Chúng ta nghiên cứu lý thuyết vòng lặp for … để biết vịng lặp chạy nh hơm vào tiết thực hành Giáo viên ghi tên học lên bảng

Hoạt động 1: Viết chơng trình cho tập cho v nh (15)

- GV: yêu cầu dÃy gõ vào máy (10)

- HS: gõ chơng trình, chạy thử chơng trình, báo cáo kết

- GV: hỗ trợ học sinh trình thực hành

- Sau kt qu chy chơng trình đúng, gv yêu cầu học sinh chữa làm nhà cho theo chơng trình chạy

Bµi 1: TÝnh tỉng n số tự nhiên Program tinh_tong;

Uses crt;

Var i, n: integer; tong: longin; Begin

Clrscr; Tong:=0;

Tong: = Tong+i;

Writeln(‘Tong cña’, n,’so tu nhien dautien la’,tong);

Readln; End

2 Viết chơng trình tìm xem có số d-ơng n số nhập vào từ bàn phím

Program tinh_so_cac_so_duong; Uses crt;

Var i,A, dem, n: integer; Begin

Clrscr; Dem:=0;

begin

writeln(‘nhap vao so thu’,i); readln(A); if A>0 then dem:=dem+1;

end;

Writeln(‘So cac so duong la’,dem); Readln;

End

(84)

- GV: Đa nội dung toán - HS: Nghiên cứu toán, tìm input

output

- GV: Đa nội dung chơng trình lên hình, yêu cầu học sinh đọc hiểu chơng trình

- HS: đọc, phân tích câu lệnh tìm hiểu hoạt động chơng trình

- GV: yêu cầu học sinh đứng vị trí trình bày hoạt động chơng trình, nhóm khác tham gia phân tích - HS: tham gia hoạt động giáo viên - GV: yêu cầu học sinh lập bảng hot ng

của chơng trình theo mẫu: Giả sử N=2:

Bíc i i<=10 Writeln(n,’.’,i,’=’,n*i)

1 2.1=2

- HS: nhóm lập bảng đại diện nhóm báo cáo kết

- GV: nhËn xét

- GV: cho chơng trình chạy máy, yêu cầu học sinh quan sát kết

Bi 2: Viết chơng trình in hình bảng nhân số từ đến 9, dừng hình để quan sát kết

Program Bang_cuu_chuong; Uses crt;

Clrscr;

Writeln;

For i:=1 to 10

End

NhËn xÐt, rót kinh nghiƯm tiÕt thùc hµnh

6 Dặn dị học sinh nhà (1 ) ’ nhà xem trớc thực hành SGK (T63) viết chơng trình in hình bảng cửu chơng từ đến

9. Cñng cố:

- Giáo viên hệ thống lại toàn néi dung bµi häc - NhËn xÐt, rót kinh nghiƯm tiÕt thùc hµnh

-10.H íng dÉn vỊ nhµ:

- Học kĩ lí thuyết, viết chơng trình tính tông 100 số tự nhiên, N số tự nhiên

- nhà xem trớc thực hành SGK (T63) viết chơng trình in hình bảng cửu chơng từ đến

(85)

Ngày soạn :06/01/2009 Tiết 51, 52- tuần 26

Ngày dạy : 15/01/2009

Bµi thùc hµnh 5: sư dụng lệnh lặp for do I/ Mục tiêu:

1 Kiến thức Vận dụng kiến thức vòng lặp for… do, câu lệnh ghép để viết chơng trình, tìm hiểu câu lệnh gotoxy(), where<>, lệnh for lồng for

2 Kỹ

Viết chơng trình có sử dụng vòng lặp for do; Sử dụng câu lệnh ghép chơng trình;

Rốn luyn k nng c hiểu chơng trình có sử dụng vịng lặp for … 3 Thái độ: Thái độ học tập nghiêm túc, tích cực làm thực hành. II/ Chuẩn bị:

(86)

III Tiến trình lên lớp: 1. Tỉ chøc.

2. KiĨm tra

3. Bµi míi :

Hoạt động 1: Làm đẹp hình kết lệnh gotoxy, where (20’) - Giáo viên cho chạy kết thực

hành Bang_cuu_chuong Yêu cầu học sinh quan sát kết nhận xét khoảng cách hàng, cột

- HS: quan sát đa nhận xét

- ? Có cách để khoảng cách hàng cột tăng lên?

- GV: Giới thiệu câu lệnh gotoxy where

- GV: yêu cầu học sinh mở chơng trình Bang_cuu_chơng sửa lại chơng trình theo hình giáo viên - HS: gõ chơng trình vào máy, sửa lỗi

chính tả, chạy chơng trình, quan sát kết

- GV: yêu cầu học sinh quan sát kết so sánh với kết chơng trinh cha dïng lƯnh gotoxy(5, wherey) - HS: quan s¸t vµ nhËn xÐt

Bµi sgk (T63)

a) Giíi thiƯu lƯnh gotoxy(), wherex - Gotoxy(a,b)

Trong đó: a số cột, b số hàng

- ý nghĩa câu lệnh đa trá vỊ cét a hµng b

- Wherex: cho biÕt sè thø tù cña cét, wherey cho biÕt sè thứ tự hàng

* Lu ý: Phải khai b¸o th viƯn crt tríc sư dơng hai lƯnh

a) Chỉnh sửa chơng trình nh sau: Program Bang_cuu_chuong; Uses crt;

Clrscr;

Writeln;

gotoxy(5, wherey);

End

Hoạt động 2: sử dụng lệnh For lồng for (28’) - GV: giới thiệu cấu trúc lệnh for lồng,

h-íng dÉn häc sinh c¸ch sư dơng lƯnh - HS: ghi chÐp cấu trúc lĩnh hội - GV: đa nội dung chơng trình thực

Bài SGK (T64)

(87)

hành lên hình, yêu cầu học sinh đọc chơng trình, tìm hiểu hoạt động chơng trình

- HS: hoạt động theo nhóm, tìm hiểu hoạt động chơng trinh, đại diện nhóm báo cáo kt qu tho lun

- GV: cho chạy chơng trình

- HS : quan sát kết hình

For<bin m 2:=giỏ tr u> to<giỏtr cuố>do

< c©u lƯnh>;

Program Tao_bang; Uses crt;

Var i,j: byte; Begin Clrscr;

For i:=1 to Begin

For j:=0 to Writeln(10*i+j:4); Writeln;

End; Readln; End Hoạt động 3: kết thỳc (2)

HS: tắt chơng trình ứng dụng, tắt máy, tắt nguồn

4. Củng cố:

- Giáo viên hệ thống lại toàn nội dung học - NhËn xÐt rót kinh nghiƯm giê thùc hµnh

5. H íng dÉn vỊ nhµ:

- học sinh nhà sử dụng lệnh gotoxy để chỉnh sửa lại thực hành số cho kết in hình đẹp

-Ngày soạn :07/03/2009 Tiết 53, 54- tuần 27

Ngày dạy : 10/03/2009

BÀI TẬP I Mơc tiªu:

- Viết đợc chơng trình Pascal có sử dụng vịng lặp While - Biết sử dụng câu lệnh ghép

- Rèn kỹ đọc hiểu chơng trình có sử dụng vịng lặp while

1 Giáo viên:

- Chuẩn bị số thuật toán chơng trình - Chuẩn bị máy tính,

2 Häc sinh:- Thùc hiƯn nhiƯm vơ vỊ nhµ cđa tiÕt tríc.

(88)

Bài 1: Lập trình tính tổng dùng lệnh lặp While Trong đú n số tự nhiên đợc nhập từ bàn phím.

1 1

1 ( )

2

A n Z

n

    

GIẢI

Program tinhA; Uses CRT; Var i, n: integer; tong: real;

BEGIN Clrscr;

write('cho so tu nhien n: '); Readln(n);tong:=0; i:=1; while i<= n

Begin

tong:= tong+ 1/i; i: = i+1;

End;

writeln(' Tong can tim la: ', tong:12:6); Readln;

END

Bài 2: Viết chương trình tìm ƯCLN(a,b) Biết a, b nhập từ bàn phím a,bZ

Giải Program timUCLN;

Uses Crt;

Var a,b,r,a1,b1: integer; BEGIN

ClrScr;

Write(‘Nhap so thu nhat, a= ‘); Readln(a); a1:= a; Write(‘Nhap so thu hai, = ‘); Readln(b); b1:= b; While a mod b <>

Begin

r:= a mod b; a: = b; b: = r; End;

Write (‘ Vay UCLN(‘, a1, ‘;’,b1,’)=’,b:2); Readln; END

Bài 3: Viết chương trình tìm BCNN(a,b) Biết a, b nhập từ bàn phím a,bZ

Giải Program timBCNN;

Uses Crt;

Var a,b,n,min,max,max1: integer; BEGIN

ClrScr;

(89)

Write(‘Nhap so thu hai, = ‘); Readln(b); b1:= b; If a>b then

Begin max: = a; min:=b; End Else Begin max:=b; min:= a; End; n:= 2; max1:=max;

While max mod <> Do Begin

max:= max1*n; inc(n); {n:=n+1} End;

Write (‘ Vay BCNN(‘, a, ‘;’,b,’)=’,max:2); Readln;END

Ngày soạn :12/03/2009 Tiết 55 - tuần 28

Ngày dạy : 17/03/2009

KIỂM TRA TIẾT I Mơc tiªu:

1 KiÕn thøc:

- Viết đợc chơng trình Pascal có sử dụng vòng lặp While - Hệ thống lại kin thc ó hc

- Khắc sâu nội dung vòng lặp Kỹ năng:

- Nhận dạng đợc số tập cụ thể - Biết sử dụng câu lệnh ghép

- Rèn kỹ đọc hiểu chơng trình có sử dụng vịng lặp Thái độ:

- Nghiªm tóc häc tập làm

1 Giáo viên: - Đề kiểm tra

- Chuẩn bị m¸y tÝnh,

2 Học sinh:- Xem trớc ó hc

III Tiến trình KIểM TRA: Đề thi:

đề 1:

Họ Tên:…………… Kiểm Tra tiết

Lớp:8a……… Tin học

(90)

Câu 1: Nêu khác lệnh lặp biết trước lặp chưa biết trước, cho ví dụ cụ thể(3đ) Cấu 2: Lập trình nhập vào số nguyên dương n tính tổng từ đến n( có kiểm tra điều kiện nhập)(5.5đ)

Đề 2:

Câu 1: Cho chương trình sau.(4.5đ) Program Tinh_Chuvi;

Const Pi:= 3.1416; Var cv: integer; r: real; Begin r = 5.5 cv =2*pi*r;

writeln (‘ Chu vi duong tron la:’,cv); readln

end.

a Tìm các lỗi chương trình? (1.5đ)

……… ……… ……… ……… ……… ……… b Viết lại chương trình cho (3đ

……… ……… ……… ……… ……… ……… Cấu 2: Lập trình nhập vào số ngun dương n tính tổng từ đến n( có kiểm tra điều kiện nhập)(5.5đ).

(91)

……… ……… ……… ……… ……… ……… ……… ……… ……… ……… ……… ……… ……… ………

Ngày soạn :12/03/2009 Tiết 56 - tuần 28

Ngày dạy : 21/03/2009

TIẾT 56:

LÀM VIỆC VỚI DÃY SỐ

I Mục tiêu:

- Học sinh biết khái niệm mảng chiều;

- Biết cách khai báo mảng, nhập, in, truy cập phần tử mảng; - Hiểu thuật tốn tìm số lớn nhất, nhỏ dãy số

II Phương pháp:

- Đặt vấn đề để học sinh trao đổi đưa nhận xét Tận dụng vốn hiểu biết “ cách tự nhiên học sinh

- Học sinh đọc SGK, quan sát tổng kết

III Chuẩn bị:

- Giáo viên: Phấn màu, sách, chuẩn bị thêm tập minh hoạ (nếu có) - Học sinh: sách, tập, viết

IV TIẾN TRÌNH DẠY HỌC

1- Kiểm tra cũ: … 2- Dạy mới: 3 Bai mới:

Hoạt động 1:Dãy số biến mảng

Hoạt động Thầy trò Nội dung ghi bảng

- Giới thiệu dãy số biến mảng liên quan đến hai nội dung quan trọng: Nhu cầu của biến

mảng ngơn ngữ lập trình thuật tốn tìm số lớn của dãy số.

- HS nghe giảng

Như em biết “thuật tốn tìm số lớn nhất của dãy số” tìm hiểu (ví dụ 6) Vì vậy, ta khơng đề cập đến việc giải nhiệm vụ ntn

- HS đọc ví dụ

Mục tiêu Gv dẫn đến nhu cầu cần có biến

(92)

mảng thơng qua ví dụ 1: Viết chương trình nhập điểm kiểm tra của HS lớp và sau in hình

- HS lắng nghe, theo dõi, ghi

+ Vì biến lưu giá trị nhất, để nhập điểm so sánh chúng, ta cần sử dụng nhiều biến, biến cho HS Trong Pascal ta cần nhiều câu lệnh khai báo nhập liệu như: Mỗi câu lệnh tương ứng với điểm HS HS trả lời …

+ Nếu số HS lớp nhiều đoạn khai báo đọc liệu chương trình dài … khó tránh khỏi nhầm lẫn, sai sót

- Vậy, ta sử dụng quy luật tăng hay giảm “số thứ tự” vài câu lệnh lặp để xử lí liệu cách đơn giản ntn ?

 Để giải vấn đề trên, hầu hết ngôn ngữ lập trình có kiểu liệu được gọi kiểu mảng.

+ Dữ liệu kiểu mảng ?

* Nhấn mạnh: Trong này, ta xét các mảng có phần tử kiểu số nguyên số thực

Ví dụ 1: (SGK)/ Tr 75

- Khai báo nhập liệu câu lệnh tương ứng với điểm HS:

Var Diem_1, Diem_2, Diem_3, … : real;

Read (Diem_1) ; Read (Diem_2) ; Read (Diem_3) ; …

- Ta sử dụng quy luật tăng hay giảm “số thứ tự” vài câu lệnh lặp để xử lí liệu cách đơn giản:

+ Với i = đến 100: Hãy nhập Diem_i; + Với i = đến 100: Hãy so sánh Max với Diem_i;

* Dữ liệu kiểu mảng:Là tập hợp hữu hạn các phần tử có thứ tự

+ Mọi phần tử có kiểu liệu gọi kiểu của phần tử.

Việc xếp thứ tự thực cách gán cho phần tử số:

+ Biến mảng: Là khai báo biến có kiểu liệu kiểu mảng

+ Giá trị biến mảng mảng (tức dãy số: nguyên - thực có thứ tự)

- Cách khai báo biến mảng ngôn ngữ lập trình khác nhau, ln cần rõ ?

- Cho HS đọc ví dụ, hướng dẫn cách khai báo ngơn ngữ Pascal:

Var Chieucao : array [1 50] of real; Var Tuoi : array [21 80] of integer;

=> Cách khai báo mảng Pascal ntn ?

2 Ví dụ biến mảng:

- Cách khai báo biến mảng ngơn ngữ lập trình khác nhau, cần rõ: tên biến mảng, số lượng phần tử, kiểu liệu chung của phần tử.

Ví dụ: (SGK)/ Tr 76

* Cách khai báo mảng Pascal:

Tên mảng : array [<chi số đầu> <chi số cuối>] of <kiểu liệu >;

Trong đó:

+ Chi số đầu chi số cuối: số nguyên hoặc biểu thức nguyên (Chi số đầu  chi số

(93)

- Từ ví dụ 1, GV dẫn dắt HS cách khai báo biến mảng:

Var Diem : array [1 50] of real;

+ Biến mảng có 50 phần tử đánh từ đến 50 Các phần tử “đặt tên” ntn ?

=> Cách khai báo sử dụng biến mảng có lợi ?

- Để thay nhiều câu lệnh nhập in liệu ra hình, ta dùng câu lệnh ?

( For …do )

- Để viết giá trị phần tử hình người ta kết hợp For …do với lệnh ? - Để giúp tiết kiệm nhiều thời gian cơng sức viết chương trình, thay phải viết 50 câu lệnh khai báo 50 câu lệnh nhập, ta cần viết câu lệnh đủ kết đạt Đưa cách khai báo cho HS rõ

=> HS tự khai báo nhiều biến mảng cho môn học ntn ?

- Sau mảng khai báo, làm việc với phần tử làm việc với biến thơng thường Vậy làm việc với biến thông thường ntn ?

* Lưu ý HS: Sử dụng cấu trúc For … phù hợp, dễ hiểu cấu trúc While…do biết trước số lần lặp

*

+ Kiểu liệu: integer real

* Ví dụ 2: (SGK)/ Tr 76.

- Khai báo biến mảng Diem sau: Var Diem : array [1 50] of real;

- Dùng câu lệnh lặp, thay nhiều câu lệnh nhập in liệu hình, như: For i:= to 50 readln ( Diem [ i ] );

- Để so sánh điểm HS với giá trị đó, ta cần câu lệnh lặp, như:

For i:= to 50

If Diem [ i ] > 8.0 then writeln ( ‘ Gioi ‘ );

- Để xử lí đồng thời laọi điểm mơn học, ta khai báo nhiều mảng:

Var DiemToan : array [1 50] of real; Var DiemVan : array [1 50] of real; Var DiemLi : array [1 50] of real;

hoặc:

Var DiemToan, DiemVan, DiemLi : array

[1 50] of real;

- Khi mảng khai báo, có thể làm việc với phần tử như: gán giá trị, đọc giá trị thực tính tốn với giá trị Ví dụ như:

A[ ]:= 5; A[ ]:= 8;

hoặc nhập liệu từ bàn phím câu lệnh:

For i:= to readln ( A [ i ] ); 4-Củng cố: Giáo viên hệ thống lại học.

5 Dặn dò: - Về nhà học bài;

- Làm Câu hỏi BTcòn lại: sgk/ Tr 79; - Chuẩn bị tiết sau: Bài thực hành 7.

-Ngày soạn :12/03/2009 Tiết 57 - tuần 28

Ngày dạy : 21/03/2009

LÀM VIỆC VỚI DÃY SỐ(tiết 2)

(94)

II Phương pháp:

- Đặt vấn đề để học sinh trao đổi đưa nhận xét Tận dụng vốn hiểu biết “ cách tự nhiên học sinh

- Học sinh đọc SGK, quan sát tổng kết

III Chuẩn bị:

- Giáo viên: Phấn màu, sách, chuẩn bị thêm tập minh hoạ (nếu có) - Học sinh: sách, tập, viết

IV TIẾN TRÌNH DẠY HỌC

1- Kiểm tra cũ: … 2- Dạy mới: 3 Bai mới:

Hoạt động 1: Tìm giá trị lớn nhỏ dãy số:

Hoạt động Thầy trò Nội dung ghi bảng

- GV hướng dẫn HS tìm hiểu lại thuật tốn tìm giá trị lớn nhất, nhỏ dãy số nguyên ( học Bài )

+ GV giải thích thuật tốn tìm giá trị lớn dãy số nguyên … Sau cho HS nhắc lại

+ Cho HS thảo luận, chỉnh sửa thuật tốn để tìm số nhỏ

- GV cho HS đọc ví dụ 3:

+ Để nhập số nguyên nhập vào, trước hết ta phải làm ?

+ Sau khai báo N, biến lưu số nhập vào phần tử biến mảng A Ngoài ra, cần khai báo thêm biến ?

- GV: Trình bày phần khai báo chương trình …

- GV cho HS đọc phần ghi nhớ

3 Tìm giá trị lớn nhỏ dãy số:

* Thuật tốn tìm giá trị lớn ( Max ) dãy số nguyên nhập từ bàn phím:

Bước 1: Nhập N dãy A1, … , An; Bước 2: Max  A1;

Bước 3: Với i từ đến N thực hiện: Nếu

Max < A1 Max  Ai;

Bước 4: Đưa hình giá trị Max rồi

kết thúc

Ví dụ 3: (SGK)/ Tr 78.

* Phần khai báo chương trình sau:

Program MaxMin; Uses crt;

Var i, n, Max, Min : integer;

A : array [1 100] of integer;

{Phần thân chương trình tương tự đây:}

Begin

Clrscr;

Write ( ‘ Hay nhap dai cua day so, N = ‘); readln (n);

Writeln ( Nhap cac phan tu cua day so: m’);

For i:= to n

Begin

Write ( ‘ a[ , i , ] = ‘); readln (a[ i ] ); End;

(95)

For i:= to n

Begin if Max < a[ i ] then Max:= a[ i ];

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

End;

Write ( ‘ So lon nhat la Max = ‘ Max); Write ( ‘ So nho nhat la Min = ‘ Min); readln (n);

End

** GHI NHỚ: (SGK)/ Tr 79.

4 Củng cố:Làm BT 1, 2/ SGK/ Tr 79

5 Dặn dò: Học Bài làmBTVN: 3, 4/SGK/ Tr 79.

Ngày soạn :21/03/2009 Tiết 59 + 60 - tuần 30

Ngày dạy : 06/04/2009

THỰC HÀNH I Mục tiêu:

- HiỂU thêm khai báo biến mảng - Rèn luyện kỹnnăng hoạt động độc lập

II Chuẩn bị:

- Giáo viên: Máy chiếu, mạng,các tập minh hoạ (nếu có) - Học sinh: sách, tập, viết

III TIẾN TRÌNH DẠY HỌC

1-Ổn định: (1’)

2- Kiểm tra cũ: (không) 3- Dạy mới:

Hoạt động 1: Cho học sinh trr lời các câu hỏi sau.

1 Có thể xem biến mảng biến đợc tạo từ nhiều biến có kiểu, nhng dới tên nhất.” Phát biểu hay sai?

2 Hãy nêu lợi ích việc sử dụng biến mảng chơng trình. 3 Các khai báo biến mảng sau Pascal hay sai:

a) var X: Array[10,13] Of Integer;

b) var X: Array[5 10.5] Of Real;

c) var X: Array[3.4 4.8] Of Integer;

d) var X: Array[10 1] Of Integer;

e) var X: Array[4 10] Of Real;

4 Câu lệnh khai báo mảng sau có đợc máy tính thực khơng?

var N: integer;

A: array[1 N] of real;

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

6 Đoạn chơng trình sau dùng để xếp lại dãy số đợc ghi mảng A[i], i = 1,2, , N, theo thứ tự tăng dần:

(96)

For j:=i to N do If A[i] > A[j] then

Begin Tg:=A[i]; A[i]:=A[j]; A[j]:=Tg; End;

Hãy kiểm tra tính đắn đoạn chơng trình Hoạt động 2: tiờ́n hành gỏ tập làm cho máy thực hiện.

Câu 1: làm tiết tập. Câu 2:

Tiếp tục cho học sinh làm các tập sau:

Cõu 1: Hãy viết chơng trình nhập số ngyên từ bàn phím ghi hình số lớn số theo hai cách: khơng sử dụng biến mảng sử dụng biến mảng

Cõu 2: Viết chơng trình sử dụng biến mảng để tính giá trị trung bình tổng N số nguyên đợc nhập vào từ bàn phím

Giải:

1 a) NÕu kh«ng sử dụng biến mảng, chơng trình dài nh sau:

uses crt;

var So_1, So_2, So_3, So_4, So_5, Max: integer; begin

clrscr;

write('Nhap so thu nhat: '); readln(So_1); write('Nhap so thu hai: '); readln(So_2); write('Nhap so thu ba: '); readln(So_3); write('Nhap so thu tu: '); readln(So_4); write('Nhap so thu nam: '); readln(So_5); Max:=So_1;

If Max<So_2 then Max:=So_2; If Max<So_3 then Max:=So_3; If Max<So_4 then Max:=So_4; If Max<So_5 then Max:=So_5; writeln('So lon nhat: ',Max); end.

b) Nếu sử dụng biến mảng, chơng trình ng¾n gän nh sau:

uses crt;

var i, Max: integer;

A: array[1 5] of integer; begin

clrscr;

for i:=1 to do

begin write('Nhap so thu ',i,':'); readln(A[i]) end; Max:=a[1];

for i:=2 to If Max<a[i] then Max:=a[i]; writeln('So lon nhat: ',Max);

end.

Lu ý Xem cách viết chơng trình ngắn gọn khơng sử dụng biến mảng Bài tập 9, Bài Tuy nhiên, cách viết khơng cho kết mong muốn sau nhập giá trị biến cần thực thao tác liệu khác

2 Viết chơng trình sử dụng biến mảng để tính giá trị trung bình tổng N số nguyên đợc nhập vào từ bàn phím

uses crt;

var N, i: integer; TB: real;

A: array[1 100] of real; begin

clrscr;

write(’Nhap so phan tu cua mang, n= ’); read(n); for i:=1 to n do

begin

(97)

end; TB:=0;

for i:=1 to n TB:=TB+a[i]; TB:=TB/n;

write(’Trung binh bang ’,TB); end.