giao an tin hoc 6 full 3cot chuan KTKN 2012

* Nhận xét : Để viết chương trình chỉ dẫn máy tính thực hiện các hoạt động lặp như trong các ví dụ trên, ta có thể sử dụng câu lệnh có dạng lặp với số lần chưa biết trước. Ví dụ [r]

(1)

PHÂN PHỐI CHƯƠNG TRÌNH TIN HỌC LỚP THCS

CẢ NĂM : 35 Tuần x Tiết = 70 Tiết HỌC KỲ I : 18 Tuần x Tiết = 36 Tiết HỌC KỲ II : 17 Tuần x Tiết = 34 Tiết HỌC KỲ I

Tuần tiết 1,2 Luyện gõ phím nhanh với Figer Break Out Tuần tiết 3,4 Bài Máy tính chương trình máy tính

Tuần tiết 5,6 Bài Làm quen với chương trình ngơn ngữ lập trình Tuần tiết 7,8 Bài thực hành 1.Làm quen với Turbo Pascal

Tuần tiết 9,10 Bài 3.Chương trình máy tính liệu

Tuần tiết 11,12 Bài thực hành 2.Viết chương trình để tính tốn Tuần tiết 13,14 Bài 4.Sử dụng biến chương trình

Tuần tiết 15,16 Bài thực hàh 3.Khai báo sử dụng biến

Tuần tiết 17 Bài tập

tiết 18 Kiểm tra tiết

Tuần 10,11 tiết 19,20,21,22 Bài 5.Từ tốn đến chương trình

Tuần 12 tiết 23,24 Bài tập

Tuần 13,14 tiết 25,26,27,28 Tìm hiểu thời gian với phần mềm Sun Time (2LT, TH) Tuần 15 tiết 29,30 Bài 6.Câu lệnh điều kiện

Tuần 16 tiết 31,32 Bài thực hành 4.Sử lệnh điều kiện IF THEN Tuần 17 tiết 33 Kiểm tra thực hành tiết

tiết 34 Ôn tập

Tuần 18 tiết 35 Ôn tập

tiết 36 Kiểm tra học kỳ I HỌC KỲ II

Tuần 19 tiết 37,38 Bài 7.Câu lệnh lặp

Tuần 21 tiết 41,42 Bài thực hành 5.Sử dụng câu lệnh For to Tuần 22,23,24 tiết 43,44,45,46,47,48 Học vẽ hình với phần mềm Geogebra (2LT,4TH) Tuần 25 tiết 49,50 Bài 8.Lặp với số lần chưa biết trước

Tuần 26 tiết 51,52 Bài thực hành 6.Sử dụng câu lệnh lặp While

Tuần 28 tiết 55 kiểm tra tiết

tiết 56 Bài 9.Làm việc với dãy số Tuần 29 tiết 57 Bài 9.Làm việc với dãy số

tiết 58 Bài tập

Tuần 30 tiết 59,60 Bài thực hành 7.Xử lý dãy số chương trình Tuần 31,32,33 tiết 61,62,63,64,65,66 Quan sát hình khơng gian với phần mềm Yenka Tuần 34 tiết 67 Kiểm tra tiết thực hành

tiết 68 Ôn tập

Tuần 35 tiết 69 Ôn tập

(2)

Tuần : Tiết 1:

Luyện gõ bàn phím nhanh với Finger Break Out A Mục tiêu :

1/kiến thức :

 Giúp học sinh hiểu tác dụng chương trình gõ nhanh xác  Giới thiệu cho HS cách vào thành phần chương trình 2/kỹ : cách khởi động, thoát khỏi phần mềm

3/thái độ học tập :nghiêm túc, ghi chép, chia tư sáng tạo B Chuẩn bị :

1 Giáo viên : - SGK, SGV, tài liệu, Giáo án - Đồ dùng dạy học

2 Học sinh : - Đọc trước

- SGK, Đồ dùng học tập C Tiến trình tiết dạy :

I ổn định tổ chức lớp : - Kiển tra sĩ số :

- Ổn định trật tự : II Kiểm tra cũ :

III Dạy mới :

Hoạt động GV Họat động HS Kiến thức cần đạt

Hoạt động : Giới thiệu phần mềm Finger break out G : Lớp em

được làm quen với phần mềm luyện gõ phím ?

G : Phần mềm Typing test giúp em rèn luyện kĩ ?

G : Giới thiệu mục đích

phần mềm

Finger break out

H : Trả lời phần mềm Typing test

H : Trả lời

1 Giới thiệu phần mềm

Mục đích phần mềm luyện gõ bàn phím nhanh xác

Hoạt động : Giới thiệu thành phần hình finger beak out G : Giới thiệu

biểu tượng chương trình G : Có thể mở rộng cách khởi

H : Nêu cách khởi động chương trình H : Lên máy chủ thực thao tác khởi động chương

2 Màn hình phần mềm a Khởi động phần mềm

(3)

động qua nút start làm mẫu

G : Nhấn ENTER (OK) để chuyển sang hình phần mềm

G : Ngón út tay trái gõ phím ?, ngón áp út phải gõ phím ? ngón tay trái gõ phím ? G : Khi khởi động khung trống chưa hiển thị

G : Mở Level giới thiệu mức khó khác trị chơi

G : Chọn mức chơi và nhấn start / space bar để bắt đầu

G : Theo em muốn dừng chơi làm ?

G : Muốn khỏi chương trình làm

trình

H : Quan sát hình để phần biệt thành phần hình

H : Nghiên cứu SGK để nắm chức ngón tay tương ứng với màu bàn phím

H : Trả lời theo câu hỏi G

H : Quan sát nắm vững cách chọn

H : Trả lời

b Giới thiệu hình

- Hình bàn phím vị trí trung tâm với phím có vị trí bàn phím Các phím tơ màu ứng với ngón tay gõ phím

- Khung trống hình bàn phím khu vực chơi

- Khung bên phải chứa lệnh thơng tin lượt chơi

c Thốt khỏi phần mềm

- Muốn dừng chơi, nháy chuột vào nút stop khung bên phải

(4)

? H : Trả lời IV.Củng cố kiến thức

? Nêu cách khởi động thoát khỏi chương trình finger break out ? Màn hình finger break out có thành phần ? H : Nhắc lại kiến thức trọng tâm

G : Nhận xét chốt kiến thức V.Hướng dẫn nhà

- Học thuộc cách khởi động khỏi chương trình Nắm thành phần chức ngón tay tương ứng với màu hình bàn phím

- Đọc trước phần : Hướng dẫn sử dụng SGK Tuần : Tiết 2:

Luyện gõ bàn phím nhanh với finger break out A Mục tiêu :

1/kiến thức:Giúp học sinh nắm quy tắc sử dụng phần mềm 2/kỹ : Rèn kĩ gõ phím nhanh xác

3/thái độ học tập :nghiêm túc, ghi chép, chia tư sáng tạo B Chuẩn bị :

1 Giáo viên : - SGK, SGV, tài liệu, Giáo án

- Đồ dùng dạy học máy tính, projector, Học sinh : - Đọc trước

- SGK, Đồ dùng học tập, bảng phụ C Tiến trình tiết dạy :

I ổn định tổ chức lớp : - Kiển tra sĩ số : - ổn định trật tự : II Kiểm tra cũ : III Dạy mới :

Hoạt động GV Họat động HS Kiến thức cần đạt Hoạt động : HS nắm cách sử dụng phần mềm Finger break out

G : Khởi động Finger break out

G : Muốn bắt đầu chơi làm ? G : Giới chốt bước để bắt đầu chơi G : Giới thiệu thêm số thông tin

H : Nghiên cứu SGK quan sát hình trả lời

3 Hướng dẫn sử dụng :

- Bắt đầu chơi nháy nút Start xuất

(5)

màn hình Finger break out

G : Làm để di chuyển ngang bắn cầu lên ? G : Nhận xét chốt G : Nếu có cầu lớn phải làm ?

G : Khi bị lượt chơi ? Trò chơi thắng ?

G : Chơi thử để xuất vật lạ

G : Giới thiệu vật lạ có chức trò chơi

H : Đọc thầm nghiên cứu SGK

H : Trả lời

H : Ghi cách chơi

H : Trả lời

H : Quan sát nghiên cứu SGK

Cách chơi :

- Gõ phím ứng với kí tự bên trái bên phải để di chuyển ngang sang trái phải

- Gõ kí tự để bắn lên cầu nhỏ

- Chú ý có cầu lớn di chuyển ngang để chặn không cho cầu chạm “đất”

- mức khó có vật lạ Nếu để vật chạm vào ngang lượt chơi

Hoạt động : HS rèn luyện kĩ chơi Finger Break Out G : Tổ chức cho

nhóm thi xem ghi điểm nhiều G : Điều khiển thứ tự thời gian chơi G : Là trọng tài nhận xét công bố kết

H : Từng nhóm đại diện lên chơi thử máy chủ H : Quan sát ghi nhận số điểm

H : Tự đánh giá nhóm

 Tổ chức thi :

Nhóm chiến thắng ?

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

H : Nhắc lại cách chơi finger Break Out G : Chốt kiến thức trọng tâm tiết học V.Hướng dẫn nhà

(6)

Tuần Tiết :

Bài 1: MÁY TÍNH VÀ CHƯƠNG TRÌNH MÁY TÍNH A Mục tiêu :

1/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

2/ Kỹ năng:

3/Thái độ: nghiêm túc, ghi chép, chia tư sáng tạo B Chuẩn bị :

1 Giáo viên :

- SGK, SGV, tài liệu, Giáo án - Đồ dùng dạy học,

2 Học sinh :

- Đọc trước

I ổn định tổ chức lớp : - Kiểm tra sĩ số : - ổn định trật tự : II Kiểm tra cũ :

Kiểm tra đồ dùng học sinh III Dạy mới :

Hoạt động : Học sinh hiểu người điều khiển máy tính thơng qua Để máy tính

thực cơng việc theo mong muốn mình, người phải đưa dẫn thích hợp cho máy tính

Double click chuột lên biểu tượng hình Desktop lệnh cho MT khởi động phần mềm

Khi thực chép đoạn văn bản, ta lệnh cho máy tính thực hiện?

1 Con người lệnh cho máy tính nào?

- Để dẫn mỏy tớnhthực cụng việc đú, người đưa cho mỏy tớnhmột nhiều lệnh, mỏy tớnh thực cỏc lệnh theo đỳng thứ tự nhận

VD 1: Gừ chữ a trờn bàn phớm ta lệnh cho MT ghi chữ a lờn hỡnh VD 2: Sao chộp đoạn vb yờu cầu MT thực lệnh: chộp ghi vào nhớ chộp từ nhớ vị trớ

Hoạt động : Tìm hiểu ví dụ rơ bốt qt nhà

(7)

lệnh để rơbốt hồn thành việc nhặc rác bỏ vào thùng nơi qui định

G : Cho rơbơt chạy mơ hình để hs hình dung trực quan

nghiên cứu SGK

H : Trả lời

H : Quan sát nhớ thao tác thực rôbốt

H : Nhắc lại lệnh mà robơt phải làm để hồn thành cơng việc

Để rụ-bốt hồn thành nhiệm vụ ta cỏc lệnh sau:

Lệnh 1: tiến bước

Lệnh 2: quay trỏi, tiến bước Lệnh 3: nhặt rỏc

Lệnh 4: quay phải, tiến bước Lệnh 5: quay trỏi, tiến bước Lệnh 6: bỏ rỏc vào thựng

Sau thực lệnh “Hãy quét nhà” trên, vị trí rơ-bốt gì? Em đưa lệnh để rơ-bốt trở lại vị trí xuất phát (góc bên trái hình)

V.Hướng dẫn nhà

1 Viết lệnh dẫn để rơbốt hồn thành cơng việc trực nhật lớp em Viết lệnh dẫn để rôbốt giúp em làm áo

Tuần Tiết 4:

Bài 1: MÁY TÍNH VÀ CHƯƠNG TRÌNH MÁY TÍNH (T.T) A Mục tiêu :

1/ Kiến thức:

 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

2/ Kỹ năng:

1 Giáo viên :

- SGK, SGV, tài liệu, Giáo án - Đồ dùng dạy học ,

2 Học sinh :

- Đọc trước

- SGK, Đồ dùng học tập, C Tiến trình tiết dạy :

(8)

- ổn định trật tự : II Kiểm tra cũ :

Con người lệnh cho máy tính ? Lấy ví dụ minh hoạ ? III Dạy mới :

Hoạt động GV Họat động HS Kiến thức cần đạt Hoạt động : Học sinh hiểu viết chương trình

Trở lại vớ dụ rụ-bốt nhặt rỏc, việc viết cỏc lệnh để điều khiển rụ-bốt 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 cỏc lệnh cú chương trỡnh cỏch

3 Viết chương trình : lệnh cho máy tính làm việc

Việc viết cỏc lệnh để điều khiển rụ-bốt vớ dụ trờn chớnh viết chương trỡnh Tương tự, để điều khiển mỏy tớnh làm việc, ta phải viết chương trỡnh mỏy tớnh

* Tại cần viết chương trỡnh? Cỏc cụng việc người muốn mỏy tớnh thực đa dạng phức tạp Một lệnh đơn giản khụng đủ để dẫn cho mỏy tớnh Vỡ việc viết nhiều lệnh hợp lại chương trỡnh giỳp người điều khiển mỏy tớnh cỏch đơn giản hiệu

Hoạt động 2: Tìm hiểu viết chương trình Giả sử có hai người nói chuyện với Một người biết tiếng Anh, người biết tiếng Việt Vậy hai người hiểu khơng?

Tương tự để dẫn cho máy tính cơng việc cần làm ta phải viết chương trình ngơn ngữ máy

Tuy nhiên, việc viết chương trình ngơn ngữ máy khó.?

Để thực cơng việc, máy tính phải hiểu lệnh viết chương trình Vậy làm để máy

4 Chương trình ngơn ngữ lập trình ?

Thụng tin đưa vào mỏy tớnh phải chuyển đổi thành dạng dóy bit (dóy cỏc số gồm 1)

được gọi ngụn ngữ mỏy Mỏy tớnh “núi” “Hiểu” ngụn ngữ riờng ngụn ngữ mỏy tớnh

- Viết chương trỡnh sử dụng cỏc Hãy nhặc rác;

Bắt đầu tiến bước;

quay trái, tiến bước; nhặt rác;

quay phải, tiến bước; quay trái, tiến bước; bỏ rác vào thùng; Kết thúc

các

lệnh vị trí bắt đầu két thúc chương trình

Dãy lệnh đơn giản chương trình trình

(9)

tính hiểu lệnh người? Ta lệnh cho máy tính cách nói gõ phím khơng?

các ngơn ngữ lập trình đời để giảm nhẹ khó khăn việc viết chương trình

GV: Mô tả máy chiếu việc lệnh cho máy tính làm việc

từ cú nghĩa (thường tiếng Anh) - Cỏc chương trỡnh dịch vai trũ "người phiờn dịch" dịch chương trỡnh viết ngụn ngữ lập trỡnh sang ngụn ngữ mỏy để mỏy tớnh cú thể hiểu



Như vậy, thụng tin đưa vào mỏy phải chuyển đổi thành dạng dóy bit (dóy cỏc tớn hiệu kớ hiệu 1)

được viết ngôn ngữ lập trình sang ngơn ngữ máy để máy tính hiểu

- Chương trình soạn thảo chương trình dịch thường kết hợp vào phần mềm, gọi mơi trường lập trình

IV.Cđng cè kiÕn thøc

? Qua bµi häc em cần ghi nhớ điều H : Trả lời - G : Chốt ghi nhớ hình : GHI NHí

1. Con ngêi chØ dÉn cho máy tính thực công việc thông qua lệnh

2. Viết chơng trình hớng dẫn máy tính thực công việc hay giải toán thĨ

3. Ngơn ngữ dùng để viết chơng trình máy tính đợc gọi ngơn ngữ lập trình V.Hớng dẫn nhà

1 Em cho biết soạn thảo văn yêu cầu máy tính tìm kiếm thay (Replace), thực chất ta yêu cầu máy thực lệnh ? Ta thay đổi thứ tự chúng đợc không?

2 Sau thực lệnh “Hãy quét nhà” trên, vị trí rơ-bốt ? Em đa lệnh để rô-bốt trở lại vị trí xuất phát (góc dới bên trái hình)

3 Tại ngời ta tạo ngơn ngữ khác để lập trình máy tính có ngơn ngữ máy mình?

4 Häc thc phÇn ghi nhí

Tuần Tiết 5:

Bài : LM QUEN VỚI CHƯƠNG TRÌNH VÀ NGƠN NGỮ LẬP TRÌNH

A Mục tiêu : 1/ Kiến thức:

(10)

 Biết ngơn ngữ lập trình có tập hợp từ khóa dành riêng cho mục đích sử dụng định

 Biết tên ngôn ngữ lập trình người lập trình đặt ra, đặt tên phải tuân thủ quy tắc ngôn ngữ lập trình Tên khơng trùng với từ khố

2/ Kỹ năng:

1 Giáo viên :

- SGK, SGV, tài liệu, Giáo án - Đồ dùng dạy học ,

2 Học sinh :

- Đọc trước

I ổn định tổ chức lớp : - Kiển tra sĩ số : - ổn định trật tự : II Kiểm tra cũ :

1 Viết chương trình ? phải viết chương trình ?

2 Ngơn ngữ lập trình ? phải tạo ngơn ngữ lập trình ? III Dạy mới :

Hoạt động : Học sinh hiểu ngơn ngữ lập trình

G : Đưa ví dụ chương trình đơn giản viết môi trường Pascal

G : Theo em chương trình dịch sang mã máy máy tính đưa kết ?

H : Quan sát cấu trúc giao diện chương trình Pascal

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

1 Ví dụ chương trình

* Ví dụ chương trình đơn giản viết Pascal

- Sau chạy chương trình máy in lên hình dịng chữ Chao cac ban

Hoạt động : Học sinh hiểu ngơn ngữ lập trình gồm G : Khi nói viết

ngoại ngữ để người khác hiểu em có cần phải dùng chữ cái, từ

2 Ngụn ngữ lập trỡnh gồm gỡ? Ngụn ngữ lập trỡnh gồm:

(11)

cho phép phải ghép theo quy tắc ngữ pháp hay không ?

G : Ngơn ngữ lập trình gồm ? G : Chốt khái niệm hình

H : Đọc câu hỏi suy nghĩ trả lời

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

phớm mỏy tớnh cú mặt bảng chữ cỏi ngụn ngữ lập trỡnh

- Cỏc quy tắc: cỏch viết (cỳ phỏp) ý nghĩa chỳng; cỏch bố trớ cỏc cõu lệnh thành chương trỡnh,

Vớ dụ 1: Hỡnh đõy chương trỡnh đơn giản viết ngụn ngữ lập trỡnh Pascal Sau dịch, kết chạy chương trỡnh dũng chữ "Chao Cac Ban" in trờn hỡnh.0

Hoạt động : HS tìm hiểu từ khoá tên chương trình G : Đưa ví dụ

chương trình phần trước

G : Theo em từ chương trình từ khố

G : Chỉ từ khố chương trình

G : Trong chương trình đại lượng gọi tên

G : Tên ?

G : Chốt khái niệm tên giải thích thêm quy tắc đặt tên chương trình

H : Nghiên cứu

H : Nghe ghi

3 Từ khoá tên

- Từ khố ngơn ngữ lập trình từ dành riêng, khơng dùng từ khố cho mục đích khác ngồi mục đích sử dụng ngơn ngữ lập trình quy định

- Tên dùng để phân biệt đại lượng chương trình người lập trình đặt theo quy tắc:

+ Hai đại lượng khác chương trình phải có tên khác

+ Tên không trùng với từ khoá

? Qua tiết học em hiểu điều ? Hãy đặt hai tên hợp lệ hai tên không hợp lệ

(12)

giác, đặt tên ban_kinh cho bán kính hình trịn, Các tên tên hợp lệ, cịn tên Lop em, 8A, tên không hợp lệ

1 Học thuộc khái niệm ngơn ngữ lập trình hiểu mơi trường lập trình Hiểu, phân biệt từ khố tên chương trình

Tuần : Tiết

Bài : LÀM QUEN VỚI CHƯƠNG TRÌNH VÀ NGƠN NGỮ LẬP TRÌNH

A Mục tiêu : 1/Kiến thức:

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 2/ Kỹ năng:

Biết phân biệt sai cấu trúc chương trình

1 Giáo viên :

- SGK, SGV, tài liệu, Giáo án - Đồ dùng dạy học

2 Học sinh :

- Đọc trước

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

2 Thế từ khoá tên chương trình ?

III Dạy mới :

Hoạt động GV Họat động HS Kiến thức cần đạt Hoạt động : Học sinh hiểu cấu trúc chương trình

G : Đưa ví dụ chương trình

G : Cho biết chương trình có H : Quan sátchương trình và

4 Cấu trúc chung chương trình - Cấu trúc chung chương trình gồm:

Phần khai báo

(13)

những phần ?

G : Đưa lên hình phần chương trình

G : Giải thích thêm cấu tạo phần

nghiên cứu sgk trả lời

H : Đọc

trong chương trình) số khai báo khác

Phần thân chương trình gồm câu lệnh mà máy tính cần thực Đâ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 đặt trước phần thân chương trình

Hoạt động : Học sinh hiểu số thao tác NNLT Pascal G : Khởi động chương trình T.P để

xuất hình sau :

G : Giới thiệu hình soạn thảo T.P

G : Giới thiệu bước để làm việc với chương trình mơi trường lập trình T.P

H : Quan sát lắng nghe

5 Ví dụ ngơn ngữ lập trình - Khởi động chương trình :

-Màn hình T.P xuất

-Từ bàn phím soạn chương trình tương tự word

- Sau soạn thảo xong, nhấn

phím Alt+F9 để dịch chương trình

- Để chạy chương trình, ta nhấn tổ

hợp phím Ctrl+F9 IV.Củng cố kiến thức

GHI NHỚ

1. Ngôn ngữ lập trình tập hợp kí hiệu quy tắc cho viết lệnh tạo thành chương trình hồn chỉnh chạy 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 V.Hướng dẫn nhà :

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ì?

(14)

Tuần : Tiết 7

Bài thực hành : LÀM QUEN VỚI PASCAL

A Mục tiêu : 1/Kiến thức:

 Làm quen với hình soạn thảo TP

 Biết cần thiết phải tn thủ quy định ngơn ngữ lập trình 2/ Kỹ năng:

 Thực thao tác khởi động/kết thúc TP,

 Thực thao tác mở bảng chọn chọn lệnh  Soạn thảo 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 3/ Thái độ học tập: nghiêm túc, ghi chép, chia tư sáng tạo

B Chuẩn bị : Giáo viên :

- SGK, SGV, tài liệu, Giáo án

- Chuẩn bị phịng thực hành đủ số máy tính hoạt động tốt Học sinh :

- Đọc trước thực hành

- Học thuộc kiến thức lý thuyết học C Tiến trình tiết dạy :

- ổn định trật tự :

II Kiểm tra cũ :

1 Cấu trúc chung chương trình gồm phần ? Đọc tên chức số từ khố chương trình

2 Nêu bước để làm việc với chương trình Turbo Pascal III Dạy mới :

Hoạt động GV Họat dđộng HS Kiến thức cần đạt

Hoạt động : Hướng dẫn ban đầu G : Đóng điện

G : Xác nhận kết báo cáo máy

G : Phổ biến nội dung yêu cầu chung tiết thực hành làm quen với

H : Khởi động kiểm tra tình trạng máy tính => Báo cáo tình hình cho G

(15)

ngơn ngữ lập trình Turbo Pascal

Hoạt động : Giáo viên hướng dẫn H làm 1trên hình lớn G : Giới thiệu biểu

tượng chương trình cách khởi động chương trình cách

G : Giới thiệu hình TP

G : Giới thiệu thành phần hình Turbo Pascal

G : Giới thiệu làm mẫu cách mở hệ thống thực đơn (menu) cách di chuyển vệt sáng, chọn lệnh thực đơn

G : Giới thiệu cách thoát khỏi TP

G : Theo dõi quan sát thao tác thực H máy hướng dẫn thêm

H : Theo dõi quan sát tìm biểu tượng chương trình máy

H : Quan sát khám phá thành phần hình TP H : Quan sát

H : Làm theo máy quan sát lệnh menu

H : Làm thử máy tính

Bài Làm quen với việc khởi động thoát khỏi Turbo Pascal Nhận biết thành phần hình Turbo Pascal

a Khởi động Turbo Pascal hai cách:

Cách 1: Nháy đúp chuột biểu tượng hình nền;

Cách 2: Nháy đúp chuột tên tệp Turbo.exe thư mục chứa tệp (thường thư mục TP\BIN)

b Quan sát hình Turbo Pascal so sánh với hình 11 SGK

c Nhận biết thành phần: Thanh bảng chọn; tên tệp mở; trỏ; dịng trợ giúp phía hình

d Nhấn phím F10 để mở bảng chọn, sử dụng phím mũi tên sang trái sang phải ( ) để di chuyển qua lại bảng chọn

e Nhấn phím Enter để mở bảng chọn f Quan sát lệnh bảng chọn

- Mở bảng chọn cách khác: Nhấn tổ hợp phím Alt 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, )

g Sử dụng phím mũi tên lên xuống ( ) để di chuyển lệnh bảng chọn

h Nhấn tổ hợp phím Alt+X để khỏi Turbo Pascal

Hoạt động : Giáo viên hướng dẫn H làm hình lớn G : Mở chương trình

đã chuẩn bị sẵn từ máy chủ

G : Theo dõi

H : Gõ chương trình phần a sgk H : Đọc hiểu ý sgk

H : Làm theo cách

Bài Soạn thảo, lưu, dịch chạy chương trình đơn giản

program CT_Dau_tien; uses crt;

begin

clrscr;

(16)

hướng dẫn máy

G : dịch chạy chương trình máy chủ

bước b, c, d sgk

H : Quan sát đối chiếu kết máy

write('Toi la Turbo Pascal'); end

- Nhấn tổ hợp phím Alt+F9 để dịch chương trình - Nhấn tổ hợp phím Ctrl+F9 để chạy chương trình

- Sau nhấn Alt+F5 để quan sát kết

IV.Nhận xét sau tiết thực hành :

Đọc tìm hiểu, chuẩn bị tập chỉnh sử chương trình

Tuần : Tiết :

Bài thực hành : LÀM QUEN VỚI TURBO PASCAL

- Làm quen với hình soạn thảo TP

-Biết cần thiết phải tuân thủ quy định ngơn ngữ lập trình 2/ Kỹ năng:

 Thực thao tác khởi động/kết thúc TP

 Thực thao tác mở bảng chọn chọn lệnh  Soạn thảo chương trình Pascal đơn giản

 Cách biên dịch, sửa lỗi chương trình, chạy chương trình xem kết 3/ Thái độ học tập: nghiêm túc, ghi chép, chia tư sáng tạo

- Chuẩn bị phòng thực hành đủ số máy tính hoạt động tốt Học sinh :

(17)

II Kiểm tra cũ :

1 Cấu trúc chung chương trình gồm phần ? Đọc tên chức số từ khố chương trình

2 Nêu bước để làm việc với chương trình Turbo Pascal III Dạy mới :

Hoạt động : Hướng dẫn ban đầu

G : Đóng điện

H : ổn định vị trí máy

Hoạt động : Giáo viên hướng dẫn H làm G : Thường xuyên

các máy kiểm tra, theo dõi hướng dẫn cụ thể

G : Làm bước a, b máy chủ giải thích số lỗi cho H hiểu

H : Làm theo bước yêu cầu SGK

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

Bài Chỉnh sửa chương trình nhận biết số lỗi

Hoạt động : Giáo viên tổng kết nội dung tiết thực hành G : Đưa lên hình

nội dung cần đạt tiết thực hành (SGK) G : Có thể giải thích thêm

H : Đọc lại

H : Đọc phần đọc thêm SGK

Tổng kết : SGK

IV.Nhận xét sau tiết thực hành :

(18)

Tuần : Tiết

Bài : CHƯƠNG TRÌNH MÁY TÍNH VÀ DỮ LIỆU A Mục tiêu :

1/Kiến thức:

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

 Biết số phép toán với liệu số; 2/ Kỹ năng:

-Phân biệt kiểu liệu cách nhận dạng so sánh -Chuyển phép toán sang ký hiệu NNLT Pascal 3/ Thái độ học tập: nghiêm túc, ghi chép, chia tư sáng tạo B Chuẩn bị :

1 Giáo viên :

2 Học sinh : - Kiến thức học - Đọc trước - SGK, Đồ dùng học tập C Tiến trình tiết dạy :

II Kiểm tra cũ : III Dạy mới :

Hoạt động GV Họat động HS Kiến thức cần đạt Hoạt động : Học sinh tìm hiểu liệu kiểu liệu

G : Nêu tình để gợi ý 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

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ố

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

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

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

(19)

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 nhiều ?

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

H : Nghiên cứu SGK trả lời SGK, Đồ dùng học tập, bảng phụ

H : Đọc lại H : Viết tên ý nghĩa kiểu liệu TP

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

 Số nguyên, ví dụ số học sinh lớp, số sách thư viện,

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

 Xâu kí tự (hay xâu) dãy "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 liệt kê số kiểu liệu ngơn ngữ lập trình Pascal:

Chỳ ý: Dữ liệu kiểu kớ tự kiểu xõu Pascal đặt 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ố G : Viết lên bảng phụ

các 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 toán dùng cho kiểu số thực số nguyên

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

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,

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ư:

5/2 = 2.5; 12/5 = 2.4 div = 2; 12 div = 2 mod = 1; 12 mod = 2

- Ta kết hợp phép tính số

Tên

kiểu Phạm vi giá trị integer

Số nguyên khoảng 215 đến 215

real

Số thực có giá trị tuyệt đối khoảng 2,910-39 đến 1,71038 số

char Một kí tự bảng chữ string Xâu kí tự, tối đa gồm 255 kí tự

Kí

hiệu Phép toán Kiểu liệu + cộng số nguyên, số thực

 trừ số nguyên, số thực

* nhân số nguyên, số thực / chia số nguyên, số thực div chia lấy phần nguyên số nguyên

(20)

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

x

5+2 xy−8 yêu cầu H viết biểu thức ngôn ngữ TP

G : Yêu cầu H viết lại

phép toán

2

x y

(x 2) a b



 

 

bằng 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

(a b)(c d) 6

a

  



?

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

lắng nghe ghi

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

H : Làm bảng phụ

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

H : Viết SGK, Đồ dùng học tập, bảng phụ

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)

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 toá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

Chú ý: Trong Pascal (và hầu hết cỏc ngụn ngữ lập trỡnh núi chung) phộp sử dụng cặp dấu ngoặc trũn () để gộp cỏc phộp toỏn Khụng dựng cặp dấu ngoặc vuụng [] hay cặp dấu ngoặc nhọn {} toỏn họ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 V.Hướng dẫn nhà

(21)

Tuần : Tiết 10

Bài : CHƯƠNG TRÌNH MÁY TÍNH VÀ DỮ LIỆU(T.T) A Mục tiêu :

1/Kiến thức:

 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 2/ Kỹ năng: Chuyển phép toán sang ký hiệu NNLT Pascal 3/ Thái độ học tập: nghiêm túc, ghi chép, chia tư sáng tạo B Chuẩn bị :

1 Giáo viên :

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

- Đọc trướ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 III Dạy mới :

Họat động GV Họat động HS Kiến thức cần đạt Hoạt động : HS biết ý nghĩa cách viết phép toán so sánh TP

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 tốn so sánh dùng để làm ?

G : Đưa ví dụ : a)  = 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 : 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

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 Pascal

Phép so sánh Kí hiệu tốn học

= Bằng =

<> Khác 

(22)

học không ?

G : Đưa lên hình bảng

<= Nhỏ



> Lớn > >= Lớn

hoặc



Vớ dụ: 3*2> 4; 5=5; 5<>6; … => kết đỳng

5*2=9, 22>17, … => kết sai

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

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

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 : 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 ví dụ hộp thoại

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

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;}

- Thông báo :

d) Hộp thoại

(23)

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

1 Làm tập 5,

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

3 Chuẩn bị Bài thực hành số để tiết sau thực hành

Tuần Tiết:11

Bài thực hành 2: VIẾT CHƯƠNG TRÌNH ĐỂ TÍNH TỐN A/ Mục tiêu:

1/Kiến thức:

-Giúp hs tiếp tục làm quen cách soạn thảo, chỉnh sửa, biên dịch chạy chương trình -Giúp hs làm quen với biểu thức số học chương trình Pascal

2/ Kỹ năng:

-Chuyển biểu thức tốn học sang biểu thức ngơn ngữ lập trình 3/ Thái độ học tập: nghiêm túc,ghi chép, chia tư sáng tạo

B/ Chuẩn bị:

- Gv: phòng máy, tập thực hành - Hs: kiến thức cũ, sgk

C/ Tiến trình dạy – học: ổn định lớp: - Kiển tra sĩ số :

Kiểm tra cũ:

HS1: Hãy phân biệt ý nghĩa câu lệnh Pascal sau đây: Writeln('5+20=','20+5'); Writeln('5+20=',20+5);

 Trả lời: câu lệnh: Writeln('5+20=','20+5') in hình: 5+20=20+5 Câu lệnh: Writeln('5+20=',20+5); in hình: 5+20=25

HS2: Xác định kết biểu thức đây: a) 15  ≥ 3; b) (20  15)2 ≠ 25;  Trả lời:

a) True; b) Fales

3 trình thực hành:

H 1: Chu n BĐ ẩ ị

HĐ GV HĐ HS Kiến thức cần đạt

- Giáo viên quy định số máy cho hs theo số thứ tự

- Giáo viên nhắc nhở hs quy định phòng thực hành

- Hs vị trí thực hành theo quy địng giáo viên

(24)

H 2: Ti n trình th c h nhĐ ế ự à

- Giáo viên yêu cầu hs làm tập 1a sách giáo khoa/ 27 vào tập

- Giáo viên hướng dẫn thêm cho hs hiểu yêu cầu 1a

- Giáo viên yêu cầu hs lên bảng làm câu 1a

- Gv: gọi hs khác nhận xét -Gv: nhận xét, ghi điểm - Gv lưu ý thêm: dùng dấu ngoặc đơn để nhóm phép tốn

- Gv: q trình thực hành phần quan trọng yêu cầu hs nên ghi lại vào

- Gv: nhắc nhở Hs phải ý sử dụng kí hiệu Pascal

- yêu cầu Hs khởi động pascal làm tiếp tập 1b/ 28

- Gv: theo dõi uốn nắn, nhắc nhở trình thực hành hs

- Gv: nên ý cách gõ, dấu chấm phẩy, câu lệnh…

- Gv: ý nghĩa biểu thức đặt dấu nháy đơn?

- Gv lưu ý thêm: biểu thức Pascal đặt câu lệnh writeln để in kết Các em có cách viết khác sau làm quen với khái niệm Biến - Gv: yêu cầu Hs lưu chương trình với tên CT2.pas sau dịch chạy chương trình để kiểm tra kết nhận hình

- Gv: theo dõi giúp hs sữa lỗi hs không tự sữa lỗi

Hs: làm 1a

HS: lắng nghe làm Hs: lên làm

Hs: nhận xét Hs: lắng nghe

Hs: lắng nghe ghi nhớ Hs: lắng nghe

Hs: ghi nhớ

Hs: khởi động Pascal làm 1b

Hs: thực hành

Hs: lắng nghe, ghi nhớ, thực hành

Hs: Trả lời

Hs: ý lắng nghe

Hs: lắng nghe tiếp tục thực hành

Hs: thực hành

Bài a gõ biểu thức tóan pascal

Bài 1.b hiểu cách thực phép tính pascal

(25)

IV củng cố: H 3: T ng k tĐ ổ ế

Gv: yêu cầu lớp trưởng lớp phó kiểm tra máy tính Gv: kiểm tra máy tính thực hành hs

Gv: đánh giá tiết thực hành hs qua mặt: thái độ thực hành hs, nề nếp, chuẩn bị hs…

Hs: kiểm tra máy tính

Hs: lắng nghe

- Về nhà xem lại tập thực hành Nếu hs có máy tính cá nhân nên thao tác lại nhiều lần cho thành thạo

Tuần : Tiết:12

Bài thực hành 2: VIẾT CHƯƠNG TRÌNH ĐỂ TÍNH TỐN (TT)

A/ Mục tiêu: 1/kiến thức:

- Giúp hs tiếp tục làm quen cách soạn thảo, chỉnh sửa, biên dịch chạy chương trình - Giúp hs làm quen với biểu thức số học chương trình Pascal

2/ Kỹ năng: Viết chương trình đơn giản

3/ Thái độ học tập: nghiêm túc, ghi chép, chia tư sáng tạo B/ Chuẩn bị:

- Gv: phòng máy, tập thực hành - Hs: kiến thức cũ, sgk

C/ Tiến trình dạy – học: ổn định lớp:

Kiển tra sĩ số :

Bài cũ:

3 trình thực hành:

H 1: Chu n BĐ ẩ ị

- Giáo viên quy địng số máy cho hs theo số thứ tự

- Giáo viên nhắc nhở hs quy định phịng thực hành

- Hs vị trí thực hành theo quy địng giáo viên

- Hs lắng nghe

H 2: Ti n trình th c h nhĐ ế ự à

(26)

- Gv: yêu cầu hs khởi động pascal thực hành tập 2/ 28

- Gv: Bài tập yêu cầu em điều gì?

- Gv: nhận xét

- Gv: em nên ý dòng lệnh uses crt phần khai báo dịng lệnh clrscr; phần thân chương trình Đây dịng lệnh xóa hình

- Gv: theo dõi thao tác hs

- Gv: yêu cầu hs gõ quy tắc, gõ kí hiệu tốn học pascal tránh nhầm lẫn với kí hiệu tóan học

- Gv: yêu cầu hs thực hành theo thứ tự từ câu a đến câu d

- Gv: yêu cầu hs vừa thực hành vừa rút nhận xét với kết nhận

- Gv: câu c yêu cầu điều gì? - Gv: yêu cầu hs quan sát kết rút nhận xét - Gv: yêu cầu hs tiếp tục thực hành bt3/ 28

- Gv: em cần mở lại bt CT2.pas lưu chỉnh sữa lại theo yêu cầu bt3, xem kết khác điểm nào?

- Gv: từ rút nhận xét - Gv: chủ yếu giúp em hiểu phân biệt phép div, mod Và hiểu thêm cách in liệu hình

- Gv: theo dõi uốn nắn thêm cho hs

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ệnh 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 Hs: Rút nhận xét Hs: lắng nghe

Hs: thực hành

Bài 2.a mở file sọan thảo chương trình

b dịch, sửa lỗi chạy chương trình

c tìm hiểu lệnh delay(5000)

d.tìm hiểu lệnh readln;

Bài tìm hiểu cách in liệu chương trình hình

IV.củng cố: H 3: T ng k tĐ ổ ế

(27)

lớp phó kiểm tra máy tính Gv: kiểm tra máy tính thực hành hs

Gv: đánh giá tiết thực hành hs qua mặt: thái độ thực hành hs, nề nếp, chuẩn bị hs…

Hs: lắng nghe

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

- Về nhà xem lại tập thực hành Nếu hs có máy tính cá nhân nên thao tác lại nhiều lần cho thành thạo

- Xem trước

Tuần 7: Tiết 13:

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

1/kiến thức:

 Học sinh biết vai trò biến lập trình;  Học sinh biết khái niệm biến

2/ kỹ năng: khai báo biến phù hợp với kiểu liệu

3/ Thái độ học tập: nghiêm túc, ghi chép, chia tư sáng tạo B Chuẩn bị :

1 Giáo viên :

- Đồ dùng dạy học máy tính, projector, Học sinh :

- Đọc trước

1 Viết lệnh in lên hình thơng báo : ‘20 + =’ Viết lệnh in lên hình kết phép toán : 20+5

3 Viết lệnh điều khiển máy dừng lại đến nhấn phím enter tiếp tục Viết lệnh nhập liệu vào từ bàn phím

III Dạy mới :

(28)

G : Biến ? Biến có vai trị chương trình ?

G : Viết lệnh in kết phép cộng 15+5 lên hình ?

G : Muốn in lên hình kết phép tính khác làm ?

G : Đưa hình ảnh lên hình phân tích gợi mở

G : Trình bày cách tính hai biểu thức bên ?

G : Đưa cách làm phân tích

H : Đọc SGK để hiểu biến

H : Viết bảng phụ

H : trả lời

H : Quan sát, lắng nghe để hiểu biến vai trò biến

H : Đọc thầm ví dụ

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

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

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

* Ví dụ :

In kết phép cộng 15+5 lên hình viết lệnh : writeln(15+5);

In lên hình giá trị biến x + giá trị biến y viết lệnh :

writeln(X+Y);

* Ví dụ :

Tính in giá trị biểu thức

100 50  100 50 

hình Cách làm :

X  100 + 50 Y  X/3 Z  X/5 Hoạt động : HS biết khái niệm biến

G : Việc khai báo biến gồm khai báo ?

G : Đưa ví dụ SGK phân tích thành phần

G : Viết ví dụ khai báo biến giải thích thành phần ? G : Thu kết nhận xét cho điểm G : Viết dạng tổng quát để khai báo biến chương trình

H : Đọc thầm nghiên cứu SGK

H : Trả lời

H : Lắng nghe nắm vững kiến thức

H : Làm theo nhóm vào bảng phụ

2 Khai báo biến

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

+ Khai báo kiểu liệu biến * Ví dụ :

Trong :

- var từ khố ngơn ngữ lập trình dùng để

khai báo biến,

(29)

G : Kiểm tra kết nhóm đưa dạng tổng quát

H : Quan sát ví dụ viết theo nhóm

H : Quan sát ghi

- thong_bao biến kiểu xâu (string)

 Dạng tổng quát :

Var danh sách tên biến : kiểu biến ;

Trong Pascal, khai báo sau cho khai báo biến số ?

a) var tb: real; b) var 4hs: integer; c) const x: real; d) var R = 30;

2 Hãy cho biết kiểu liệu biến cần khai báo dùng để viết chương trình để giải tốn đây:

a) 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)

b) Tính kết c phép chia lấy phần nguyên kết d phép chia lấy phần dư hai số nguyên a b

đáp án : a) Var S, a, h: integer b) Var a, b: integer; c, d: real;

1 Nắm vững khái niệm biến chức biến chương trình Học thuộc cách khai báo biến lấy ví dụ

3 Đọc trước phần 3,

Tuần : Tiết 14 :

Bài 4: SỬ DỤNG BIỄN TRONG CHƯƠNG TRÌNH (T.T) A Mục tiêu :

1/kiến thức:

 HS hiểu cách sử dụng biến lệnh gán

 Biết khái niệm cách sử dụng số chương trình ; 2/Kỹ năng: sử dụng biến thông qua phép gán

3/Thái độ học tập: nghiêm túc, ghi chép, chia tư sáng tạo B Chuẩn bị :

1 Giáo viên :

(30)

2 Học sinh :

- Đọc trước

1 Biến dùng để làm chương trình ? Lệnh Readln(x) có tác dụng ? Viết cách khai báo biến cho ví dụ cụ thể ?

III Dạy mới :

Họat động GV Họat động HS Kiến thức cần đạt Hoạt động : Học sinh biết cách sử dụng biến chương trình

G : Sau khai báo biến, muốn sử dụng biến phải làm cho biến có giá trị cách (nhập gán) G : Khi khai báo biến y thuộc kiểu Interger phải nhập giá trị cho biến y ?

G : Khi nhập gán giá trị cho biến giá trị cũ có bị hay khơng ?

G : Giới thiệu cấu trúc lệnh gán

G : Đưa hình bảng ví dụ lệnh gán

Lệnh ý nghĩa

X:=12;

Gán giá trị lưu biến nhớ Y vào biến nhớ X

X:=(a+b)/2;

Tăng giá trị biến nhớ X lên đơn vị, kết gán trở lại biến X

H : Viết lệnh nhập giá trị cho biến y vào bảng phụ

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

H : Nghiên cứu ví dụ sgk để hiểu hoạt động lệnh gán

H : Điền vào ô trống lệnh ý nghĩa lệnh

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

- Muốn sử dụng biến ta phải thực thao tác :

+ Khai báo biến thuộc kiểu

+ Nhập giá trị cho biến gán giá trị cho biến

+ Tính tốn với giá trị biến - Lệnh để sử dụng biến :

+ Lệnh nhập giá trị cho biến từ bàn phím : Readln(tên biến);

+ Lệnh gán giá trị cho biến :

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

- Ví dụ :

Lệnh ý nghĩa

X:=12; Gán giá trị số 12 vào biến nhớ X

(31)

G : Nhận xét chốt bảng SGK

X:=(a+b)/2; Thực phép tốn tính trung bình cộng hai giá trị nằm hai biến nhớ a b Kết gán vào biến nhớ X

X:=X+1; Tăng giá trị biến nhớ X lên đơn vị, kết gán trở lại biến X

Hoạt động : HS biết khái niệm cách sử dụng chương trình G : Nêu khái niệm ngắn gọn

về ?

G : Viết cách khai báo số ví dụ cụ thể

G : Nhận xét chốt khái niệm hằng, cách khai báo hằng, ví dụ

G : Có thể dùng lệnh gán để thay đổi giá trị không ? Khi cần thay đổi giá trị ta làm ?

H : Đọc sgk để hiểu cách khai báo ? H : Trả lời H : Viết bảng phụ

H : N/c sgk trả lời

4 Hằng

- Hằng đại lượng để lưu trữ liệu có giá trị khơng đổi suốt q trình thực chương trình

- Cách khai báo :

Const tên =giá trị ; Ví dụ :

H : Đọc phần ghi nhớ sgk G : Chốt khái niệm biến

Giả sử A khai báo biến với kiểu liệu số thực, X biến với kiểu liệu xâu Các phép gán sau có hợp lệ không?

a) A:= 4; b) X:= 3242;

c) X:= '3242'; d) A:= 'Ha Noi' V.Hướng dẫn nhà

1 Học thuộc khái niệm cách khai báo biến, Làm 2, 3, 5/33

Tuân 8: Tiết 15

Bài thực hành : KHAI BÁO VÀ SỬ DỤNG BIẾN A Mục tiêu :

1/kiến thức: Bước đầu làm quen cách khai báo sử dụng biến chương trình 2/ Kỹ năng: khai báo biến

3/ thái độ học tập: nghiêm túc, ghi chép, chia tư sáng tạo B Chuẩn bị :

1 Giáo viên :

(32)

- Học thuộc kiến thức lý thuyết tập học C Tiến trình tiết dạy :

I Ổn định tổ chức lớp : - Kiển tra sĩ số :

II Kiểm tra cũ :

Kiểm tra trình thực hành

III D y b i m i :ạ à ớ

Họat động GV Họat động HS Kiến thức cần đạt

G : Phổ biến nội dung yêu cầu chung tiết thực hành viết chương trình để tính tốn

Hoạt động : Giáo viên yêu cầu HS gõ chương trình phần a program Tinh_tien;

uses crt; var

soluong: integer; dongia, thanhtien: real; thongbao: string;

const phi=10000; begin

clrscr;

thongbao:='Tong so tien phai toan : ';

{Nhap don gia va so luong hang} write('Don gia = '); readln(dongia);

write('So luong = ');readln(soluong);

thanhtien:= soluong*dongia+phi; (*In so tien phai tra*)

writeln(thongbao,thanhtien:10:2); readln

end

Gõ chương trình vào máy

Dịch, sửa lỗi chạy chương trình

Bài Viết chương trình Pascal có khai báo sử dụng biến

(33)

Hoạt động 3: Hướng dẫn HS làm phần b, c, d b) Lưu chương trình với tên

TINHTIEN.PAS Dịch chỉnh sửa lỗi gõ, có

c) Chạy chương trình với liệu (đơn giá số lượng) sau (1000, 20), (3500, 200), (18500, 123) Kiểm tra tính kết in

d) Chạy chương trình với liệu (1, 35000) Quan sát kết nhận Hãy thử đốn lí chương trình cho kết sai

IV.củng cổ: nhắc lại cách khai báo biến, lệnh gán V.Hướng dẫn nhà

Chuẩn bị phần tổng kết để tiết sau thực hành tiếp

Tuan 8: Tiết: 16

Bài thực hành 3: KHAI BÁO VÀ SỬ DỤNG BIẾN (T.T)

A Mục tiêu :

1/kiến thức: hiểu cách khai báo sử dụng biến, chương trình 2/kỹ năng: thành thạo việc khai báo sử dụng biến

3/thái độ học tập: nghiêm túc, ghi chép, chia tư sáng tạo B Chuẩn bị :

1 Giáo viên :

(34)

I Ổn định tổ chức lớp : - Kiển tra sĩ số :

II Kiểm tra cũ :

G : Phổ biến nội dung yêu cầu chung tiết thực hành viết chương trình để tính tốn

Hoạt động : Giáo viên yêu cầu HS gõ chương trình program hoan_doi;

var x,y,z:integer; begin

read(x,y); writeln(x,' ',y); z:=x;

x:=y; y:=z;

writeln(x,' ',y); readln

end

Bài Thử viết chương trình nhập số nguyên x y, in giá trị x y hình Sau hoán đổi giá trị x y in lại hình giá trị x y

Hoạt động : Tìm hiểu thêm cách in liệu hình G: hướng dẫn Gõ chương trình vào

máy

(35)

số thập phân Lưu ý kết in hình thẳng lề phải

IV củng cố: Hoạt động : Giáo viên tổng kết nội dung tiết thực hành

G : Khái quát nội dung cần đạt tiết thực hành (SGK)

G : Có thể giải thích thêm (nếu cần)

H : Đứng chỗ đọc lại

Tổng kết : SGK

2. Kí hiệu phép tốn số học Pascal: +, -, *, /, mod div

3. Các lệnh làm tạm ngừng chương trình:

 delay(x) tạm ngừng chương trình vịng x phần nghìn giây, sau tự động tiếp tục chạy

 read readln tạm ngừng chương trình người dùng nhấn phím Enter

4. Câu lệnh Pascal writeln(<giá trị thực>:n:m) dùng để điều khiển cách in số thực hình; giá trị thực số hay biểu thức số thực n, m số tự nhiên n quy định độ rộng in số, m số chữ số thập phân Lưu ý kết in hình thẳng lề phải

V Hướng dẫn nhà: học bài, làm tập SGK Tuần : Tiết 17:

Bài tập A Mục tiêu :

1/kiến thức:

- Củng cố kiến thức kiểu liệu, phép toán với kiểu liệu số, phép so sánh giao tiếp người máy

- Cách khai báo sử dụng biến

2/kỹ năng: Rèn luyện kĩ sử dụng phép toán ngôn ngữ Pascal 3/Thái độ học tập: nghiêm túc, ghi chép, chia tư sáng tạo

- SGK, SGV

(36)

2 Học sinh : - Kiến thức học

- Làm tập sau : Chương trình máy tính liệu - SGK, Đồ dùng học tập, bảng phụ

C Tiến trình tiết dạy : I ổn định tổ chức lớp : - Kiển tra sĩ số :

- Ổn định trật tự : II Kiểm tra cũ :

- Kiểm tra việc chuẩn bị nhà học sinh III Dạy mới :

Hoạt động : Chốt lại kiến thức trọng tâm để áp dụng làm tập G : Trong TP có kiểu liệu

cơ ?

G : Đưa mẫu bảng tổng kết.

Kiểu

dữ liệu Tênkiểu Ví dụ Số

nguyên Integer 39

G : Đưa mẫu bảng :

Tên phép tốn

Kí

hiệu Kiểudữ liệu Ví dụ

Cộng + Số

nguyê n, số thực

5+7 = 12

G : Viết tên lệnh in hình ? G : Viết tên lệnh nhập liệu ? G : Yêu cầu H viết lệnh tạm dừng G : Nhận xét đưa dạng toán áp dụng

H : Đọc ghi nhớ

H : Viết lên SGK, Đồ dùng học tập, bảng phụ

H : Viết SGK, Đồ dùng học tập, bảng phụ

1 Kiểu liệu :

- Interger : Số nguyên - Real : Số thực - Char : Kí tự - String : Xâu kí tự

2 Các phép tốn :

- Cộng : + Trừ : Nhân : * - Chia : /

- Chia lấy phần nguyên, phần dư : Div, mod

3 Một số lệnh để giao

tiếp người máy

a) Thơng báo kết tính tốn b) Nhập liệu

(37)

Hoạt động : Chữa tập SGK G : Chốt

G : Nhận xét đưa đáp án

H : Đọc đề H : Đọc câu trả lời chuẩn bị nhà

H : Nhận xét bạn

H : Đọc đề phần làm nhà

H : Đọc kết làm nhà

Bài :

Có thể nêu ví dụ sau đây:

a) Dữ liệu kiểu số liệu kiểu xâu kí tự Phép cộng định nghĩa liệu số, nghĩa liệu kiểu xâu b) Dữ liệu kiểu số nguyên liệu kiểu số thực Phép chia lấy phần nguyên phép chia lấy phần dư có nghĩa liệu kiểu số nguyên, khơng có nghĩa liệu kiểu số thực

Bài :

Dãy chữ số 2010 liệu 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; c: string; begin

writeln('2010'); writeln(2010); a:=2010; b:=2010; c:=’2010’ end Bài :

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, cịn lệnh Writeln('5+20=',20+5) in hình xâu kí tự '5+20' tổng 20 + sau: 5+20=25

Bài : Viết lại phép toán bằng TP

a)

a c

b d ;

b) ax2bx c ;

c)

1 a

(b 2)

x 5  ;

a) a/b+c/d;

b)

a*x*x+b*x+c ; b)

a*x*x+b*x+c ;

c)

(38)

d) (a2b)(1 c) d)

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

(a*a+b)*(1+c)* (1+c)*(1+c) Hoạt động : Chữa tập câu a chuẩn bị cho tiết kiểm tra tiết

G : Yêu cầu H làm câu a SGK, Đồ dùng học tập, bảng phụ

G : Nghiệm thu kết nhóm Nhận xét cho điểm

H : Làm việc theo nhóm

Viết biểu thức tốn học sau dạng biểu thức Pascal a) 15 30 12   ;

b)

10 18

3

 

  ;

c)

2

(10 2) (3 1)



 ;

d)

2

(10 2) 24

(3 1)

 

 .

G : Chốt lại kiến thức trọng tâm cần nắm để áp dụng làm tập V.Hướng dẫn nhà: hoc xem lại tập, ví dụ

Tuần 9: Tiết 18

Kiểm tra tiết A Mục tiêu :

1/Kiến thức:

- Cấu trúc chung chương trình,Các kiểu liệu,các phép tốn - Cách khai báo biến

2/Kỹ năng: cách chuyển phép toán sang ký hiệu NNLT 3/ Thái độ: nghiêm túc làm

Chuẩn bị đề kiểm tra Học sinh :

Ơn lại kiến thức học C Tiến trình tiết dạy :

(39)

Mức độ

Nội dung Biết Hiểu Vận dụng

III Dạy mới :

Hoạt động thầy trò Kiến thức cần đạt Hoạt động : Giáo viên phát đề cho học sinh

Đề :

Phần : Trắc nghiệm khách quan : Mỗi câu 0,5 điểm Khoanh tròn vào đáp án

Câu : Trong tên sau đây, tên hợp lệ ngôn ngữ Pascal

a 8a b tamgiac c program d bai tap

Câu : Để chạy chương trình Turbo Pascal ta dùng tổ hợp phím ? a Ctrl – F9 b Alt – F9 c F9 d Ctrl – Shitf – F9 Câu : Trong Pascal, khai báo sau cho khai báo biến ?

a Var tb: real; b Type 4hs: integer; c Const x: real; d Var R = 30; Câu : Biểu thức toán học (a2 + b)(1 + c)3 biểu diễn Pascal ? a (a*a + b)(1+c)(1 + c)(1 + c) b (a.a + b)(1 + c)(1 + c)(1 + c) c (a*a + b)*(1 + c)*(1 + c)*(1 + c) d (a2 + b)(1 + c)3

Câu : Writeln (‘Ban hay nhap nam sinh’); Readln (NS);

ý nghĩa hai câu lệnh :

a Thơng báo hình dịng chữ : “Ban hay nhap nam sinh” b Yêu cầu người sử dụng nhập giá trị cho biến

c Thông báo hình dịng chữ : “Ban hay nhap nam sinh” yêu cầu người sử dụng nhập giá trị cho biến NS

d Tất sai

Câu : Bốn bạn A, B, C, D đưa kết phép chia, phép chia lấy phần nguyên lấy phần dư hai số nguyên 14 sau :

A 14/5 =2 ; 14 div = ; 14 mod = B 14/5 =2.8 ; 14 div = ; 14 mod = C 14/5 =2.8 ; 14 div = ; 14 mod = D 14/5 =3 ; 14 div = ; 14 mod = Hãy chọn bạn làm

Phần : Tự luận

Câu : Viết biểu thức toán sau dạng biểu thức Pascal : (1,5 điểm) a 15(4 + 30 + 12)

(40)

b

10+x¿2 ¿ ¿ ¿

Câu : (5 điểm)

Viết chương trình nhập vào số a, b từ bàn phím, tính trung bình cộng hai số a, b in kết hình

Hoạt động : Nhận đề nghiêm túc làm

G : Quan sát nhắc nhở học sinh khơng nghiêm túc G : Có thể giải thích cần

H : Làm yêu cầu giáo viên giải đáp thắc mắc câu hỏi chưa hiểu đề

H : Nộp làm xong

Tuần 10: Tiết 19,20

Bài 5: TỪ BÀI TÓAN ĐẾN CHƯƠNG TRÌNH A Mục tiêu :

1/kiến thức: Biết khái niệm toán, cách xác định toán

2/Kỹ năng: Xác định Input, Output toán đơn giản; 3/Thái độ học tập: nghiêm túc, ghi chép, chia tư sáng tạo B Chuẩn bị :

1 Giáo viên : - SGK, SGV, tài liệu, Giáo án

- Đồ dùng dạy học máy tính, projector, Học sinh : - Đọc trước

III Dạy mới :

Hoạt động : Học sinh tìm hiểu khái niệm tốn, thuật tốn G : Muốn nhờ máy

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

(41)

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

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

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

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 : Đưa tốn lên hình

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

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

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

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

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ỳ ý

=> Viết chương trình gồm lệnh sau : 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 G : Nhận xét

chốt mơ hinh chương trình hình

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

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 cách xác định tốn G : Em hiểu

là 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 tốn :

- Bài tố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

(42)

IV.Cñng cè kiÕn thøc

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

V.Híng dÉn vỊ nhµ

? Xác định đầu vào đầu toá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

Tn 11 : TiÕt 21,22

Bµi 5: TỪ BÀI TỐN ĐẾN CHƯƠNG TRÌNH (t.t) A Mục tiêu :

1/kiến thức:

 Biết bước giải toá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

 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ố 2/kỹ năng: mô tả thuật toán toán đơn giản

3/ Thái độ học tập: nghiêm túc, ghi chép, chia tư sáng tạo B Chuẩn bị :

1 Giáo viên :

- Đồ dùng dạy học máy tính, projector, Học sinh :

- Đọc trước

I ổn định tổ chức lớp : - Kiểm tra sĩ số : - ổn định trật tự : II Kiểm tra cũ :

? Trình bày khái niệm tốn Viết chương trình ?

? Đọc đề tốn xác định đầu vào đầu tốn III Dạy mới :

Hoạt động : Học sinh biết bước giải tốn máy tính G :Giải tốn máy

tính nghĩa ?

G : Em hiểu

(43)

thuật toán ?

G : Để nhờ máy giải toán ta phải thực bước ?

G : Thu kết nhận xét chốt bước

G : Em hiểu thực chất chương trình ?

H : Trả lời

H : Nghiên cứu SGK (hình 4) viết bảng nhóm

* 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 (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

 Bước : Viết chương trình (lập trình) diễn đạt thuật tốn ngơn ngữ lập trình cho máy tính hiểu thực

Hoạt động : HS biết mơ tả thuật tốn phương pháp liệt kê bước G : Chỉ bước cần

thiết để pha trà khách ?

G : Mơ tả thuật tốn ?

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

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

G : Phát biểu khái niệm thuật toán ?

G : Chốt khái niệm

H : Nghiên cứu SGK H : Mơ tả thuật tốn bước

H : Nghiên cứu xếp lại theo trình tự để giải tốn

H : Trả lời H: ghi

4 Thuật toán mơ tả thuật tốn

- Mơ tả thuật toá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 qt 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 theo trình tự xác định để thu kết cần tìm từ điều kiện cho trước

5 Một số ví dụ thuật tốn

(44)

(SGK)

* 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 tốn

c Ví dụ : Cho hai số thực a b Hãy ghi kết so sánh hai số đó, chẳng hạn “a > b”, “a < b”, “a = b”

(SGK)

b Ví dụ : Tính tổng 100 số tự nhiên

* Xác định toán :

INPUT: Dãy 100 số tự nhiên (từ đến 100)

OUTPUT: Giá trị SUM = + + + 100

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 : V.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

Tuần 12: Tiết 23 Bài tập A Mục tiêu :

(45)

1/kiến thức: Xác định Input, Output toán đơn giản;Hiểu thuật toán hoán đổi giá trị số không dùng biến trung gian

2/Kỹ năng:Xác định toán

3/thái độ học tập: nghiêm túc, ghi chép, chia tư sáng tạo B Chuẩn bị :

1 Giáo viên : - SGK, SGV

- Đồ dùng dạy học Học sinh : - Kiến thức học

- Kiểm tra việc chuẩn bị nhà học sinh III Dạy :(Học sinh lên bảng làm(Trả lời) lấy điểm miệng)

A.Ôn lại cũ:

GV hỏi:hãy nêu trình giẩi tốn máy tính ? HS :Trả lời

B Bài tập

1. Hãy INPUT 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

2. Giả sử x y biến số Hãy cho biết kết việc thực thuật toán sau:

 Bước x  x + y  Bước y  x - y  Bước x  x - y

Xem lại kiến thức học tập chữa, tiết sau kiểm tra tiết Hường dẫn trả lời

1.

(46)

b) INPUT: Dãy n số

OUTPUT: Tổng phần tử lớn c) INPUT: Dãy n số

OUTPUT: Số số có giá trị nhỏ

2. Sau ba bước, x có giá trị ban đầu y y có giá trị ban đầu x, tức giá trị hai biến x y hoán đổi cho

IV.củng cố: xác định toán ta bám sát vào yêu cầu toán

V.Hướng dẫn vè nhà: xem tiếp tập cịn lại tìm vài tốn mà em học Tuần 12: Tiết 24

Bài tập A Mục tiêu :

1/kiến thức:

 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

2/Kỹ năng: mơ tả thuật tốn tốn đơn giản

3/Thái độ học tập: nghiêm túc, ghi chép, chai tư sáng tạo B Chuẩn bị :

1 Giáo viên : - SGK, SGV - Đồ dùng dạy học Học sinh : - Kiến thức học

- Kiểm tra việc chuẩn bị nhà học sinh III Dạy :(Học sinh lên bảng làm(Trả lời) lấy điểm miệng)

A.Ôn lại cũ:

GV hỏi:bài toán xác định bào toán ? HS :Trả lời

B Bài tập

Cho trước ba số dương a, b c Hãy mơ tả thuật tốn giải ghi kết ba số ba cạnh tam giác hay không

(47)

Hường dẫn trả lời 3. Mơ tả thuật tốn:

INPUT: Ba số dương a >0, b >0 c >0

OUTPUT: Thơng báo “a, b c ba cạnh tam giác” thông báo “a, b c ba cạnh tam giác”

Bước 1: Tính a + b Nếu a + b ≤ c, chuyển tới bước Bước 2: Tính b + c Nếu b + c ≤ c, chuyển tới bước Bước 3: Tính a + c Nếu a + c ≤ b, chuyển tới bước

Bước 4: Thông báo “a, b c ba cạnh tam giác” kết thúc thuật tốn Bước 5: Thơng báo “a, b c ba cạnh tam giác” kết thúc thuật toán

4. Có thể giải tốn cách sử dụng biến phụ khơng dùng biến phụ Thuật tốn Sử dụng biến phụ z

INPUT: Hai biến x y

OUTPUT: Hai biến x y có giá trị tăng dần Bước 1: Nếu x < y, chuyển tới bước

Bước 2: z  x Bước 3: x  y Bước 4: y  z

Bước 5: Kết thúc thuật toán

IV.củng cố: xác định toán ta bám sát vào yêu cầu toán

V.Hướng dẫn vè nhà: đọc tìm hiểu phần mềm sun times chức năng, cách sử dụng

Tuần 13 Tiết: 25,26

TÌM HIỂU THỜI GIAN VỚI PHẦN MỀM SUN TIMES A 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

2/ Kỹ :thao tác thực số chức phần mềm

3/Thái độ học tập :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

B Chuẩn bị :

(48)

C Tiến trình tiết dạy : I ổn định tổ chức lớp : - Kiển tra sĩ số :

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

Hoạt động GV Họat động HS Kiến thức cần đạt 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 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

Quan sát Theo dõi Nghe giảng

Quan sát Theo dõi Nghe giảng 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

Màn hình phần mềm đồ nước giới Hãy quan sát kĩ để hiểu nhận biết thông tin mà đồ mang lại

c) Thoát khỏi phần mềm

Muốn thoát khỏi phần mềm thực lệnh FileExit nhấn tổ hợp phím Alt+F4 Hướng

(49)

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)

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:

Em quan sát vùng có màu đen đồ Đó vùng có thời gian ban đêm Xung

Thực hành

Thực hành Thực hành Thực hành

Thực hành

a) Phóng to quan sát vùng đồ 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 đêm

Quan sát kĩ vùng cho em nhiều thông tin thú vị

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,

Vùng đệm chuyển ngày đêm:

sáng sớm Vùng đệm chuyển

(50)

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

Lần chạy phần mềm, thời gian đồ tính theo thời gian hệ thống máy tính Tuy nhiên, em thay đổi thời gian nút lệnh công cụ

Thực hành

Giờ, Phút Giây

Nháy nút để lấy lại trạng thái thời gian hệ thống máy tính

Bằng cách thay đổi thời gian, em quan sát phát nhiều điều thú vị:

Ngày 12 tháng 7: Hiện tượng "đêm trắng"

điểm cực Bắc Trái Đất

Ngày 12 tháng 12: Hiện tượng "đêm trắng" xuất điểm cực Nam Trái Đất, cực Bắc "ngày đen"

IV.củng cố:

- Phần mềm giúp em hiểu biết gì?

- Các thao tác khởi động, khỏi phần mềm nào?và cách sử dụng?

V.Đặn dò: nhà em đọc trước phần SGK tìm hiểu cách sử dụng phần mềm

Tuần 14 Tiết: 27,28

(51)

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

2/ Kỹ :thao tác thực số chức phần mềm

3/Thái độ học tập :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

B Chuẩn bị :

GV : giới thiệu phần mềm sum times ,nêu cách thoát khỏi phần mềm ? III Tiến trình dạy – học:

 Vào mùa hè, tháng 6, 7, 8, khối màu đen

 Vào cuối năm, tháng 11, 12, tháng

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:

Để thay đổi trạng thái thay đổi

Thực hành

Thực hành Thực hành

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

(52)

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: Chọn vị trí ban đầu (Hà Nội) 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à 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

Thực hành

Thực hành Thực hành

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

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 Thực lệnh View  Eclipse Cửa sổ nhỏ sau xuất

(53)

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ụ:

e) Quan sát chuyển động 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

IV.củng cố:

- Phần mềm giúp em hiểu biết gì? - Các thao tác cách sử dụng phần mềm nào?

V.Đặn dị: nhà em đọc trước tìm hiểu họat động phụ thuộc điều kiện nào?

Tuần 15 : Tiết 29 :

Bài : CÂU LỆNH ĐIỀU KIỆN A.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

 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 dạng đủ Pascal 2/kỹ năng: Bước đầu viết câu lệnh điều kiện Pascal

3/ thái độ học tập: nghiêm túc, ghi chép, chia tư sáng tạo B.Chuẩn bị :

 Gv : tranh vẽ hình 32

 Hs : chuẩn bị cũ thật tốt, xem trước C.Tiến trình dạy học :

II Kiểm tra cũ :

Hãy mô tả thuật tốn tìm giá trị lớn hai số ?  Bước : Max:= a (hoặc Max:=b);

(54)

Hoạt động GV Họat động HS Kiến thức cần đạt Họat đông 1.biết họat động phụ thuộc vào điều kiện

Cho ví dụ hoạt động phụ thuộc điều kiện ?

Nếu chiều trời khơng mưa, em chơi bóng

Nếu em bị ốm, em nghỉ học

Từ “nếu” câu dùng để “điều kiện” hoạt động sau phụ thuộc vào điều kiện

Nêu điều kiện hoạt động phụ thuộc điều kiện ví dụ

Các điều kiện : chiều trời không mưa, em bị ốm

Các hoạt động phụ thuộc điều kiện : em chơi bóng, em nghỉ học

Cho ví dụ

Trả lời

Trả lời, lên bảng trình bày

1 Hoạt động phụ thuộc vào điều - Có hoạt động thực điều kiện cụ thể xảy Điều kiện thường kiện mô tả sau từ

Họat động nhận biết phân biệt tính sai điều kiện  Mỗi điều kiện nói mơ tả

dưới 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 kiết kiểm tra ?

Điều kiện

Kiểm tra Kết

Hoạt động Trời

không mưa ?

Buổi chiều nhìn ngồi trời thấy trời khơng mưa

Đúng

Sai

Đi chơi bóng

Ở nhà Em bị

ốm ?

Cảm thấy khoe mạnh Sai Đúng Ở nhà Đi học Trả lời

Qyan sát trả lời

2.Tính sai đ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 diều kiện khơng thoả mãn

 Ví dụ :

Nếu nháy nút “x” góc trên, bên phải cửa sổ, (thì) cửa sổ đóng lại

Nếu X>5, (thì hãy) in giá trị X hình

Nếu nhấn phím Pause/Break, (thì) chương trình (sẽ bị) ngưng Họat động 3.biết mối quan hệ điều kiện phép so sánh

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 Chúng thường sử dụng để biểu diễn điều kiện 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

Theo dõi 3.Điều kiện phép so sánh - Các phép so sánh thường sử dụng để biểu diễn điều kiện

- Các phép so sánh cho kết sai

IV.củng cố:

- Nắm vững họat động phụ thuộc vào điều kiện - Biết tính sai điểu kiện

-Biết mối quan hệ điều kiện phép toán so sánh

(55)

Tuần 15 : Tiết 30 :(TT)

Bài : CÂU LỆNH ĐIỀU KIỆN A.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 đủ

 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 dạng đủ Pascal 2/ kỹ năng:Bước đầu viết câu lệnh điều kiện Pascal

3/Thái độ học tập: nghiêm túc, ghi chép, chia tư sáng tạo B.Chuẩn bị :

 Gv : tranh vẽ hình 32

 Hs : chuẩn bị cũ thật tốt, xem trước C.Tiến trình dạy học :

GV: Em nêu ví dụ hoạt động hàng ngày em có phụ thuộc vào điều kiện? Phân tích?

III Dạy mới :

Họat động GV Họat động HS Nội dung hoạt động gv Họat động 1.biết cấu trúc rẽ nhánh

Ta biết rằng, thực chương trình, máy tính thực câu lệnh, từ câu lệnh đến câu lệnh cuối Trong nhiều trường hợp, muốn máy tính thực câu lệnh đó, điều kiện cụ thể thoả mãn; ngược lại, điều kiện khơng thoả mãn bỏ qua câu lệnh thực câu lệnh khác

Theo dõi, quan sát

4.Cấu trúc rẽ nhánh

Ví dụ Một hiệu sách thực đợt khuyến lớn với nội dung sau: Nếu mua sách với tổng số tiền 100 nghìn đồng, khách hàng giảm 30% tổng số tiền phải tốn Hãy mơ tả hoạt động tính tiền cho khách Ta mơ tả hoạt động tính tiền cho khách hàng bước đây: Bước Tính tổng số tiền T khách hàng mua sách

Bước Nếu T ≥ 100000, số tiền phải toán = 70%  T

Bước In hoá đơn Tính tiền cho khách hàng

Cách thể hoạt động phụ thuộc vào điều kiện gọi cấu trúc rẽ nhánh dạng thiếu

Hoạt động biết câu lệnh điều kiện thể cấu trúc rẽ nhánh Đưa lệnh : if ….then….else

(56)

Với dạng expl lệnh thi hành

Với dạng expl lệnh thực ngược lại thực lệnh

Đưa lưu đồ cho dạng

Dạng

Hãy viết chương trình tìm giá trị lớn hai số nguyên

theo dõi, quan sát

Dạng

If < Điều kiện > then Lệnh;

Dạng

If < Điều kiện > then Lệnh

Else

Lệnh ;

Trước else khơng có dấu chấm phẩy Trong Expl biểu thức logic Cách thi hành lệnh sau:

 Với dạng expl lệnh thi hành

 Với dạng expl lệnh thực ngược lại thực lệnh

Dạng

Ví dụ :Hãy viết chương trình tìm giá trị lớn hai số nguyên

Giải :

Program GTLN; Uses crt;

Var a, b, Max : Integer; Begin

Clrscr;

Write (‘a=’) ; Readln(a); Write (‘b=’) ; Readln(b); Max: =a;

If a < b then Max : = b;

Writeln (‘ gia tri lon nhat cua hai so a, b la :’, Max) ;

Readln; End

Lệnh đúng Điều kiện

(57)

Hãy viết lại tập sử dụng câu lệnh dạng if ….then……else

Cách khác :

Program GTLN; Uses crt;

Var a, b, Max : Integer; Begin

Clrscr;

Write (‘a=’) ; Readln(a); Write (‘b=’) ; Readln(b); If a < b then

Max : = b Else

Max : = a;

Writeln (‘ gia tri lon nhat cua hai so a, b la :’, Max) ;

Readln; End IV.củng cố:

 Nắm vững hai dạng câu lệnh điều kiện  Biết vẽ lưu đồ hai câu lệnh điều kiện

 Làm tập sách chuẩn bị thực hành V Hướng dẫn học nhà :

1. Câu lệnh if <điều kiện> then <câu lệnh> thực sau:

2. Trước tiên điều kiện kiểm tra, điều kiện thoả mãn, câu lệnh thực chuyển đến lệnh Nếu điều kiện không thoả mãn, câu lệnh bị bỏ qua chuyển đến lệnh

3. Khi thực câu lệnh:

if <điều kiện> then <câu lệnh 1> else <câu lệnh 2>;

trước tiên điều kiện kiểm tra, điều kiện thoả mãn, câu lệnh thực hiện, câu lệnh bị bỏ qua chuyển đến câu lệnh Nếu điều kiện không thoả mãn, câu lệnh bị bỏ qua, câu lệnh thực hiện, sau chuyển đến câu lệnh

4. Có thể sử dụng câu lệnh if…then lồng

5. Sử dụng từ khố and kết hợp nhiều phép so sánh đơn giản thành phép so sánh phức hợp Giá trị phép so sánh tất phép so sánh thành phần Ngược lại, có giá trị sai

Ví dụ: (a > 0) and (a ≤ 5)

Từ khoá or sử dụng để kết hợp nhiều phép so sánh đơn giản Giá trị phép so sánh sai tất phép so sánh thành phần sai Ngược lại, có giá trị

Bài Thực hành số : SỬ DỤNG CÂU LỆNH IF ….THEN A Mục đích, yêu cầu :

(58)

 Luyện tập sử dụng câu lệnh if … Then

 Rèn luyện kĩ ban đầu đọc chương trình đơn giản hiểu ý ghĩa thuật toán sử dụng chương trình

3/Thái độ học tập: nghiêm túc, ghi chép, cia tư sáng tạo B Chuẩn bị :

1 Giáo viên :

I ổn định tổ chức lớp : - Kiển tra sĩ số : - ổn định trật tự : II Nội dung

Họat động làm quen câu lệnh if then Program sapxep;

Uses crt;

Var : a, b : integer; Begin

Clrscr;

Write (‘a=’) ; readln(a); Write (‘b=’) ; readln(b);

If a < b then write (a, ‘ ‘, b) else write (b, ‘ ‘, a);

Readln; End

theo dõi, quan sát thực hành

Bài : Viết chương trình nhập hai số nguyên a b từ bàn phím in hai số hình theo thứ tự khơng giảm

Họat động biết sử dụng câu lệnh if then làm quen câu lệnh if then else program Ai_cao_hon;

uses crt;

var Long, Trang: Real; begin

clrscr;

write('Nhap chieu cao cua Long:'); readln(Long);

write('Nhap chieu cao cua Trang:'); readln(Trang);

If Long>Trang then writeln('Ban Long cao hon'); If Long<Trang then writeln('Ban Trang cao hon')

theo dõi, quan sát thực hành

(59)

else writeln('Hai ban cao bang nhau');

readln end

IV.củng cố: nêu lại cấu trúc câu lệnh điều kiện nhận biết sử dụng dạng 1,2? V Hướng dẫn học nhà :

 Nắm vững hai dạng câu lệnh điều kiện  Biết vẽ lưu đồ hai câu lệnh điều kiện

 Làm tập sách chuẩn bị thực hành Tuần 16: Tiết 32(TT)

Bài thữc hành số : SỬ DỤNG CÂU LỆNH IF ….THEN A Mục đích, yêu cầu :

1/kiến thức: hiểu câu lệnh rẽ nhánh, chuyển biểu thức điều kiện sang biểu diễn NNLT 2/kỹ năng:

 Luyện tập sử dụng câu lệnh if … Then

 Rèn luyện kĩ ban đầu đọc chương trình đơn giản hiểu ý ghĩa thuật toán sử dụng chương trình

3/Thái độ học tập: nghiêm túc, ghi chép, cia tư sáng tạo B Chuẩn bị :

1 Giáo viên :

I ổn định tổ chức lớp : - Kiển tra sĩ số : - ổn định trật tự : II Kiểm tra cũ:

III.Quá trình th c h nh:ự à

Hoạt động GV Hoạt động HS Kiến thức cần đạt

Hoạt động biết sử dụng câu lệnh if then else Program Ba_canh_tam_giac;

uses crt;

Var a, b, c: real; Begin

Clrscr;

write('Nhap ba so a, b va c:'); readln(a,b,c);

If (a+b>c) and (b+c>a) and (c+a>b) then

writeln('a, b va c la canh cua mot tam giac!')

Thực hành Bài Dưới chương trình nhập ba số dương a, b, c từ bàn phím, kiểm tra in hình kết kiểm tra ba số độ dài cạnh tam giác hay không

(60)

else writeln('a, b, c khong la canh cua tam giac!');

end

Hoạt động giải đề cương ôn tập kiểm tra tiết

IV.củng cố: nêu lại cấu trúc câu lệnh điều kiện nhận biết sử dụng dạng 1,2? V Hướng dẫn học nhà :

học xem lại tập tiết sau kiểm tra

KIỂM TRA TIẾT THỰ HÀNH A Mục tiêu :

1/kiến thức: khai báo biến, cấu trúc chung chương trình 2/kỹ năng:

 Thực thao tác khởi động/kết thúc TP, làm quen với hình soạn thảo TP  Soạn thảo 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 3/thái độ học tập: nghiêm túc làm

I ổn định tổ chức lớp : - Kiển tra sĩ số : II Kiểm tra cũ :

Kiểm tra trình thực hành III Dạy :

(61)

Bài : Viết chương trỡnh nhập vào số từ bàn phớm, kiểm tra xem tổng hai số đú số chẵn hay le

Bài : Viết chương trình giảI phương trình bậc AX+B=0(Sử dụng lệnh if-then – else Điểm

Làm kiểm tra

Bài 1:

Program kiemtra_chan_le; Var a,b,p :Integer;

Begin

Writeln(‘ Chuong trinh kiem tra tong so ’); Write(‘ Nhap hai so tu ban phim : ’); Readln(a,b);

P:=a+b;

If ( p mod = 0) then

Writeln(‘ Tong hai so la so chan ’ ) Else

Writeln(‘ Tong hai so la so le ’); Readln;

End Bài :

Program GIAI_PHUONG_TRINH_BAC_NHAT; Uses crt;

Var a,b,x:interger; Begin

Clrscr;

Writeln('GIAI PHUONG TRINH BAC NHAT); '); Write ('Nhap a= '); readln(a);

Write('Nhapb=');readl n(b); If(a=0) then

If(b=0) then

Writeln(' Phuong trinh co vo so nghiem') Else

Writeln(‘Phuong trinh vo nghiem’) Else

Writeln('Phuong trinh co nghiem x=',-b/a); Readln;

(62)

Tuần 17,18: Tiết 34,35 Ôn tập A Mục tiêu :

1/kiến thức:

 Tìm hiểu số toán cụ thể, biết khái niệm toán  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ể  Tìm hiểu cách khai báo biến trương trình

 Tìm hiểu phép toán phép so sánh Pascal  Câu lệnh rẽ nhánh

2/kỹ năng:

 Xác định Input, Output toán đơn giản;  Biết mơ tả thuật tốn phương pháp liệt kê bước

 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 độ học tập: nghiêm túc, ghi chép, chia tư sáng tạo

B Chuẩn bị :

I ổn định tổ chức lớp : - Kiển tra sĩ số : - ổn định trật tự : II Kiểm tra cũ : III Dạy mới :

Hoạt động GV Hoạt động HS Kiến thức cần đạt Họat động củng cố lý thuyết

-Nhắc lại phép toán pascal kiểu liệu Pascal

Ví dụ Bảng liệt kê số kiểu liệu ngơn ngữ lập trình Pascal:

Trả lời

Lờn bảng trỡnh bày

Nội dung ơn tập

+ Từ khố tên chương trình Pascal + Cấu trúc chung chương trình

+ Dữ liệu kiểu liệu + Các phép toán với kiểu liệu số

+ Sử dụng biến chương trình Pascal + Thuật tốn mơ tả thuật tốn

(63)

Viết lại phép toán TP

a)

a c

b d ;

b) ax2bx c ;

c)

1 a

(b 2)

x 5  ;

d) (a2b)(1 c)

a) a/b+c/d;

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

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

d)

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

Trả lời

Lờn bảng trỡnh bày

—Then Else) VD:

Hoạt động 2.giải đề cương ôn thi hkI IV.củng cố:

- Nêu lại loại liệu, phép toán cấu trúc câu lệnh rẽ nhánh V Hướng dẫn học nhà :

Học làm thêm tập đề cương

Tên kiểu

Phạm vi giá trị

integer Số nguyên khoảng 2

15 đến 215



real

Số thực có giá trị tuyệt đối khoảng 2,910-39 đến 1,71038 số

(64)

ĐỀ KIỂM TRA HỌC KỲ I MÔN : TIN HỌC

Thời gian : 45 phút Lớp: 8

Đề : 1,2

Phần 1: Trắc nghiệm khách quan(2.5 Điểm) : Hãy chọn đáp án

Câu Trong tên sau đây, tên hợp lệ ngôn ngữ Pascal: (0.5 điểm)

a 8a b tamgiac c program d bai tap

Câu Để chạy chương trình ta sử dụng tổ hợp nào: (0.5 điểm)

a Ctrl – F9 b Alt – F9 c F9 d Ctrl – Shitf – F9 Câu Trong Pascal, khai báo sau đúng? (0.5 điểm)

a Var tb: real; b Type 4hs: integer; c const x: real; d Var R = 30;

Câu 4: Muốn in lên hình sịng chữ “Toi la Hs lop 8” ta sử dụng câu lệnh sau A Toi la Hs lop := integer; B Read(‘Toi la Hs lop 8’);

C Writeln (‘Toi la Hs lop 8’); D Var Toi la Hs lop 8:String

Câu Biểu thức toán học (a2 + b)(1 + c)3 biểu diễn Pascal ? (0.5 điểm)

a (a*a + b)(1+c)(1 + c)(1 + c) b (a.a + b)(1 + c)(1 + c)(1 + c) c (a*a + b)*(1 + c)*(1 + c)*(1 + c) d (a2 + b)(1 + c)3

Câu 6: Writeln (‘Ban hay nhap nam sinh’); (0.5 điểm) Readln (NS);

Ý nghĩa hai câu lệnh là:

a Thơng báo hình dòng chữ: “Ban hay nhap nam sinh” b Yêu cầu người sử dụng nhập giá trị cho biến NS

c Thơng báo hình dịng chữ: “Ban hay nhap nam sinh” yêu cầu người sử dụng nhập giá trị cho biến NS

d Tất sai II Phần tự luận: (đề 1)

Câu 6: Viết biểu thức toán sau dạng biểu thức Pascal: (2 điểm) a 15x2 +30(x+2)

b 10

+x¿2 ¿ ¿ ¿

Câu 7: Viết chương trình giải phương trình bậc AX+B=0(Sử dụng lệnh if- then – else Điểm)

III Phần tự luận (Đề 2):

(65)

a (a3 + b)(1 + c3)

b

2

(2 )

3

x x y

y



  



Câu 8: (5 điểm)

Viết chương trình nhập vào số từ bàn phím, kiểm tra xem tổng hai số số chẵn hay le

Đáp án:

Phần 1: Trắc nghiệm khách quan đề 2(2.5 Điểm) : Hãy ch n áp án úng nh tọ đ đ ấ

Câu

Đáp án

đúng B A A C C C

Phần II: Phần tự luận.đề Câu 7:

a 15*x*x + 30*(x+2)

b (10 + x)*(10 + x)/(3 + y) – 18/(5+y) Câu 8:

Program GIAI_PHUONG_TRINH_BAC_NHAT; Var a,b,x:real; Begin

Clrscr;

Writeln('GIAI PHUONG TRINH BAC NHAT: AX + B=0'); '); Write ('Nhap a= '); readln(a);

Write ('Nhap b='); readln(b); If(a=0) then If(b=0) then

Writeln(' Phuong trinh co vo so nghiem') Else

Writeln(‘Phuong trinh vo nghiem’) Else

Writeln('Phuong trinh co nghiem x=',-b/a); Readln;

End

Phần III: Phần tự luận.đề Câu 7:

c (a*a*a + b)* (1 + c*c*c) b (2*x+y)*(2*x+y) +1/3 – (4*x +5)/(6*y + 7); Câu 8:

Program kiemtra_chan_le; Var a,b,p :Integer;

Begin

Writeln(‘ Chuong trinh kiem tra tong so ’); Write(‘ Nhap hai so tu ban phim : ’); Readln(a,b); P:=a+b;

If ( p mod = 0) then Writeln(‘ Tong hai so la so chan ’ ) Else Writeln(‘ Tong hai so la so le ’);

(66)

(67)

Tuần 19 :

Tiết 37: Bài 7: CÂU LỆNH LẶP

A Mục tiêu : 1/ Kiến thức :

Biết nhu cầu cần có cấu trúc 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

2/ Kỹ :

Xác định tình phải lặp lặp lại nhiều lần 3/ Thái độ:

Thái độ nghiêm túc cẩn thận, ghi chép, chia tư sáng tạo B Chuẩn bị :

III Dạy mới :

Hoạt động GV Hoạt động HS Kiến thức cần đạt Hoạt động : Các công việc phải thực nhiều lần Trong

sống ngày, nhiều hoạt động thực lặp lặp lại nhiều lần ví dụ: - Các ngày tuần em lặp lặp lại hoạt động buổi sáng đến trường buổi trưa trở nhà

- Các em học phải đọc đọc lại nhiều lần thuộc

Hãy cho thêm

Nghiên cứu sách giáo khoa

Nghiên cứu

1 Các công việc phải thực nhiều lần

- Có hoạt động mà thực lặp với số lần định biết trước cơng việc có số lần trước

VD

+ số lần lặp biết trứơc:

Các ngày tuần em lặp lặp lại hoạt động buổ sáng đến trường buổi trưa trở nhà

+ Số lần lặp trước:

Trong trận cầu lông em lặp lặp lại công việc đánh cầu kết thúc trận cầu

(68)

một vài ví dụ thực tế đời sống ngày mà ta phải thực thao tác lặp lặp nhiều lần? Gv: Khi viết chương trình máy tính vậy, nhiều trường hợp ta phải viết lặp lại nhiều câu lệnh để thực phép tính định

sách giáo khoa

Cho thêm ví dụ

Ghi nội dung học

Hoạt động : Câu lệnh lặp – lệnh thay cho nhiều lệnh Gv: Gọi hs lên bảng

vẽ hình vng cạnh đơn vị độ dài (20cm) yêu cầu lớp theo dõi bạn thực thao tác bảng

Yêu cầu hs mô tả bước bạn vẽ bảng

Vậy bạn vẽ hình vng thực thao tác? (hs trả lời thao tác vẽ đoạn thẳng)

GV: Gợi ý thêm thao tác quay thước

Các thao tác nào?

Gv: Như vẽ hình vng có thao tác lặp lặp lại Thuật tốn sau mơ tả bước để vẽ hình vng

Gv: Mơ tả thuật tốn bảng

Lên bảng vẽ hình

Trả lời

2/ Câu lệnh lặp – lệnh thay cho nhiều lệnh VD1: giả sử ta cần vẽ hình vng có cạnh đơn vị hình sau:

Mỗi hình vng ảnh hình bên trái dịch chuyển khoảng đơn vị

Bước 1: vẽ hình vng(vẽ liên tiếp cạnh trở đỉnh ban đầu)

Bước 2: Nếu số hình vng vẽ , di chuyển bút vẽ bên phải đơn vị trở lại bước 1; ngược lại kết thúc thuật tốn

VD2

Riêng với tốn vẽ hình vng thao tác vẽ bốn cạnh nhau,hay lặp lại lần thao tác vẽ đoạn thẳng

Thuật tốn mơ tả bước để vẽ hình vng Bước 1: k ← (k số đoạn thẳng vẽ được) Bước 2: k ← k+1 Vẽ đoạn thẳng đơn vị độ dài quay thước 900 sang phải.

Bước 3: Nếu k<4 quay lại bước 2; ngược lại kết thúc

(69)

Gv: Mơ tả thuật tốn tính tổng số tự nhiên từ 1→ 100

Bước 1: S ← 0; i ← Bước 2: i← i +

Bước 3: i ≤ 100, S ← S + i quay lại bước 2; ngược lại kết thúc

i biến đếm

Mô tả thuật tốn gọi cấu trúc lặp

Mọi ngơn ngữ lập trình có cách thị cho máy tính thực cấu trúc lặp với câu lệnh Đó câu lệnh lặp

IV: Củng cố kiến thức:

1/ Các công việc phải thực nhiều lần ?

2/ Câu lệnh lặp – câu lệnh thay cho nhiều lệnh V: Hướng dẫn nhà:

- Học bài, xem lại lấy thêm ví dụ

- Chuẩn bị học cho tiết sau (học tiếp câu lệnh lặp)

Ngày soạn : Ngày dạy :

Tuần 19 : Tiết 38:

Bài 7: CÂU LỆNH LẶP A Mục tiêu :

1/ Kiến thức:

Hiểu cú pháp, hoạt động câu lệnh với số lần biết trước for Pascal Hiểu lệnh ghép Pascal

Hiểu cách mô cấu trúc câu lệnh lặp 2/ Kỹ năng:

Viết lệnh for số tình đơn giản Mơ câu lệnh lặp

3/ Thái độ:

Thái độ nghiêm túc cẩn thận, chia tư sáng tạo B Chuẩn bị :

(70)

HS :Nêu công việc phải thực nhiều lần, nêu vd III Dạy mới :

Hoạt động GV Hoạt động HS Kiến thức cần đạt Hoạt động : Ví dụ câu lệnh lặp

Gv: minh họa bẳng ngôn ngữ Pascal cú pháp câu lệnh for … to …

Lưu ý cho hs:

- biến đếm biến đơn có kiểu nguyên;

- giá trị đầu giá trị cuối biểu thức có kiểu với biến đếm giá trị cuối phải lớn giá trị đầu;

- câu lệnh câu lệnh đơn giản hay câu lệnh ghép

Cho hs nhận xét so sánh khác câu lệnh lặp hai vd trên? Gv: Giải thích cho học vd2 câu lệnh lặp có begin … end

Nghiên cứu SGK

Cú Pháp câu lệnh lặp với số lần biết trước Pascal

for<biến đếm>:= <giá trị đầu> to <giá trị cuối> <câu lệnh>

trong đó:

+ for, to, từ khóa

+ biến đếm biến đơn có kiểu nguyên

+ giá trị đầu giá trị cuối biểu thức có kiểu với biến đếm giá trị cuối phải lớn giá trị đầu

+ câu lệnh câu lệnh đơn giản hay câu lệnh ghép

Vd 1: Chuong trình in hình thứ tự lần lặp Program lap;

var i:integer; begin

for i:= to 20

writeln(‘Day la lan lap thu’,i); readln;

end

Vd2: chương trình ghi nhận vị trí 10 chữ O rơi từ xuống

ues crt; var i:integer; begin

clrscr;

for i:= to 20 begin

writeln(‘O’); delay(200); end;

readln; end

(Delay (200)là hàm khai báo thời gian rơi nhanh hay chậm chữ O)

*Lưu ý: Cõu lệnh đơn giản Writeln(‘O’) Delay(200) đặt từ khoá BEGIN AND để tạo thành câu lệnh ghép PASCAL Hoạt động : Tính tổng tích câu lệnh lặp

Gv: trình bày đoạn chương trình tính tổng N số tự nhiên, với N số tự nhiên nhập từ bàn phím (Pascal)

Theo cơng thức tính tổng ta cần

Nghiên cứu SGK Trả lời câu hỏi

Vd 1: chương trình tính tổng N số tự nhiên đầu tiên, với N số tự nhiên nhập từ bàn phím

(71)

khai báo biến? kiểu biến?

Trong biến biến có giá trị nhập từ bàn phím?

Gv: Mơ tả thuật tốn tính tổng số tự nhiên từ 1→ 100

program Tinh_tong; var N,i:integer;

S:longint; begin

write(‘Nhap so N = ‘); readln(N);

S:= 0;

for i:= to N S:= S+i;

writeln(‘Tong cua’, N, ‘so tư nhien dau tien S = ‘, S); readln;

end

*Kiểu longint có phạm vi từ -231 đến 231 – 1. Vd 2: chương trình tính tích N số tự nhiên, với N số tự nhiên nhập từ bàn phím

N! = 1.2.3….N

program Tinh_Giai_Thua; var N,i:integer;

P:longint; begin

write(‘Nhap so N = ‘); readln(N);

P:= 1;

for i:= to N P:= P*i;

writeln( N, ‘! = ‘, P); readln;

end IV: Củng cố kiến thức:

1/ Cấu trúc lặp chương trình dùng để làm gì?

2/ Trong ngơn ngữ lập trình Pascal cấu trúc lặp với số lần lặp cho trước thể với câu lệnh nào?

V: Hướng dẫn nhà:

- Học bài, xem lại lấy thêm ví dụ

- Chuẩn bị tập có hoạt động lặp lại cho tiết sau

(72)

Biết nhu cầu cần có cấu trúc 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 với số lần biết trước for Pascal Hiểu lệnh ghép Pascal

2/ Kỹ năng:

Viết lệnh for số tình đơn giản 3/ Thái độ:

I ổn định tổ chức lớp : - Kiển tra sĩ số : II Kiểm tra cũ :

HS :Nêu cấu trúc câu lệnh lặp pascal III Dạy :

Bài tập:

1. Cho vài ví dụ hoạt động thực lặp lại sống hàng ngày! 2. Hãy mô tả bước thuật tốn để vẽ hình a) b) sau đây:

Hình a) Hình b)

Thao tác lặp cần thực để có hình điều kiện để kết thúc thao tác

3. Hãy cho biết tác dụng câu lệnh lặp!

4. Chúng ta nói thực hoạt động lặp, chương trình kiểm tra điều kiện

Với lệnh lặp

for <biến đếm> := <giá trị đầu> to <giá trị cuối> <câu lệnh>; Pascal, điều kiện cần phải kiểm tra gì?

Giải:

1. Có thể nêu nhiều vài ví dụ hoạt động lặp Dưới số ví dụ:

(73)

b) Hàng ngày (hoặc hàng tuần) bác lái xe khách lái xe để chuyên chở hành khách xuất phát từ thời gian địa điểm định theo tuyến đường xác định trước

c) Mỗi lần khởi động, máy tính em thực hoạt động tự kiểm tra thành phần máy tính, sau khởi động hệ điều hành theo trình tự quy định trước

2. a) Có thể thấy, để vẽ hình a), thao tác cần thực vẽ nửa đường tròn

theo hướng định Ta gọi thao tác vẽ nửa đường tròn theo hướng A vẽ nửa đường trịn có bán kính đơn vị điểm xác định, đường kính nối điểm đầu điểm cuối nửa đường trịn vng góc với hướng A nửa đường trịn “cong hướng A” (hình ) Ta xét A hướng lên trên, xuống dưới, sang trái, sang phải

Với hướng, ta định nghĩa phép toán sau: lên + = sang trái, sang trái +1 = xuống dưới, xuống +1 = sang phải, sang phải +1 = lên Khi mơ tả bước thuật tốn để vẽ hình a) như sau:

Hình Hình

Có thể mơ tả bước thuật tốn để vẽ hình a) sau: Bước Xác định điểm bắt đầu vẽ X

Bước Đặt i = đặt hướng = lên Bước Vẽ nửa đường tròn theo hướng đặt Bước i = i +

Bước Nếu i > 4, chuyển bước 6; ngược lại, đặt hướng = hướng + quay lại bước Bước Kết thúc thuật tốn

Lưu ý Khi trình bày thuật tốn lần cho học sinh khơng nên định nghĩa phép toán với hướng mà nên liệt kê đủ bốn hướng thuật toán

b) Thuật toán tương tự Thao tác cần lặp lại vẽ hình vng Tại bước, giữ ngun tâm hình vng thay đổi hướng vẽ góc 30o.

3. Câu lệnh lặp có tác dụng làm đơn giản giảm nhẹ công sức người viết chương trình! 4. Chúng ta nói thực hoạt động lặp, chương trình kiểm tra điều kiện

Với lệnh lặp

for <biến đếm> := <giá trị đầu> to <giá trị cuối> <câu lệnh>;

của Pascal, điều kiện cần phải kiểm tra giá trị biến đếm lớn giá trị cuối Nếu điều kiện không thỏa mãn, câu lệnh tiếp tục thực hiện; ngược lại, chuyển sang câu lệnh chương trình

IV.Củng cố: Viết lại cú pháp câu lệnh lặp Lợi ích câu lệnh lặp

V Dặn dò: học thuộc cú pháp câu lệnh lặp Mô cac tập

(74)

BÀI TẬP A Mục tiêu :

1/ Kiến thức:

Hiểu cú pháp, hoạt động câu lệnh với số lần biết trước for Pascal Hiểu lệnh ghép Pascal

Hiểu cách mô cấu trúc câu lệnh lặp 2/ Kỹ năng:

Viết lệnh for số tình đơn giản Mơ câu lệnh lặp

3/ Thái độ:

HS :Trình bày cấu trúc câu lệnh lặp pascal III Dạy :

Bài tập:

5. Chương trình Pascal sau thực hoạt động nào?

var i: integer; begin

for i:=1 to 1000 do; end

6. Hãy mô tả thuật tốn để tính tổng sau (n số tự nhiên nhập vào từ bàn phím):

A = 1 31 +

2 4+

3 5+ n(n+1)

7. Các câu lệnh Pascal có hợp lệ khơng, sao?

a) for i:=100 to writeln(’A’); b) for i:=1.5 to 10.5 writeln(’A’); c) for i=1 to 10 writeln(’A’); d) for i:=1 to 10 do; writeln(’A’);

e) var x: real; for x:=1 to 10 writeln(’A’);

8. Một số ngơn ngữ lập trình, ví dụ Pascal, khơng có sẵn hàm tính lũy thừa Hãy mơ tả thuật

tốn sử dụng câu lệnh lặp với số lần xác định trước để viết chương trình Pascal tính lũy thừa bậc n số ngun X

9. Viết chương trình Pascal nhập n số ngun từ bàn phím ghi hình số lớn

(75)

10.Viết chương trình Pascal nhập n số nguyên từ bàn phím ghi hình số số

dương số Số n nhập vào từ bàn phím (Xem Bài tập 5a, Bài 5.)

Giải:

5. Tuy có vịng lặp 1000 lần, chương trình Pascal nói khơng thực

hoạt động Tuy nhiên câu lệnh hợp lệ

6. Thuật tốn tính tổng

A = 1 31 +

2 4+

3 5+ n(n+1)

Bước Gán A  0, i  Bước A 

1

( 2)

i i .

Bước i  i +

Bước Nếu i ≤ n, quay lại bước

Bước Ghi kết A kết thúc thuật toán

7. Trừ d), tất câu lệnh không hợp lệ: a) Giá trị đầu phải nhỏ giá trị cuối; b)

Các giá trị đầu giá trị cuối phải số nguyên; c) Thiếu dấu hai chấm gán giá trị đầu; d) Thừa dấu chấm phảy thứ nhất, ta muốn lặp lại câu lệnh writeln(’A’)mười lần, ngược lại câu lệnh hợp lệ; e) Biến x khai báo biến có liệu kiểu số thực khơng thể dùng để xác định giá trị đầu giá trị cuối câu lệnh lặp

8. Thuật toán:

Bước Nhập số n x

Bước A  1, i  (A biến lưu lũy thừa bậc n x) Bước ii + 1, A  A.x

Bước Nếu i < n, quay lại bước

Bước Thông báo kết A lũy thừa bậc n x kết thúc thuật toán Chương trình Pascal sau:

var n,i,x: integer; a: longint; begin

write('Nhap x='); readln(x); write('Nhap n='); readln(n); A:=1;

for i:=1 to n A:=A*X; writeln(x,' mu ',n,' bang ',A); end

9. Thuật toán:

Bước Nhập số n

Bước A32768 (gán số nhỏ số kiểu nguyên cho A), i1 Bước Nhập số thứ i gán giá trị vào biến A

Bước Nếu Max < A, Max  A Bước ii +

Bước Nếu i ≤ n, quay lại bước

Bước Thông báo kết Max số lớn kết thúc thuật toán Chương trình Pascal sau:

uses crt;

(76)

clrscr;

write('Nhap N='); readln(n); Max:=-32768;

for i:=1 to n

begin write('Nhap so thu ',i,':'); readln(A); if Max<A then Max:=A end;

writeln('So lon nhat: ',Max); end

Lưu ý Trong chương trình sử dụng hai biến A Max để giải toán Một cách tự nhiên, để nhập n số cần tới n biến Tuy nhiên, việc xử lí giá trị dãy số thực cách cần so sánh giá trị nhập vào, cần biến để lưu giá trị nhập vào đủ Một cách giải khác sử dụng biến mảng (xem Bài tập 6, Bài 9)

10.Lời giải tương tự lời giải Bài Xem thuật toán lời giải Bài

tập 5a, Bài Chương trình Pascal sau: uses crt;

var n,i,SoDuong,A: integer; begin

clrscr;

write('Nhap N='); readln(n); if n>0 then

begin

SoDuong:=0; for i:=1 to n

begin write('Nhap so thu ',i,':'); readln(A); if A>0 then SoDuong:=SoDuong+1 end; writeln('So cac so duong = ',SoDuong) end

else writeln('n phai > 0!'); end

IV.Củng cố: Viết lại cú pháp câu lệnh lặp Lợi ích câu lệnh lặp

V Dặn dị: học thuộc cú pháp câu lệnh lặp Mô cac tập

Ngàysoạn: Ngày dạy:

Tuần 21: Tiết 41:

Bài thực hành 5:

SỬ DỤNG VÒNG LẶP FOR…DO A Mục tiêu :

(77)

- Hiểu câu lệnh lặp biết trước chương trình có sẵn

- 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 Kỹ năng:

-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;

-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, chia tư sáng tạo

II Kiểm tra cũ :

Hoạt động GV Hoạt động HS Kiến thức cần đạt 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

- GV: hỗ trợ học sinh

trong 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

Thực hành

- gõ chương trình, chạy thử chương trình, báo cáo kết

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;

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

(78)

đúng theo chương trình

chạy Thực hành

Dem:=0;

Writeln(‘Nhap vao so n’); readln(n); For i:=1 to n

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 IVCủ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 tiết thực hành

- đọc theo sách giáo khoa trang 64, luyện viết chương trình sử dụng câu lệnh lặp cho

bài tập học

Ngàysoạn: Ngày dạy: Tuần 21:

Tiết 42: Bài thực hành 5:

SỬ DỤNG DÒNG LĂP FOR…DO A Mục tiêu :

1 Kiến thức:

- Vận dụng kiến thức vòng lặp for… - Câu lệnh ghép để viết chương trình

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;

-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, chia tư sáng tạo

(79)

- GV: Đưa nội dung

toán

GV: Đưa nội dung chương trình lên bảng, yêu cầu học sinh đọc hiểu

- GV: Đưa nội dung

tốn

- 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

- GV: yêu cầu học sinh đứng

tại vị trí trình bày hoạt động chương trình, nhóm khác tham gia phân tích

- 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

- 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

- HS: Nghiên

cứu tốn, tìm input output

- HS: Nghiên

cứu tốn, tìm input output

- HS: đọc, phân

tích câu lệnh tìm hiểu hoạt động chương trình

- HS: tham gia

hoạt động giáo viên

- HS: nhóm

lập bảng đại diện nhóm báo cáo kết

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;

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

IVCủ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 tiết thực hành

- đọc theo sách giáo khoa trang 64, luyện viết chương trình sử dụng câu lệnh lặp cho

bài tập học

Tiết 43,44:HỌC VẼ HÌNH VỚI PHẦN MỀM GEOGEBRA A/ Mục tiêu:

1/Kiến thức:

- Hs hiểu đối tượng hình học phần mềm quan hệ chúng

- Thông qua phần mềm học sinh biết hiểu ứng dụng phần mềm toán học, thiết lập quan hệ toán học đối tượng

2/ Kỹ năng:

(80)

3/Thái độ:

- Ý thức việc ứng dụng phần mềm học tập mình, chia tư dúy sáng tạo B/ Chuẩn bị:

1/Giáo Viên:

- Sách giáo khoa, giáo án, tài liệu tin học có liên quan 2/ Học sinh:

- Đọc tài liệu nhà trước C Tiến trình lên lớp:

I.ổn định tổ chức lớp : - Kiển tra sĩ số : II.Kiểm tra cũ

- Kiểm tra chuẩn bị học sinh

II.Bài mới:

Hoạt động GV Hoạt động HS Kiến thức ần đạt

Hoạt động 1: Em biết Geogebra Hoạt động 2: Làm quen

với phần mềm Geogebra tiếng viết Nhấp đúp vào biểu

tượng

Hoặc vào menu Start \ All Programs\ GeoGebra \ GeoGebra Giới thiệu hình

Hs thực

cho biết thành phần màm hình Bảng chọn

Thanh cơng cụ Cơng cụ di chuyển chọn nhiều đối tượng cách nào? Khi sử dụng công cụ khác chuyển công cụ di chuyển cách ?

GV : lưu có cách - Nhấn Ctrl + S chọn Hồ sơ - > lưu Mở?

- Nhấn Ctrl + O chọn Hồ sơ - > mở

Hs đọc sgk

Hs : Nhấn phím CTRL chọn Hs : nhấn phím ESC

1 Em biết Geogebra?

2 Làm quen với phần mềm Geogebra tiếng Việt

a) Khởi động

b) Giới thiệu hình Geogebra tiếng Việt - Bảng chọn

- Thanh công cụ

c) Giới thiệu công cụ làm việc. - Công cụ di chuyển

- Các công cụ liên quan đến đối tượng điểm Thao tác : Chọn cơng cụ sau chọn đối tượng - Các công cụ liên quan đến đoạn, đường thẳng

Thao tác : Chọn cơng cụ sau chọn đối tượng - Các công cụ tạo mối quan hệ hình học

(81)

Thốt khởi phần mềm? - Hồ sơ - > mở Alt + F4

tượng cần thay đổi

- Các công cụ liên quan đến hình trịn

Thao tác : Chọn cơng cụ sau chọn đối tượng - Các cơng cụ biến đổi hình học

d) Các thao tác với tệp - Lưu

- Mờ

e) Thoát khởi phần mềm

IV.Củng cố:

- Chức phần mềm?các cơng cụ vẽ hình bản?

- Đọc trước bài, tìm hiểu cách vẽ hình chức công cụ liên quan đến đường điểm đoạn

Tiết 45,46: HỌC VẼ HÌNH VỚI PHẦN MỀM GEOGEBRA A/Mục tiêu:

1/ Kiến thức:

- Hs hiểu đối tượng hình học phần mềm quan hệ chúng

(82)

2/Kỹ năng: - Biết cách sử dụng phần mềm để vẽ hình học chương trình lớp 3/ Thái độ: - ý thức việc ứng dụng phần mềm học tập mình,chia tư sáng tạo

B/ Chuẩn bị:

1/ Giáo viên:- Sách giáo khoa, giáo án, tài liệu tin học có liên quan 2/Học sinh:- Đọc tài liệu nhà trước

C Tiến trình lên lớp: I.ổn định tổ chức lớp : - Kiển tra sĩ số : II.Kiểm tra cũ:

- Kiểm tra chuẩn bị học sinh

II.Giảng Bài mới:

Hoạt động GV Hoạt động HS Kiến thức cầnđạt

Hoạt động : Đối tượng hình học Yêu cầu HS nêu khái

niệm đối tượng hình học?

Phân tích đặc điểm hai đối tượng

Cách thay đổi thuộc tính đối tượng

Hs đọc sgk

Hs nêu khái niệm 3 Đối tượng hình họca) Khái niệm đối tượng hình học

b) Đối tượng tự đối tượng phụ thuộc Nằm (thuộc về)

Đi qua

Giao hai đối tượng

c) Danh sách đối tượng hình Hiển thị  Hiển thị danh sách đối tượng d) Thay đổi thuộc tính đối tượng - Ẩn đối tượng :

B1 chọn đối tượng

B2 hủy chọn “ Hiển thị đối tượng “trong bảng hiển thị

- Ẩn tên đối tượng B1 chọn đối tượng

B2 hủy chọn “ Hiển thị đối tên” bảng hiển

- Thay đổi tên đối tượng

B1 nháy nút chuột phải lên đối tượng B2 chọn đổi tên

- Đặt / hủy vết chuyển động đối tượng B1 nháy nút chuột phải lên đối tượng B2 chọn “ Mở dấu vết di chuyển Để xóa vết nhấn tổ hợp phím Ctrl + F - Xóa đối tượng : thực cách C1 dùng nhấn Delete

C2 nháy nút chuột phải lên đối tượng, chọn xóa C3 chọn cơng cụ , chọn đối tượng xóa

IV.Củng cố:

- Mối quan hệ điểm đoạn đường cách tạo?xóa?

(83)

Tuần 25 Tiết 49:

BÀI 8: LẶP VỚI SỐ LẦN CHƯA BIẾT TRƯỚC

A.Mục tiêu: 1.Kiến thức

- Biết nhu cầu cần có cấu trúc lặp với số lần chưa biết trước ngơn ngữ lập trình; - Biết ngơn ngữ lập trình dùng cấu trúc lặp với số lần chưa biết trước để dẫn máy tính thực lặp lặp lại công việc đến điều kiện thoả mãn;

2 Kĩ

- Nhận biết đâu hoạt động lặp với số lần chưa biêt trước Thái độ

- Nghiêm túc trình nghiên cứu thực hành B Chuẩn bị

GV: SGK, máy chiếu, phim ví dụ chương trình HS: Xem trước nhà

C Tiến trình giảng I Ổn định lớp

II Kiểm tra củ

Viết thuật tốn tính tổng 100 số tự nhiên 1,2,3,…,99,100 Trả lời

Bước SUM  0; i  Bước i  i +

Bước Nếu i ≤ 100, SUM  SUM + i quay lại bước Bước Thơng báo kết kết thúc thuật tốn

III Bài

+ G : y/c

+ G : Phân tích ví dụ

+ G : Hướng dẫn hs xây dựng thuật toán

+ G : Chạy tay cho học sinh xem ( Chỉ nên chạy tay thử từ đến 10 )

hs đọc ví dụ 1sgk/67

+ Hs : 2-3 hs đọc ví dụ sgk

+ Hs : Chú ý lắng nghe

+ Hs : Nghe giáo viên hướng dẫn, sau tự xây dựng thuật tốn

+ Hs : Chú ý nghe

1 Các hoạt động lặp với số lần chưa biết trước

a/ Ví dụ 1(sgk)

b/ Ví dụ : Nếu cộng n số tự nhiên (n = 1, 2, 3, ), Cần cộng số tự nhiên để ta nhận tổng Tn nhỏ lớn 1000?

Giải :

(84)

+ G : Giới thiệu sơ đồ khối

+ G : Nêu nhận xét

+ G : Có thể sử dụng lệnh lặp với số lần lặp chưa biết trước chương trình lập trình Sau ta xét câu lệnh ví dụ TP

+ G : Giới thiệu cú pháp lệnh while … ….; + G : Xét ví dụ Chúng ta biết rằng, n lớn

1

n càng nhỏ, luôn lớn Với giá trị n

1

n <

0.005

1

n < 0.003 ?

Hs ghi ví dụ

+ hs : ý nghe ghi chép

+ Hs : Đọc ví dụ

+ Bước S  0, n 

+ Bước Nếu S ≤ 1000, n  n + 1; ngược lại chuyển tới bước

+ Bước S  S + n quay lại bước + Bước In kết : S n số tự nhiên nhỏ cho S > 1000 Kết thúc thuật tốn

* Ta có sơ đồ khối :

* Nhận xét : Để viết chương trình dẫn máy tính thực hoạt động lặp ví dụ trên, ta sử dụng câu lệnh có dạng lặp với số lần chưa biết trước

2 Ví dụ lệnh lặp với số lần chưa biết trước

Trong Pascal câu lệnh lặp với số lần chưa biết trước có dạng:

while <điều kiện> <câu lệnh>; đó:

- điều kiện thường phép so sánh; - câu lệnh câu lệnh đơn giản hay

câu lệnh ghép

Câu lệnh lặp thực sau: Bước : Kiểm tra điều kiện

Bước : Nếu điều kiện SAI, câu lệnh bị bỏ qua việc thực lệnh lặp kết thúc Nếu điều kiện đúng, thực câu lệnh quay lại bước

(85)

+ G : giới thiệu chương trình mẫu sgk ( Giáo viên in chương trình mẫu )

+ G : Chạy tay cho học sinh xem + G : Yêu cầu học sinh mở máy tính mở chương trình ví dụ ( giáo viên chuẩn bị chương trình mẫu đưa lên máy ) + G : Cho học sinh chạy chương trình máy + G : Yêu cầu hs thay điều kiện sai_so = 0.003 thành 0.002 ; 0.001 ; 0.005 ;

+ Hs : quan sát

+ Hs : ý nghe tự chạy tay lại

+ Hs : thực

Với giá trị n ( n>o )

1

n < 0.005

hoặc

1

n < 0.003? Chương trình đây

tính số n nhỏ để

1

n nhỏ sai số cho trước :

uses crt; var x: real; n: integer;

const sai_so=0.003; begin

clrscr; x:=1; n:=1;

while x>=sai_so begin n:=n+1; x:=1/n end;

writeln('So n nho nhat de 1/n < ',sai_so:5:4, 'la ',n);

readln end

IV Củng cố:

- Lấy ví dụ hoạt động phải lặp lại với số lần chưa biết trước V Hướng dẫn nhà:

- Học

- Nghiên cứu trước nội dung phần lại

Ngày soạn : Ngày dạy :

BÀI 8: LẶP VỚI SỐ LẦN CHƯA BIẾT TRƯỚC

A.Mục tiêu: Kiến thức:

- Biết câu lệnh lặp với số lần chưa biết trước while do… Pascal Kĩ năng:

(86)

3 Thái độ:

- Nghiêm túc trình học tập rèn luyện B Chuẩn bị

GV: SGK, máy chiếu, phim ví dụ chương trình HS: Xem trước nhà

C Tiến trình giảng I Ổn định:

II Kiểm tra cũ: II B i m ià ớ

Hoạt động GV Hoạt động HS Kiến thức cần đạt + G : ta tiếp tục xét

các ví dụ mà chương trình có câu lệnh với số lần lặp chưa biết trước Xét ví dụ

+ G : Cho học sinh quan sát phim chương trình

+ G : Chạy tay cho học sinh xem

+ G : Yêu cầu học sinh mở máy tính mở chương trình ví dụ ( giáo viên chuẩn bị chương trình mẫu đưa lên máy )

+ G : Cho học sinh chạy chương trình máy

+ G : chạy chương trình này, ta nhận giá trị ntn? + G : giới thiệu ví dụ sgk

Viết chương trình

tính tổng

1 1

1

2 100

T     

+ G : Cho học sinh quan sát phim chương trình

+ G : Chạy tay ( hai chương trình ) cho học sinh xem + G : so sánh kết chạy hai chương

+ Hs : quan sát

+ Hs : ý nghe tự chạy tay lại

+ Hs : thực + Hs : thực

+ Hs : Nếu chạy chương trình ta nhận n = 45 tổng lớn 1000 1034

+ Hs : quan sát

+ Hs : ý nghe tự chạy

Ví dụ Chương trình Pascal thể thuật tốn tính số n ví dụ 2:

var S,n: integer; begin

S:=0; n:=1;

while S<=1000 begin n:=n+1; S:=S+n end;

writeln('So n nho nhat de tong > 1000 la ',n);

writeln('Tong dau tien > 1000 la ',S); end

Ví dụ Viết chương trình tính tổng

1 1

1

2 100

T     

Giải :

Để viết chương trình tính tổng

1 1

1

2 100

T     

ta sử dụng lệnh lặp với số lần lặp biết trước for… do:

T:=0;

for i:=1 to 100 T:=T+1/i; writeln(T);

Nếu sử dụng lệnh lặp while…do, đoạn chương trình cho kết quả:

T:=0; i:=1;

while i<=100 begin T:=T+1/i; i:=i+1 end;

(87)

trình

+ G : Ví dụ cho thấy sử dụng câu lệnh while…do thay cho câu lệnh for…

+ G : Giới thiệu phần

+ G : Khi viết chương trình sử dụng cấu trúc lặp cần ý tránh tạo nên vịng lặp khơng kết thúc

+ G : Chẳng hạn, chương trình lặp lại vô tận: var a:integer;

begin a:=5;

while a<6 writeln('A');

end

+ G : Trong chương trình trên, giá trị biến a ln 5, điều kiện a<6 luôn nên lệnh writeln('A') thực Do vậy, thực vòng lặp, điều kiện câu lệnh phải thay đổi để sớm hay muộn giá trị điều kiện chuyển từ sang sai Chỉ chương trình khơng "rơi" vào "vịng lặp vơ tận"

tay lại

+ Hs : Kết

+ Hs : Chú ý nghe

+ Hs : Quan sát

+ Hs : Chú ý nghe

* Nhận xét : Ví dụ cho thấy sử dụng câu lệnh while…do thay cho câu lệnh for…do 3 Lặp vô hạn lần – Lỗi lập trình cần tránh

Khi viết chương trình sử dụng cấu trúc lặp cần ý tránh tạo nên vịng lặp khơng kết thúc

IV Củng cố:

- Ghi nhớ sgk

(88)

V Hướng dẫn nhà:

- Học làm lại tập - Nghiên cứu trước thực hành

BàI thực hành 6: SỬ DỤNG VÒNG LẶP WHILE…DO A Mục tiêu:

1/Kiến thức:

- hiểu hoạt động câu lệnh lặp không xác định

- Biết sử dụng câu lệnh ghép câu lệnh lặp không xác định

2/Kỹ năng:

- Viết chương trình Pascal có sử dụng vịng lặp While - Rèn kỹ đọc hiểu chương trình có sử dụng vịng lặp while

3/Thái độ:

- Nghiêm túc thực hành tập SGK Chia tư sáng tạo B Phương pháp

1 Phương pháp: Thuyết trình, nêu vấn đề, vấn đáp Phương tiện: Máy tính,

C Chuẩn bị: Giáo viên:

- Chuẩn bị số thuật tốn chương trình - Chuẩn bị máy tính,

2 Học sinh:- Thực nhiệm vụ nhà tiết trước D Tiến trình dạy:

I ổn định lớp (1 phút)

II Kiểm tra cũ (không kiểm tra) III Giảng mới:

HĐ GV Hoạt HS Kiến thức cần đạt

HĐ 1: Bài Gv: Viết đề

Gv: Em cho biết input output

bài toán? Trả lời

Bài 1: Viết chương trình Pascal sử dụng câu lệnh While…do để tính trung bình cộng n số thực nhập từ bàn phím (n, n số thực nhập từ bàn phím)

(89)

HĐ GV Hoạt HS Kiến thức cần đạt Gv: Chúng ta cần tính

TBC số? Gv: Nêu cách tính trung

bình cộng số

Gv: Vậy tính TBC n số ta làm ntn?

Gv: Tính

1 n

x x x  x  S ntn?

Gv: để có S = S cũ + x

Gv: qluật S S + x; đến dừng?

Gv: Dựa vào hệ thống câu hỏi Lần lượt hình thành thuật tốn Gv: Quan sát, chỉnh sửa

từng câu lệnh Hs lên bảng trình bày

Hs:

1

4

x x x x Hs:

1 n

x x x x

n

   

Hs: S  S + x;

Hs: S  0 (b1) Hs: Khi dem > n

phát điều kiện lặp While…do

Hs: Dựa vào thuật tốn trình bày chương trình hồn chỉnh

INPUT: Nhập n, nhập n số nguyên OUTPUT: Kết TBC n số nguyên B1: Nhập giá trị n( tính TBC số);

dem0; S0;

B2: Trong dem <= n làm

Nhập số thứ (1,2,3….n) (cho x) SS+x; demdem +1;

B3: Tính TB S/n;

B4: In kết TB, kết thúc chương trình b Viết chương trình

Program tinhTB; Uses Crt;

Var n,dem: integer; x, S, TB: real; BEGIN

ClrScr;

Write(‘Muon tinh TB bao nhieu so n=’); Readln(n);

dem:= 0; S:=0; While dem <= n Begin

Write(‘Nhap so thu’, dem, ‘ = ‘ );readln(x);

S:= S + x; dem:= dem + 1; End;

TB:= S/n;

Write(‘ Vay trung binh cong ’, n, ‘so la: ‘, TB:6:2);

Readln END IV Củng cố:

- Ghi nhớ cú pháp ý nghĩa câu lệnh lặp while ,

(90)

Ngày soạn : Ngày dạy

BàI thực hành 6: SỬ DỤNG VÒNG LẶP WHILE…DO A Mục tiêu:

1/Kiến thức:

- hiểu hoạt động câu lệnh lặp không xác định

- Biết sử dụng câu lệnh ghép câu lệnh lặp không xác định

2/Kỹ năng:

- Viết chương trình Pascal có sử dụng vòng lặp While - Rèn kỹ đọc hiểu chương trình có sử dụng vịng lặp while

3/Thái độ:

- Nghiêm túc thực hành tập SGK Chia tư sáng tạo B Phương pháp

- Chuẩn bị số thuật toán chương trình - Chuẩn bị máy tính,

I ổn định lớp (1 phút)

II.Kiểm tra cũ (không kiểm tra)

II Giảng mới:

Hoạt động GV Hoạt động HS Kiến thức cần đạt Gv: Viết chương

trình lên bảng Gv: Cho Hs tìm hiểu ý nghĩa câu lệnh

-Tác dụng: While n mod i <> i:= i + 1;

Gv: Chương trình có tác dụng gì?

Hs: Ghi vào

Hs: Ln lt tr li

Bài 2: Đọc tìm hiểu ý nghĩa câu lệnh sau

Uses Crt;

Var n,i : integer; BEGIN

ClrScr;

Write(‘Nhap vao mot so nguyen: ‘);Readln(n);

(91)

Hoạt động GV Hoạt động HS Kiến thức cần đạt Gv: để có S

mới = S cũ + x Gv: qluật S S + x;

đến dừng?

Gv: Dựa vào hệ thống câu hỏi Lần lượt hình thành thuật toán

Gv: Quan sát, chỉnh sửa câu lệnh Hs lên bảng trình bày

Hs: Mục đớch nhận dạng số cú số nguyờn tố hay khụng?Hs: S  S + x;

Hs: S  0 (b1) Hs: Khi dem > n

phát điều kiện lặp While…do Hs: Dựa vào thuật

tốn trình bày chương trình hồn chỉnh

to’); Else Begin i:=2;

While n mod i <> i:= i + 1;

If i = n Then Writeln(n,’ la so nguyen to’)

Else Writeln(n,’ khong la so nguyen to’); End;

Readln

END SS+x; demdem +1;

V Củng cố:

- Ghi nhớ cú pháp ý nghĩa câu lệnh lặp while ,

(92)

Tuần 27 Tiết 53: BÀI TẬP A Mục tiêu:

1/Kiến thức:

- Viết 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

2/kỹ năng:

- Rèn kỹ đọc hiểu chương trình có sử dụng vịng lặp while

3/thái dộ: nghiêm túc thực tập, chia tư sáng tạo B Phương pháp

- Chuẩn bị số thuật toán chương trình - Chuẩn bị máy tính,

Bài 1.Sự khác biệt câu lệnh lặp với số lần lặp cho trước câu lệnh lặp với số lần lặp chưa biết trước điểm sau đây:

a) Như tên gọi nó, câu lệnh lặp với số lần lặp cho trước thị cho máy tính thực lệnh nhóm lệnh với số lần xác định từ trước, với câu lệnh lặp với số lần lặp chưa biết trước số lần lặp chưa xác định trước

b) Trong câu lệnh lặp với số lần cho trước, điều kiện giá trị biến đếm có giá trị nguyên đạt giá trị lớn hay chưa, câu lệnh lặp với số lần lặp chưa biết trước, điều kiện tổng quát nhiều, kiểm tra giá trị số thực, điều kiện tổng qt khác, ví dụ số có chia hết cho hay không,

c) Trong câu lệnh lặp với số lần cho trước, câu lệnh thực lần, sau kiểm tra điều kiện Trong câu lệnh lặp với số lần chưa xác định trước, trước hết điều kiện kiểm tra Nếu điều kiện thoả mãn, câu lệnh thực Do có trường hợp câu lệnh hồn tồn khơng thực

Bài 2.Mơ tả thuật tốn:

Bước Đặt i = R (i bán kính đường tròn vẽ)

Bước Nếu i > 1.5, vẽ đường trịn bán kính i; ngược lại, chuyển đến bước Bước i  i  1/2 quay lại bước

Bước Kết thúc thuật toán

(93)

S:=10; x:=0.5;

while S>5.2 S:=S-x; writeln(S);

b) Thuật tốn 2: Khơng vịng lặp thực từ đầu điều kiện không thỏa mãn nên bước bị bỏ qua S = 10 kết thúc thuật tốn Đoạn chương trình Pascal tương ứng:

S:=10; n:=0; while S<10

begin n:=n+3; S:=S-n end; writeln(S);

Nhận xét: Trong thuật toán chương trình trên, điều kiện kiểm tra trước bước lặp thực Do điều kiện không thỏa mãn từ đầu, bước lặp bị bỏ qua Điều đặc biệt câu lệnh lặp while

Bài 4.a) Chương trình thực vịng lặp b) Vịng lặp chương trình thực vơ tận sau câu lệnh n:=n+1; câu lệnh lặp kết thúc nên điều kiện S=0 luôn thỏa mãn

Nhận xét: Trong câu lệnh thực hiện, điều kiện cần phải thay đổi để sớm hay muộn chuyển sang trạng thái khơng thỏa mãn Khi vịng lặp kết thúc sau hữu hạn bước Để làm điều này, câu lệnh câu lệnh lặp while thường câu lệnh ghép

Bài 5.a) Thừa dấu hai chấm điều kiện; b) Thiếu dấu hai chấm câu lệnh gán; c) Thiếu từ khóa begin end trước sau lệnh n:=n+1; S:=S+n, vịng lặp trở thành vơ tận Bài 6.Viết thuật tốn chương trình Pascal có câu lệnh lặp với số lần khơng xác định để tính luỹ thừa bậc n x (tức xn), với n số tự nhiên x số thực nhập vào từ bàn phím Hãy so sánh với thuật tốn tập 8,

Thuật toán:

Bước Đọc giá trị x n Bước A  1, k 

Bước Nếu k > n, chuyển xuống bước Bước A = A.x, k  k + quay lại bước

Bước Thông báo kết A kết thúc thuật tốn Chương trình Pascal:

var n,k: integer; A, LT: real; begin

write(‘Nhap so A= ‘); readln(A); write(‘Nhap so n= ‘); readln(n); LT:=1; k:=1;

while k<=n begin LT:=LT*A, k:=k+1 end end

Bài 7.Tính tích N số tự nhiên với số lần lặp không xác định (với N số tự nhiên nhập vào từ bàn phím)

Bước Đọc giá trị N Bước T  1, k 

Bước Nếu k  N, T = T.k; ngược lại, chuyển xuống bước Bước k  k + quay lại bước

(94)

Bước Đọc giá trị n Bước S  0, i 

Bước Nếu i > n  1, chuyển xuống bước

Bước Nếu n chia hết cho i, S  S + i, i  i + quay lại bước Bước Ghi giá trị S kết thúc thuật tốn

Chương trình sau: var n,i,S: integer;

begin

write('Cho so tu nhien n= '); readln(n); i:=2; S:=0;

while i<=n-1 begin

if (n mod i)=0 then S:=S+i; i:=i+1;

end;

write('Tong cac uoc so thuc su cua ',n,' la: ',S); readln;

end

Bài 9.Chương trình sau: Uses CRT;

Var A, sum: real; i: integer;

Begin

Write('cho so A: '); readln(A); i:=1; sum:= 0;

While (sum<=A) Begin

sum:= sum+1/i; i:= i+1;

end;

Write('Gia tri N bang ', i:6); Readln;

(95)

Tuần 27 Tiết 54: BÀI TẬP A Mục tiêu:

1/kiến thức:

- Viết 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

2/kỹ năng:

- Rèn kỹ đọc hiểu chương trình có sử dụng vòng lặp while

3/thái độ: Nghiêm túc làm tập, chia tư sáng tạo B Phương pháp

- Chuẩn bị số thuật tốn chương trình - Chuẩn bị máy tính,

Bài 1: Lập trình tính tổng dùng lệnh lặp While Trong đú n số tự nhiên 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;

(96)

Bài 2: Viết chương trình tìm ƯCLN(a,b) Biết a, b nhập từ bàn phí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 phím a,bZ Giải

Program timBCNN; Uses Crt;

Var a,b,n,min,max,max1: integer; BEGIN

ClrScr;

Write(‘Nhap so thu nhat, a= ‘); Readln(a); a1:= a; 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

(97)

Tuần 28 Tiết 55: Kiểm tra tiết

Đề kiểm tra 45 phút (Khói 8) đề

Họ tên học sinh: Lớp: Phần I(Trắc nghiệm)-khoanh tròn chữ đứng trước kết Câu : Phát biểu sau ? (0,5 đ)

A Cấu trúc lặp sử dụng để thị cho máy tính thực lặp lại vài hoạt động điều kiện thoả mãn

B Chỉ ngơn ngữ lập trình Pascal có câu lệnh lặp để thể cấu trúc lặp

C Ngôn ngữ Pascal thể cấu trúc lặp với số lần lặp cho trước câu lệnh for…do D Câu B C

Câu 2: Lệnh lặp sau đúng? (0,5 đ)

A For <biến đếm>= <giá trị đầu> to <giá trị cí> <câu lệnh> B For <biến đếm>:= <giá trị đầu> to <giá trị cí> <câu lệnh> C For <biến đếm>:= <giá trị cí> downto <giá trị đầu> <câu lệnh> D For <biến đếm>: <giá trị cí> downto <giá trị đầu> <câu lệnh> Câu 3: Câu lệnh pascal sau hợp lệ? (0,5 đ)

A For i:=100 to writeln(‘A’); B For i:=1.5 to 10.5 writeln(‘A’); C For i= to 10 writeln(‘A’); D For i:= to 10 writeln(‘A’);

Câu 4: Pascal sử dụng câu lệnh lặp sau để lặp với số lần chưa biết trước? (0,5 đ) A For…do;

B While…do; C If then;

D If…then…else;

Câu 5: Câu lệnh lặp while…do có dạng là: (0,5 đ) A While <điều kiện> <câu lệnh> do;

B While <câu lệnh> <câu lệnh> do; C While <điều kiện> <câu lệnh>; D While <điều kiện> <câu lệnh>;

Câu : Em học vẽ hình với phần mềm nào? (0,5 đ) A Pascal;

B Geogebra; C Mario;

D Finger Break out; Phần 2: tự luận (7 đ)

Câu 7:Em viết kết chương trình pascal sau? (1,5 đ) Program vidu;

Var i: integer; BEGIN

For i:=1 to 10

(98)

Writeln(‘Day la lan lap thu ‘,i); Readln;

END

Câu 8: Các câu lệnh Pascal sau viết hay sai? (nếu sai chỗ sai) 1,5 đ a if x:=7 then a=b;

b if x>5; then a:=b;

c if x>5 then; a:=b;

Câu 9.Viết chương trình tính tổng số nguyên từ 10 đến 20 (4đ)

(99)

Ngày dạy :

Bài 9: LÀM VIỆC VỚI DÃY SỐ A Mục tiêu :

1/kiến thức:

- 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ố

2/kỹ năng: khai báo sử dụng biến mảng chương trình nhỏ 3/thái độ:- Thái độ học tập nghiêm túc, chia tư sáng tạo B Chuẩn bị :

1 Giáo viên :

- Tài liệu, GA

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

- Đọc trước C Phương pháp:

Vấn đáp, thuyết trình, hoạt động nhóm D Tiến trình tiết dạy :

I ổn định tổ chức lớp : Kiểm tra sĩ số : II Kiểm tra cũ :

Câu lệnh lặp while…do có dạng nào? while <điều kiện> <câu lệnh>; Câu lệnh thực nào? Kiểm tra điều kiện

Nếu điều kiện sai, câu lệnh bị bỏ qua chuyển sang câu lệnh chương trình Nếu điều kiện thực câu lệnh quay lại bước

III Dạy mới :

GV nhận xét :

- 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) ; … - sử dụng quy luật tăng hay giảm

Nghiên cứu SGK

Quan sát

1 Dãy số biến mảng: Ví dụ 1: (SGK)/ Tr 75

* Dữ liệu kiểu mảng:Là tập hợp hữu hạn phần tử có thứ tự

+ Mọi phần tử có kiểu liệu gọi kiểu phần tử

(100)

của “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;

GV nhận xét :

- Cách khai báo biến mảng ngôn ngữ lập trình khác nhau, ln cần ra: tên biến mảng, số lượng phần tử, kiểu liệu chung phần tử

- Dùng câu lệnh lặp, thay nhiều câu lệnh nhập in liệu hình

- Để so sánh điểm HS với giỏ trị đó, ta cần câu lệnh lặp

- Để xử lý đồng thời loai điểm mơn học, ta khai báo nhiều mảng

- Khi mảng khai báo, 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ị

Nghiên cứu SGK

Quan sát

Nghiên cứu SGK

Quan sát

Nghiên cứu SGK

Quan sát

Nghiên cứu SGK

Quan sát

+ 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)

+ số mảng: dãy số nguyên có thứ tự

2 Ví dụ biến mảng: Vớ dụ: (SGK)/ Tr 76

* Cách khai báo mảng Pascal:

Tên mảng : array [<chỉ số đầu> <chỉ số cuối>] of <kiểu liệu >;

Trong đó:

+ Chỉ số đầu số cuối: số nguyên biểu thức nguyên (Chỉ số đầu  số cuối );

+ 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

For i:= to 50 readln ( Diem [ i ] );

- Để so sánh điểm HS với giá trị

For i:= to 50

If Diem [ i ] > 8.0 then writeln ( ‘ Gioi ‘ ); - Để xử lí đồng thời loai điểm => 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ể : gán giá trị, đọc giá trị thực tính tốn với giá trị

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 ] );

(101)

Bài 9: LÀM VIỆC VỚI DÃY SỐ (TT) A Mục tiêu :

1/Kiến thức:

- 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 toán tìm số lớn nhất, nhỏ dãy số

2/ Kỹ năng: Cách sử dụng biến mảng

3/Thái độ học tập: Thái độ học tập nghiêm túc, chia tư sáng tạo B Chuẩn bị :

1 Giáo viên :

- Tài liệu, Giáo án

I ổn định tổ chức lớp : Kiểm tra sĩ số :

II Kiểm tra cũ : không kiểm tra III Dạy :

Hoạt động GV Hoạt động HS Kiến thức cần đạt - 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

- 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,

Đọc sách, tham khảo

Trả lời

Cho HS thảo luận, chỉnh sửa thuật tốn để tìm số nhỏ

Trả lời

3 Tìm giá trị lớn nhỏ dãy số: Tìm giá trị lớn ( Max ) dãy số nguyên nhập từ bàn phím

Thuật tốn

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 kết thúc

Ví dụ 3: (SGK)/ Tr 78 chương trình

(102)

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 …

+ Cần khai báo thêm biến i làm biến đếm cho lệnh lặp, biến Max Min để lưu số lớn nhất, nhỏ

- GV cho HS đọc phần ghi nhớ

- HS đọc ví dụ

+ HS: …trước hết ta khai báo biến N

- HS theo dõi

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;

Max:= a[1]; Min:= a[1]; 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

IV.Củng cố: - Nhận xét rút kinh nghiệm học V.Về nhà - Học sinh nhà ôn

- Làm Câu hỏi BTcòn lại: sgk/ Tr 79; - Chuẩn bị tiết sau: Bài tập

Tuần 29 Tiết 58: BÀI TẬP A Mục tiêu :

1/Kiến thức:

- Học sinh củng cố khái niệm mảng chiều: khai báo mảng, nhập, in, truy cập phần tử mảng;

2/Kỹ năng: - Rèn kỹ xây dùng thuật tốn tìm số lớn nhất, nhỏ dãy số 3/Thái độ:- Thái độ học tập nghiêm túc, tích cực làm tập

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

(103)

2 Học sinh :

II Kiểm tra cũ : Không KT III Dạy mới :

Hoạt động GV Hoạt đông HS Kiến thức cần đạt

“Có thể xem biến mảng biến tạo từ nhiều biến có kiểu, tên nhất.” Phát biểu hay sai?

Hãy nêu lợi ích việc sử dụng biến mảng chương trình?

Các khai báo biến mảng sau Pascal hay sai: varX:Array[10,13] Of Integer; var X: Array[5 10.5] Of Real; varX:Array[3.4 4.8]OfInteger; var X: Array[10 1] Of Integer; var X: Array[4 10] Of Real;

Câu lệnh khai báo mảng sau có máy tính thực khơng?

var N: integer;

A: array[1 N] of real;

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 nhập từ bàn phím

Trả lời

Lên bảng trình bày Thao tác

máy

1.Đúng

2.Lợi ích việc sử dụng biến mảng rút gọn việc viết chương trình, sử dụng câu lệnh lặp để thay nhiều câu lệnh Ngồi cịn lưu trữ xử lí nhiều liệu có nội dung liên quan đến cách hiệu

3. Đáp án a) Sai Phải thay dấu phảy hai dấu chấm;

b) c) Sai, giá trị nhỏ lớn số mảng phải số nguyên;

d) Sai, giá trị đâu số mảng phải nhỏ số cuối;

e) Đúng

4. Không Giá trị nhỏ lớn số mảng phải xác định phần khai báo chương trình

5.Chương trình sau: uses crt;

var N, i: integer;

A: array[1 100] of real; begin

clrscr;

write(’Nhap so phan tu cua mang, n= ’); readln(n);

for i:=1 to n begin

write(’Nhap gia tri ’,i,’cua mang, a[’,i,’]= ’); read(a[i])

(104)

Đoạn chương trình sau dùng để xếp lại dãy số ghi mảng A[i], i = 1,2, , N, theo thứ tự tăng dần:

For i:=1 to N For j:=i to N 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

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

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 nhập vào từ bàn phím

Trả lời

Thao tác máy

Trả lời

máy

6.Đúng

7.a) Nếu không sử dụng biến mảng, chương trình dài 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 sau:

uses crt;

var i, Max: integer;

A: array[1 5] of integer; begin

clrscr;

for i:=1 to

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 8/ 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);

(105)

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 nhập vào từ bàn phím

Chương trình nhập n số ngun từ bàn phím tính tổng số dương:

máy

write(’Nhap gia tri ’,i,’cua mang, a[’,i,’]= ’); readln(a[i])

end; TB:=0;

for i:=1 to n TB:=TB+a[i]; TB:=TB/n;

write(’Trung binh bang ’,TB); end

9/ uses crt;

var n,k,S: integer;

X: array[1 1000] of integer; begin

clrscr;

write('Nhap so tu nhien n: '); readln(n); for k:=1 to n

begin write('Nhap X[',k,']='); readln(X[k]) end;

S:=0;

for k:=1 to n

if X[k]>0 then S:=S+X[k]; writeln('Tong cac duong S=',S); readln;

end IV.Củng cố - Nhận xét rút kinh nghiệm tập V.Về nhà - Học sinh nhà ôn

bài thực hành

XỬ LÝ DÃY SỐ TRONG CHƯƠNG TRÌNH A Mục tiêu :

1/kiến thức:

 Thực hành khai báo sử dụng biến mảng ;

 Hiểu viết chương trình với thuật tốn tìm giá trị lớn nhất, nhỏ dãy số, tính tổng dãy số

2/Kỹ năng:

 Ôn luyện cách sử dụng câu lệnh lặp if then, for do;  Củng cố kĩ đọc, hiểu chỉnh sửa chương trình 3/thái độ: nghiêm túc thực hành, chia tư sáng tạo B Chuẩn bị :

1 Giáo viên :

(106)

II Kiểm tra cũ : Không KT III Dạy mới :

Hoạt động GV Hoạt động HS Kiến thức cần đạt

Chương trình tìm giá trị nhỏ dãy số nguyênn P_Min ?

Viết chương trình nhập điểm bạn lớp Sau in hình số bạn đạt kết học tập loại giỏi, khá, TB

Tiêu chuẩn:

- Loại giỏi: 8.0 trở lên

- Loại khá: 6.5 đến 7.9

- Loại TB: 5.0 đến 6.4

- Loại kém: 5.0

HS chia nhóm làm thực hành

HS chia nhóm làm

Bài 1:

Program P_Min;

Var i, n, Min : integer; A: array[1 100] of integer; Begin

write('Hay nhap dai cua day so, N = '); readln(n);

writeln('Nhap cac phan tu cua day so:'); For i:=1 to n

Begin

write('a[',i,']='); readln(a[i]); End;

Min:=a[1];

for i:=2 to n if Min>a[i] then Min:=a[i];

write('So nho nhat la Min = ',Min); readln;

End Bài 2:

Program Phan_loai; uses crt;

Var

i, n, G, Kh, TB, K: integer; A: array[1 100] of real; Begin

clrscr;

write('nhap so HS lop, n= '); readln(n); writeln('Nhap diem :');

For i:=1 to n Begin

(107)

GV gợi ý:

- Dùng câu lệnh if… then…

thực hành G:=0; Kh:= 0; TB:= 0; K:= 0; for i:=1 to n

Begin

if a[i] >= 8.0 then G:= G + 1; if a[i] <5.0 then K:= K + 1;

if (a[i] <8.0 ) and (a[i] >=6.5) then Kh:= Kh + 1;

if (a[i] >= ) and (a[i] < 6.5) then TB:= TB + 1;

end;

writeln(' Ket qua hoc tap: '); writeln(G, ' ban hoc gioi '); writeln(Kh, ' ban hoc kha '); writeln(TB, ' ban hoc trung binh'); writeln(K, ' ban hoc kem ');

readln; End IV.Củng cố - Nhận xét rút kinh nghiệm học

V.Về nhà - Học sinh nhà ôn Ngày soạn :

Ngày dạy :

bài thực hành

XỬ LÝ DÃY SỐ TRONG CHƯƠNG TRÌNH (TT) A Mục tiêu :

1/kiến thức:

 Thực hành khai báo sử dụng biến mảng ;

 Hiểu viết chương trình với thuật tốn tìm giá trị lớn nhất, nhỏ dãy số, tính tổng dãy số

2/Kỹ năng:

 Ôn luyện cách sử dụng câu lệnh lặp if then, for do;  Củng cố kĩ đọc, hiểu chỉnh sửa chương trình 3/thái độ: nghiêm túc thực hành, chia tư sáng tạo B Chuẩn bị :

1 Giáo viên :

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

(108)

Kiểm tra sĩ số : II Kiểm tra cũ :

Không KT III Dạy mới :

Hoạt động GV Hoạt động HS Kiến thức cần đạt Chương trình tính tổng

dãy số, in hình dãy số vừa nhập

Bổ sung chỉnh sửa chương trình BT2 (tiết 59 ) để nhập loại điểm Toán Ngữ văn bạn Sau in hình :

a/ điểm TB bạn lớp theo công thức:

Điểm TB = (Điểm toán + điểm văn)/2 b/ Điểm TB lớp theo mơn Tốn Ngữ văn

HS chia nhóm làm thực hành

Bài 1:

Program P_Sum; Var i, n, Sum : integer; A: array[1 100] of integer; Begin

write('Hay nhap dai cua day so, N = '); readln(n);

writeln('Nhap cac phan tu cua day so:'); For i:=1 to n

Begin

write('a[',i,']='); readln(a[i]); End;

Sum:=0;

for i:=1 to n Sum:= Sum + a[i]; write('Day so vua nhap la: '); for i:=1 to n write(a[i], ' '); writeln;

write('Tong day so la = ',Sum); readln;

End Bài 2:

Program Xep_loai; uses crt;

Var

i, n: integer;

TBtoan, TBvan: real;

diemT, diemV: array[1 100] of real; Begin

clrscr;

writeln('Diem TB : '); For i:=1 to n

write(i,' ',(diemT[i] + diemV[i])/2:3:1); TBtoan: =0; TBvan: =0;

For i:=1 to n Begin

TBtoan: = TBtoan + diemT[i] ; TBvan: = TBvan + diemV[i] ; end;

(109)

TBvan: = TBvan /n;

writeln('Diem TB mon Toan : ',TBtoan :3:2); writeln('Diem TB mon Van: ',TBvan :3:2);

readln; End IV.Củng cố - Nhận xét rút kinh nghiệm học V.Về nhà - Học sinh nhà ôn

- Đọc trước bài: Quan sát hình khơng gian với phần mềm yenka

Tuần 31 Tiết 61,62:

QUAN SÁT HÌNH KHÔNG GIAN VỚI PHẦN MỀM YENKA A mục tiêu :

1/Kiến thức: HS biêt khám phá, hình khơng gian : Thay đổi, di chuyển, thay đổi kích thước, thay đổi màu cho hình

2/Kỹ năng: HS thực kỹ thay đổi, di chuyển, thay đổi kích thước, thay đổi màu cho hình

3/ Thái độ: Nghiêm túc học tập, chia tư sáng tạo B Chuẩn bị :

1/ Giáo viên : tài liệu, giáo án 2/ Học sinh :

3/ phương pháp :

Vấn đáp, thuyết trình, hoạt động nhóm C/ Tiến trình tiết dạy :

I/ Ổn định lớp : II/ Kiểm tra cũ III/ Bài mới :

Hoạt động GV Hoạt động HS Kiến thức cần đạt Giới thiệu sơ lược

phần mềm

Giới thiệu thao tác khởi động phần mềm?

Nghien cứu SGK

Trả lời cách khởi động phần mềm

1 Giới thiệu

- Yenka phần mềm nhánh công ty phần mềm Crocodile tiếng

- Chức phần mềm giúp học sinh thiết kế mơ hình hình khối kiến trúc khơng gian dựa hình khơng gian c/ hình trụ, lăng trụ, hình chóp, hình hộp

(110)

b/ Màn hình :

c/Thoát khỏi phần mềm :

IV.Củng cố: - Mục đích, chức cảu phần mềm gì?cách khởi động nào? V.Về nhà - Học sinh nhà ôn

- Đọc trước bài: Quan sát hình khơng gian với phần mềm yenka

Ngày soạn : Ngày dạy : :

Tuần 32 Tiết 63,64:

QUAN SÁT HÌNH KHƠNG GIAN VỚI PHẦN MỀM YENKA(TT) A mục tiêu :

1/Kiến thức: HS biêt khám phá, hình khơng gian : Thay đổi, di chuyển, thay đổi kích thước, thay đổi màu cho hình

3/ phương pháp :

I/ Ổn định lớp : II/ Kiểm tra cũ III/ Bài :

A mục tiêu :

(111)

3/ phương pháp :

I/ Ổn định lớp : II/ Kiểm tra cũ III/ B i m ià ớ :

Hoạt động GV Hoạt động HS Kiến thức cần đạt Giới thiệu cách

tạo hình khơng gian

Trình bày cách tạo hình khơng gian nào?

Các xoay mơ hình khơng gian cách nhìn?

3/ Tạo hình khơng gian : a/ Tạo mơ hình :

Vào hội hội thoại sau :

Chọn hình kéo thả đối tượng vào khu vực tạo đối tượng

 Xoay mơ hình khơng gian 3D :

- Nháy vào biểu tượng xoay

- Đưa trỏ chuột lên mơ hình

Hình trụ

hình chóp

Hình lăng trụ

(112)

Cách phóng to thu nhỏ, di

chuyển mơ

hình?

Các thao tác với tệp

Cách xóa mơ hình?

 Phóng to , thu nhỏ :

 di chuyển khung mô hình :

b/ lệnh tạo mới, lưu, mở tệp mơ hình :

c/ Xóa đối tượng :

- Nhấp chuột vào mô hình cần xóa

- Ctrl + A Delete

IV.Củng cố: - Nhận xétt rútt kinh nghiệm học V.Về nhà - Học sinh nhà ôn

- Xem phần thực hành, tuần sau (tuần 33) tiết 65,66 học thực hành

Tuần 34 Tiết :67 KIỂM TRA TIẾT A Mục tiêu:

1/ Kiến thức: Câu lệnh lặp không xác định, biến mảng 2/Kỹ năng:

- Viết chương trình Pascal có sử dụng Biến mảng

- Biết sử dụng câu lệnh ghép

3/ Thái độ: nghiêm túc làm B chuẩn bị:

(113)

- Chuẩn bị đề kt 1tiết

2 Học sinh:- Thực nhiệm vụ nhà tiết trước 3/ Phương pháp

1 Phương pháp: viết Phương tiện: giấy C Tiến trình dạy:

Hoạt động GV Hoạt động HS Kiến thức cần đạt Sử dụng biến mảng

chiều để viết chương trình sau

Bài 1: Viết chương trình nhập dãy số, in dãy số hình

Bài 2: Viết chương trình nhập dãy số, tính tổng chúng in dãy số hình

Thực hành, trình bày giấy

Bài 1:

program nhap_inds;

var a:array[1 100] of integer; i,n:integer;

begin

write('nhap n: ');readln(n); for i:=1 to n

begin

write('nhap so thu ',i,':'); readln(a[i]);

end;

for i:=1 to n write(a[i],' '); readln; end

Bài 2:

program tong_ds;

var a:array[1 100] of integer; i,n,s:integer;

begin

write('nhap n: ');readln(n); for i:=1 to n

begin

write('nhap so thu ',i,':'); readln(a[i]);

end;

for i:=1 to n write(a[i],' '); s:=0;

for i:=1 to n s:=s+a[i];

write('tong',n:3,' so mang la',s:4); readln;

(114)

Tuần 34,35 Tiết :68,69 ÔN TẬP A Mục tiêu:

1/Kiến thức: Cấu trúc câu lệnh lặp, câu lệnh lặp không xác định sử dụng biến mảng 2/Kỹ năng:

- Viết chương trình Pascal có sử dụng Biến mảng

- Biết sử dụng câu lệnh ghép

3/Thái độ: Nghiêm túc làm tập, chia tư sáng tạo B Phương pháp

- Chuẩn bị số thuật toán chương trình, đề cương ơn tập

2 Học sinh:- Thực nhiệm vụ nhà tiết trước D Tiến trình dạy: theo đề cương ơn tập thống Ngày soạn :

Ngày dạy :

Tuần 35 Tiết :70

Định dạng
Số trang	114
Dung lượng	4,09 MB