Giao an

Hoạt động : Tìm hiểu cách tìm giá trị lớn nhất và giá trị nhỏ nhất của dãy số... Viết chương trình nhập N số nguyên từ bàn phím và in ra màn hình số nhỏ nhất và số lớn nhất. Sau đó k[r]

(1)

Ngày soạn: 14/08/2010

Lớp: 8A4 Tiết: …… Ngày dạy: …/ /2010 Sĩ số: 26 Vắng: …… Lớp: 8A5 Tiết: …… Ngày dạy: …/ /2010 Sĩ số: 25 Vắng: ……

Tiết: 1

Bài 1: MÁY TÍNH VÀ CHƯƠNG TRÌNH MÁY TÍNH

I MỤC TIÊU: Kiến thức:

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

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

2 Kĩ năng:

- Biết đưa quy trình câu lệnh để thực cơng việc Thái độ:

- Thái độ học tập nghiêm túc, u thích mơn học II CHUẨN BỊ:

Sách giáo khoa, máy tính điện tử III HOẠT ĐỘNG DẠY HỌC:

1) Ổn định:

2) Kiểm tra cũ: Kh ông ki ểm tra 3) Bài mới:

HOẠT ĐỘNG CỦA THẦY HOẠT ĐỘNG CỦA TRÒ NỘI DUNG

Hoạt động 1: Tìm hiểu cách để người lệnh cho má y tính. .

? Máy tính cơng cụ giúp người làm cơng việc ? Nêu số thao tác để người lệnh cho máy tính thực

Khi thực thao tác => ta lệnh cho máy tính thực

? Để điều khiển máy tính người phải làm

+ Máy tính cơng cụ giúp người xử lý thông tin cách hiệu

+ Một số thao tác để người lệnh cho máy tính thực như: khởi động, thoát khỏi phần mềm, chép, di chuyển, thực bước để tắt máy tính…

Con người điều khiển máy tính thơng qua lệnh

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

Con người dẫn cho máy tính thực thơng qua lệnh

(2)

? Con người chế tạo thiết bị để giúp người nhặt rác, lau cửa kính tồ nhà cao tầng?

- Giả sử ta có Rơ-bốt thực thao tác như: tiến bước, quay phải, quay trái, nhặt rác bỏ rác vào thùng - Quan sát hình sách giáo khoa

? Ta cần lệnh để dẫn Rô-bốt di chuyển từ vị trí thời => nhặt rác => bỏ rác vào thùng

Con người chế tạo Rô-bốt

Học sinh ý lắng nghe

Học sinh quan sát hình sách giáo khoa theo yêu cầu giáo viên

+ Để Rô-bốt thực việc nhặt rác bỏ rác vào thùng ta lệnh sau:

- 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

2 Ví dụ Rơ-bốt nhặt rác: Các lệnh để Rơ-bốt hồn thành tốt công việc:

- 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

* DẶN DÒ:

- Học kết hợp SGK - Làm tập 1/8 SGK RÚT KINH NGHIỆM

……… ……… ……… ………

(3)

-Ngày soạn: 17/08/2010

Tiết: 2

Bài 1: MÁY TÍNH VÀ CHƯƠNG TRÌNH MÁY TÍNH (tt) I 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

- Biết ngơn ngữ lập trình ngơn ngữ dùng để viết chương trình - Biết vai trị chương trình dịch

2 Kĩ năng:

- Rèn luyện kĩ viết chương trình đơn giản Thái độ:

- Thái độ học tập nghiêm túc, u thích viết chương trình để thực số công việc II CHUẨN BỊ:

Sách giáo khoa, máy tính điện tử III HOẠT ĐỘNG DẠY HỌC:

2) Kiểm tra cũ: Con ng ời l ệnh cho m áy t ính ntn? (8’) 3) Bài mới:

Hoạt động 1: Tìm hiểu viết chương trình và lệnh cho máy tính làm việc.(10’) - Để điều khiển Rơ-bốt ta phải

làm gì?

- Viết lệnh viết chương trình => viết chương trình

? Chương trình máy tính gì? ? Tại cần phải viết chương trình

+ Để điều khiển Rô-bốt ta phải viết lệnh

+ Viết chương trình hướng dẫn máy tính thực cơng việc hay giải tốn cụ thể

+ Chương trình máy tính dãy lệnh mà máy tính hiểu thực

+ Viết chương trình giúp người điều khiển máy tính cách đơn giản hiệu

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

+ 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 cụ thể

(4)

- Để máy tính xử lí, thơng tin đưa vào máy phải đuợc chuyển đổi dạng dãy bit (dãy số gồm 1)

- Để có chương trình mà máy tính thực cần qua bước:

* Viết chương trình theo ngơn ngữ lập trình

* Dịch chương trình sang ngơn ngữ máy để máy tính hiểu

Học sinh ý lắng nghe => ghi nhớ kiến thức

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

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

- Chơng trình dịch đóng vai trị "ngời phiên dịch" dịch chơng trình đợc viết ngơn ngữ lập trình sang ngơn ngữ máy để máy tính hiểu đợc

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

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

Hoạt động 3: Củng cố(10’) ? Hãy cho biết lí cần

phải viết chương trình để điều khiển máy tính

? Chương trình dịch dùng để làm gì?

- HS trả lời - Nhận xét,nhác lại kiến thức

* DẶN DÒ: (7’)

- Học kết hợp SGK - Làm tập 2,3,4/8/SGK RÚT KINH NGHIỆM

……… ……… ……… ………

(5)

-Ngày soạn: 19/08/2010

Tiết: 3

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

- Biết ngơn ngữ lập trình gồm thành phần chữ quy tắt để viết chương trình, câu lệnh

2 Kĩ năng:

- Rèn luyện kĩ làm quen với chương trình đơn giản Thái độ:

- Thái độ học tập nghiêm túc, yêu thích môn học II CHUẨN BỊ:

Sách giáo khoa, máy tính điện tử III HOẠT ĐỘNG DẠY HỌC:

2) Kiểm tra cũ: ng ôn ng ữ l ập tr ình l g ì? (5’) 3) Bài mới:

HOẠT ĐỘNG CỦA THẦY HOẠT ĐỘNG CỦA TRỊ NỘI DUNG

Hoạt động 1: Tìm hiểu ví dụ chương trình.(15’) Ví dụ minh hoạ chương trình

đơn giản viết ngơn ngữ lập trình Pascal

Program CT_dau_tien; Uses Crt;

Begin

Writeln(‘Chao cac ban’); End

? Chương trình gồm câu lệnh

Chương trình gồm có câu lệnh Mỗi lệnh gồm cụm từ khác tạo thành từ chữ

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

Ví dụ minh hoạ chương trình đơn giản viết ngơn ngữ lập trình Pascal

Program CT_dau_tien; Uses Crt;

Begin

Writeln(‘Chao cac ban’); End

(6)

Câu lệnh viết từ kí tự định Kí tự tạo

thành bảng chữ ngơn ngữ lập trình

- Bảng chữ ngơn ngữ lập trình gồm gì?

- Mỗi câu lệnh chương trình gồm kí tự kí hiệu viết theo quy tắt định

- Nếu câu lệnh bị viết sai quy tắt, chương trình dịch nhận biết thông báo lỗi

? Bảng chữ ngôn ngữ lập trình gồm

Học sinh ý lắng nghe =>ghi nhớ kiến thức

Bảng chữ ngơn ngữ lập trình bao gồm chữ tiếng Anh số kí hiệu khác, dấu đóng mở ngoặc, dấu nháy Học sinh ý lắng nghe

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

Ngơn ngữ lập trình tập hợp kí hiệu quy tắt viết lệnh tạo thành chương trinh hoàn chỉnh thực máy tính

* DẶN DỊ:(10) - Học kết hợp SGK

- Trả lời câu hỏi 1,2/13/ SGK RÚT KINH NGHIỆM

……… ……… ……… ………

(7)

-Ngày soạn: 20 /08/2010

Tiết: 4

Bài 2: LÀM QUEN VỚI CHƯƠNG TRÌNH VÀ NGƠN NGỮ LẬP TRÌNH (tt) I MỤC TIÊU:

- Biết ngôn ngữ lập trình gồm có tập hợp từ khố 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

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

- Rèn luyện kĩ nhận biết cấu trúc chương trình Thái độ:

- Thái độ học tập nghiêm túc, yêu thích viết chương trình để thực số cơng việc II CHUẨN BỊ:

-Sách giáo khoa, máy tính điện tử III HOẠT ĐỘNG DẠY HỌC: 1 Kiểm tra cũ:

? Bảng chữ ngôn ngữ lập trình gồm ?(8’)

Bài mới:

Hoạt động 1: Tìm hiểu từ khố và tên chương trình.(1o’) - Các từ như: Program, Uses,

Begin gọi từ khoá

- Từ khoá từ dành riêng ngơn ngữ lập trình

- Ngồi từ khố, chương trình cịn có tên chương trình - Đặt tên chương trình phải tuân theo quy tắt nào?

+ Học sinh nghiên cứu sách giáo khoa trả lời câu hỏi giáo viên

* Khi đặt tên cho chương trình cần phải tuân theo quy tắt sau:

- Tên khác tương ứng với đại lượng khác

3 Từ khoá tên:

- Từ khoá từ dành riêng ngơn ngữ lập trình

- Từ khố ngơn ngữ lập trình từ dành riêng, khơng đợc 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 đợc 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 đại lợng khác nhau chơng trình phải có tên khác nhau

+ Tên không đợc trùng với cáctừ khoá

(8)

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

* Phần khai báo: gồm câu lệnh dùng để: khai báo tên chương trình khai báo thư viện

* Phần thân chương trình: gồm câu lệnh mà máy tính cần phải thực

4 Cấu trúc chương trình Pascal:

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

* Phần khai báo: gồm câu lệnh dùng để: khai báo tên chương trình khai báo thư viện * Phần thân chương trình: gồm câu lệnh mà máy tính cần phải thực

Hoạt động 3: Tìm hiểu ví dụ ngơn ngữ lập trình.(10’)

Giáo viên giới thiệu ngơn ngữ lập trình Pascal

? Hãy nêu cấu trúc chương trình Pascal

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,

V DẶN DÒ: (7’)

- Học kết hợp SGK

- Làm tập 3,4,5,6/13/SGK RÚT KINH NGHIỆM

……… ……… ……… ……….

(9)

-Ngày soạn: 22 /08/2010

Tiết: 5

Bài thực hành số 1

LÀM QUEN VỚI TURBO PASCAL

- Bước đầu làm quen với mơi trường lập trình Turbo Pascal, nhận diện hình soạn thảo, cách mở chọn chọn lệnh

- Gõ 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 Kĩ năng:

- Rèn luyện kĩ dịch, sửa lỗi chạy chương trình Thái độ:

- Thái độ học tập nghiêm túc, u thích viết chương trình để thực số công việc

II CHUẨN BỊ:

- NỘI DUNG thực hành, máy tính điện tử III HOẠT ĐỘNG DẠY HỌC:

1) Ổn định5’

2) Kiểm tra cũ: kh ông ki ểm tra 3) Bài mới:

+ Hoạt động 1: Làm quen với việc khởi động và thoát khỏi Turbo Pascal.(15’) ? Nêu cách để khởi động Turbo

Pascal

- Có thể khởi động cách nháy đúp chuột vào tên tệp Turbo.exe thư mục chứa tệp

- ? Nêu cách để thoát khỏi chương trình Pascal

Ta sử dụng tổ hợp phím Alt + X để khỏi Turbo Pascal

+ Nháy đúp vào biểu tượng Turbo Pascal hình

Chọn Menu File => Exit

1 Làm quen với việc khởi động và thoát khỏi 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 trong 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

(10)

, tên tệp mở, trỏ, dòng trợ giúp phía dưới màn hình. - Nhấn phím F10 để mở bảng chọn Để di chuyển qua lại bảng chọn ta sử dụng phím nào?

- Nhấn phím Enter để mở bảng chọn

- Quan sát lệnh bảng chọn

Để di chuyển qua lại bảng chọn, ta sử dụng phím mũi tên sang trái sang phải

Học sinh thực thao tác theo yêu cầu giáo viên

2 Nhận biết thành phần: thanh chọn, tên tệp đang mở, trỏ, dòng trợ giúp phía dưới hình.

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 dới 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 để

thốt khỏi Turbo Pascal * DẶN DÒ: (10’)

- Tiết sau thực hành: “ Bài thực hành số (tt) RÚT KINH NGHIỆM

……… ……… ……… ……….

(11)

-Ngày soạn: 24/08/2010

Tiết: 6

Bài thực hành số 1(tt)

LÀM QUEN VỚI TURBO PASCAL I MỤC TIÊU:

- Bước đầu làm quen với môi trường lập trình Turbo Pascal, nhận diện hình soạn thảo, cách mở chọn chọn lệnh

- Gõ 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 Kĩ năng:

- Rèn luyện kĩ dịch, sửa lỗi chạy chương trình Thái độ:

NỘI DUNG thực hành, máy tính điện tử III TIẾN TRÌNH DẠY HỌC:

1) Ổn định(5’)

2) Kiểm tra cũ: kh ông ki ểm tra 3) Bài mới:

Hoạt động 1: Soạn thảo chương trình đơn giản.(20’) - Yêu cầu HS gõ chơng trình

phần a sgk

- Theo dõi hớng dẫn máy

- Mở chơng trình chuẩn bị

sẵn từ máy chủ, dịch chạy chơng trình máy chủ

Học sinh soạn thảo chương trình máy tính theo hướng dẫn giáo viên

3 Soạn thảo chương trình đơn giản.

program CT_Dau_tien;

uses crt;

begin

clrscr;

writeln('Chao cac ban');

write('Toi la Turbo Pascal');

(12)

Hoạt động 2: Dịch và chạy chương trình đơn giản.(10’)

- Yêu cầu học sinh dịch chạy chương trình vừa soạn thảo

- Nhấn phím F9 để dịch chương trình

- Tiến hành sửa lỗi có - Nhấn Ctrl + F9 để chạy chương trình

4 Dịch chạy chương trình đơn giản.

- 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

* DẶN DÒ:(5’)

- Xem trước bài, tiết sau học RÚT KINH NGHIỆM

……… ……… ……… ………

(13)

-Ngày soạn: 14/08/2010

Tiết: 7

Bài 3: CHƯƠNG TRÌNH MÁY TÍNH VÀ DỮ LIỆU I MỤC TIÊU:

- Biết khái niệm liệu kiểu liệu - Biết số phép toán với kiểu liệu số Kĩ năng:

- Rèn luyện kĩ sử dụng phép toán với kiểu liệu số Thái độ:

- Thái độ học tập nghiêm túc, u thích mơn II CHUẨN BỊ:

- Sách giáo khoa, máy tính điện tử III HOẠT ĐỘNG DẠY HỌC:

1) Ổn định(5’)

2) Kiểm tra cũ: kh ông ki ểm tra 3) Bài mới:

(14)

- Để quản lí tăng hiệu xử lí, ngơn ngữ lập trình thường phân chia liệu thành thành kiểu khác

? Các kiểu liệu thường xử lí

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

- Một số kiểu liệu thường dùng: * Số nguyên

* Số thực * Xâu kí tự

Em cho ví dụ ứng với kiểu liệu?

+ Các kiểu liệu thường xử lí theo nhiều cách khác + Học sinh ý lắng nghe

Học sinh cho ví dụ theo yêu cầu giáo viên

- Số nguyên: Số học sinh lớp, số sách thư viện…

- Số thực: Chiều cao bạn Bình, điểm trung bình mơn tốn - Xâu kí tự: “ chao cac ban”

1 Dữ liệu kiểu liệu: - Để quản lí tăng hiệu xử lí, ngơn ngữ lập trình thường phân chia liệu thành thành kiểu khác

- Một số kiểu liệu thường dùng:

* Số nguyên * Số thực * Xâu kí tự

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

(15)

- Giới thiệu số phép toán số học Pascal như: cộng, trừ, nhân, chia

* Phép DV : Phép chia lấy phần dư

* Phép MOD: Phép chia lấy phần nguyên

- Yêu cầu học sinh nghiên cứu sách giáo khoa => Quy tắt tính biểu thức số học

Học sinh nghiên cứu sách giáo khoa => đưa quy tắt tính biểu thức số học:

- Các phép toán ngoặc thực trước

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

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

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

Kí hiệu phép toán số học Pascal:

+: phép cộng - : Phép trừ * : Phép nhân / : Phép chia

DV: phép chia lấy phần nguyên

Mod: phép chia lấy phần dư

* DẶN DÒ: (10’) - Học kết hợp SGK

(16)

Ngày soạn: 30/08/2010

Tiết: 8

Bài 3: CHƯƠNG TRÌNH MÁY TÍNH VÀ DỮ LIỆU (tt) I MỤC TIÊU:

- Biết kí hiệu tốn học sử dụng để kí hiệu phép so sánh - Biết giao tiếp người máy tính

2 Kĩ năng:

- Rèn luyện kĩ sử dụng kí hiệu phép so sánh ngôn ngữ Pascal Thái độ:

- GV:Sách giáo khoa, máy tính điện tử - HS: Chuẩn bị trước, sách,

III HOẠT ĐỘNG DẠY HỌC: 1 Kiểm tra cũ:(8’)

? Hãy nêu số kiểu liệu thường dùng 2 Bài mới:

Hoạt động 1: Tìm hiểu phép so sánh(10’)

- Ngồi phép toán số học, ta thường so sánh số

? Hãy nêu kí hiệu phép so sánh

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

Kết phép so sánh sai

+ Giáo viên giới thiệu kí hiệu phép so sánh ngôn ngữ Pascal

Học sinh trả lời cầu hỏi giáo viên

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

2 Các phép toán với liệu kiểu số: 3 Các phép so sánh:

- Ngồi phép tốn số học, tathường so sánh số

Hoạt động 2: Tìm hiểu giao tiếp người máy.(10’)

Kí hiệu Phép so sánh

=

< nhỏ > lớn

≠ khác

≤ nhỏ

(17)

Quá trình trao đổi liệu hai chiều người máy tính chương trình hoạt động thường gọi giao tiếp tương tác người – máy

- Yêu cầu học sinh nghiên cứu SGK => nêu số trường hợp tương tác người máy

Học sinh ý lắng nghe + Một số trường hợp tương tác người máy: - Thơng báo kết tính toán: yêu cầu chương trình

- Nhập liệu: Một tương tác thường gặp chương trình yêu cầu nhập liệu

- Tạm ngừng chương trình

- Hộp thoại: hộp thoại sử dụng công cụ cho việc giao tiếp người máy tính chạy chương trình

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

* DẶN DÒ: (7’)

- Học kết hợp SGK - Làm tập 5,6,7/26/SGK RÚT KINH NGHIỆM

(18)

Ngày soạn: 14/08/2010

Tiết: 9

VIẾT CHƯƠNG TRÌNH ĐỂ TÍNH TOÁN

- Biết cách chuyển biểu thức toán học sang biểu diễn Pascal - Biết kiểu liệu khác xử lý khác Kĩ năng:

- Rèn luyện kĩ chuyển biểu thức toán học sang biểu diễn Pascal Thái độ:

GV: thực hành, máy tính điện tử HS: Học bài, sách,

III PHƯƠNG PHÁP.

- ThỰC hành nhóm máy IV HOẠT ĐỘNG DẠY HỌC

Hoạt động 1: Viết biểu thức toán học sau dạng biểu thức Pascal?

a) 15 x – 30 + 12 ; b) 15 + 18 - ; + + c) (10 + 2)2

; (3 + 1) d) (10 + 2)2 - 24

; (3 + 1)

+ Học sinh thực chuyển biểu thức toán học sang biểu thức Pasca máy tính

Bài 1:SGK_trang 27.

(19)

Hoạt động 2: Khởi động Turbo Pascal gõ chương trình để tính biểu thức trên.

Lưu chương trình với tên CT2

Học sinh tiến hành gõ chương trình để tính biểu thức cho

Chọn Menu File => Save để lưu chương trình

b) Khởi động Turbo Pascal và gõ chương trình để tính các biểu thức trên.

V DẶN DÒ.

……… ……… ……… ………

(20)

-Ngày soạn: 14/08/2010

Tiết: 10

Bài thực hành số (tt)

VIẾT CHƯƠNG TRÌNH ĐỂ TÍNH TỐN

- Biết sử dụng phép toán DV MOD

- Hiểu thêm lệnh in liệu hình tạm ngừng chương trình Kĩ năng:

- Rèn luyện kĩ sử dụng phép toán DV MOD để giải số toán Thái độ:

GV: thực hành, máy tính điện tử HS: Học bài, sách,

- ThỰC hành nhóm máy IV HOẠT ĐỘNG DẠY HỌC

Hoạt động 1: Tìm hiểu phép chia lấy phần nguyên phép chia lấy phần dư với số nguyên Sử dụng câu lệnh tạm ngừng chương trình.

- Mở tệp gõ chương trình sách giáo khoa

- Dịch chạy chương trình Quan sát kết nhận cho nhận xét kết

- Thêm câu lệnh delay(5000) vào sau câu lệnh writeln chương trình Dịch chạy chương trình Quan sát chương trình tạm dừng giây sau in kết hình

- Thêm câu lệnh Readln vào chương trình (Trước từ khố end) Dich chạy chương trình Quan sát kết hoạt động chương

+ Học sinh thực gõ chương trình theo hướng dẫn giáo viên

+ Nhấn F9 để dịch sửa lỗi chương trình (nếu có) Nhấn Ctrl + F9 để chạy chương trình đưa nhận xét kết

Học sinh độc lập thực theo yêu cầu giáo viên

- Nắm vững thao tác để làm việc với chơng trình mơi trờng TP - Nắm vững cấu trúc tác dụng lệnh :

Writeln(‘ câu thơng báo’) ; Write (phép tốn);

(21)

trình Nhấn phím Enter để tiếp tục

Hoạt động 2: Bài tập 3 Mở lại tệp chương trình CT2.pas

và sửa câu lệnh cuối trong sách giáo khoa trước từ khoá End. Dịch và chạy chương trình sau đó quan sát kết quả.

Học sinh thực thêm câu lệnh Readln trước từ khoá End, dịch chạy chương trình sau quan sát kết

Học sinh thực theo yêu cầu giáo viên

- Củng cố lại kiến thức cần đạt đợc tiết thực hành trớc

- Nhuần nhuyễn cách giao tiếp ngời máy thông qua lệnh in liệu hình

V DẶN DÒ

- Làm lại tập - Chuẩn bị RÚT KINH NGHIỆM

……… ……… ……… ………

(22)

-Ngày soạn: 14/08/2010

Tiết: 11

SỬ DỤNG BIẾN TRONG CHƯƠNG TRÌNH I MỤC TIÊU:

- Biết được: biến cơng cụ lập trình

- Biết cách khai báo biến chương trình Pascal Kĩ năng:

- Rèn luyện kĩ khai báo biến chương trình Thái độ:

- GV:Sách giáo khoa, máy tính điện tử - HS: Đọc trước bài, vở, bút

III PHƯƠNG PHÁP. - Giảng giải

IV HOẠT ĐỘNG DẠY HỌC: HOẠT ĐỘNG CỦA

THẦY HOẠT ĐỘNG CỦATRỊ NỘI DUNG

Hoạt động 1: Tìm hiểu biến chương trình Tìm hiểu biến chương

trình

Để chương trình ln biết xác liệu cần xử lí lưu trữ vị trí nhớ, ngơn ngữ lập trình cung cấp cơng cụ lập trình biến nhớ - Biến đại lượng có giá trị thay đổi trình thực chương trình ? Biến dùng để làm

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

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

- Biếnđợc dùng để lu trữ liệu liệu thay đổi thực chơng trình

- Dữ liệu biến lu trữ đợc 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

(23)

100 50



hình Cách làm :

Xơ 100 + 50 Hoạt động 2: Tìm hiểu cách khai báo biến. - Tất biến dùng

chương trình phải khai báo phần khai báo chương trình - 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ụ:

Var m,n: Integer; S, diện tích: real; Thongbao: Strinh; Trong đó:

Var ? M,n ? S, dientich ? Thongbao ?

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

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

- m,n: biến có kiểu số nguyên

- S, dientich: biến có kiểu số thực

- thongbao: biến kiểu xâu

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 :

-223 var từ khố ngơn ngữ lập trình

dùng để khai báo biến,

-224 m, n biến có kiểu nguyên

(integer),

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

-226 thong_bao là biến kiểu xâu (string) ã3 Dạng tổng quát :

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

V DẶN DÒ:

- Học kết hợp SGK

……… ……… ………

(24)

Tiết: 12 Ngày Soạn: …./ …./09

Tuần: Ngày dạy : … / …./09

SỬ DỤNG BIẾN TRONG CHƯƠNG TRÌNH (tt)

- Biết cách sử dụng biến chương trình Pascal - Biết khái niệm ngôn ngữ lập trình Kĩ năng:

- Rèn luyện kĩ sử dụng biến chương trình Thái độ:

- Thái độ học tập nghiêm túc, yêu thích môn II CHUẨN BỊ:

- GV:Sách giáo khoa, máy tính điện tử - HS: Đọc trước bài, vở, bút

III PHƯƠNG PHÁP. - Giảng giải

IV HOẠT ĐỘNG DẠY HỌC

HOẠT ĐỘNG CỦA THẦY HOẠT ĐỘNG CỦA

TRÒ NỘI DUNG

Hoạt động 1: Tìm hiểu cách sử dụng biến chương trình. Các thao tác thực

với biến là:

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

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

Câu lệnh gán giá trị ngôn ngữ lập trình thường có dạng nào?

Hãy nêu ý nghĩa câu lệnh sau:

x:=12;

Học sinh ý lắng nghe => ghi nhớ kiến thức Câu lệnh gán giá trị ngơn ngữ lập trình có dạng:

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

- Gán giá trị số 12 vào biến nhớ x

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

3 Sử dụng biến chương trình: - Muốn 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 hoặc 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);

(25)

x:=y; 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

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

Lệnh Ý nghĩa X:=12;

Gán giá trị số 12 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 vào biến X

X:=Y;

Gán giá trị lu biến nhớYvào biến nhớX

X:=(a+b)/2;

Thực phép toá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ếnX

Hoạt động 2: Tìm hiều chương trình. - Hằng đại lượng có giá

trị khơng thay đổi q trình thực chương trình - Ví dụ khai báo hằng: Const pi = 3.14;

Bankinh = 2; Trong đó: - Const ? - pi, bankinh ?

- Const: từ khoá để khai báo

- pi, bankinh: gán giá trị tương ứng 3.14

4 Hằng:

- Hằng đại lợng để lu 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ụ :

V DẶN DÒ:

- Học kết hợp SGK - Làm tập 5, 6/33/SGK RÚT KINH NGHIỆM

……… ……… ………

(26)

Tiết: 13 Ngày Soạn: …./ …./09

Tuần: Ngày dạy : … / …./09

KHAI BÁO VÀ SỬ DỤNG BIẾN

- Thực khai báo cú pháp, lựa chọn kiểu liệu phù hợp cho biến

- Kết hợp lệnh Write, Writeln với Read, Readln để thực việc nhập liệu cho biến từ bàn phím

- Hiểu kiểu liệu chuẩn: số nguyên, số thực - Hiểu cách khai báo sử dụng

2 Kĩ năng:

- Rèn luyện kĩ kết hợp câu lệnh Write, Writeln với Read, Readln Thái độ:

- GV: thực hành, máy tính điện tử - HS: Học bài, sách,vở, bút

- Thực hành nhóm, thảo luận IV HOẠT ĐỘNG DẠY HỌC

Hoạt đơng : Hướng dẫn ban đầu -255 Phổ biến nội dung yêu cầu

chung tiết thực hành khai báo sử dụng biến, hằng.

-256 Lắng nghe

(27)

- Yêu cầu HS đọc toán

SGK

- Chơng trình cần khai báo

những biến ?

- Gợi ý cơng thức cần tính:

Tiền tốn = Đơn giá ´ Sớ lợng + Phí dịch vụ

- Yêu cầu HS làm toán

- Đi máy kiểm tra hớng dẫn, uốn nắn HS cách soạn thảo chơng trình

- Giải thích sơ phần vừa đa

lên

- Kết hợp đánh giá cho điểm HS

qua tiết thực hành

- Đọc toán SGK

nghiên cứu

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

- Theo dõi

- Làm câu a theo yêu cầu

SGK

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

Bài toán:Một cửa hàng cung cấp dịch vụ bán hàng toán nhà Khách hàng cần đăng kí số lợng mặt hàng cần mua, nhân viên cửa hàng trả hàng nhận tiền tốn nhà khách hàng Ngồi trị giá hàng hố, khách hàng cịn phải trả thêm phí dịch vụ Hãy viết chơng trình Pascal để tính tiền toán trờng hợp khách hàng mua mặt hàng

- Đi máy kiểm tra hớng dẫn, uốn nắn HS cách soạn thảo chơng trình

- Giải thích sơ phần vừa đa lên

- Kết hợp đánh giá cho điểm HS

qua tiết thực hành

- Làm câu b, c, d theo yêu cầu

SGK

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

a) Lu chơng trình với tên

TINHTIEN.PAS Dịch chỉnh

sửa lỗi gõ, có

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

(28)

trình cho kết sai V DẶN DÒ:

- Tiết sau thực hành: “ Bài thực hành số 3” (tt) RÚT KINH NGHIỆM

……… ……… ………

………

- 

-Tiết: 14 Ngày Soạn: …./ …./09

Tuần: Ngày dạy : … / …./09

Bài thực hành số (tt) KHAI BÁO VÀ SỬ DỤNG BIẾN

- Hiểu kiểu liệu chuẩn: số nguyên, số thực - Hiểu cách khai báo sử dụng

2 Kĩ năng:

- Rèn luyện kĩ kết hợp câu lệnh Write, Writeln với Read, Readln Thái độ:

- GV: thực hành, máy tính điện tử - HS: Học bài, sách,vở, bút

- Thực hành nhóm, thảo luận IV HOẠT ĐỘNG DẠY HỌC

Hoạt động của thầy

Hoạt động trò Nội dung

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

- Phổ biến nội dung yêu cầu chung tiết thực hành khai báo

(29)

và sử dụng biến, hằng.

Và yêu cầu học sinh khởi động máy

Báo cáo tình hình cho GV

Hoạt động : Rèn kỹ soạn, dịch, chạy chơng trình có sử dụng biến

- Hớng dẫn HS

bớc để giải toán

- Kiểm tra hớng dẫn

trên máy

- Để thực tráo đổi giá trị hai biến ta làm nh ?

- Đọc đề SGK

nghiên cứu để hiểu cách làm

- Thực hành Tham khảo

chơng trình hoan_doi SGK

- Soạn, dịch chạy ch-ơng trình máy

- Trả lời

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

Tham khảo chơng trình sau:

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.

Hoạt động 3: tổng kết nội dung tiết thực hành.

- Đa lên hình nội

dung cần đạt tiết thực hành (SGK)

- Tổng kết lại

- Đứng chỗ đọc lại

- Lắng nghe

TỔNG KẾT

1. Cú pháp khai báo biến Pascal:

var <danh sách biến>: <kiểu liệu>;

trong danh sách biến gồm tên biến đợc cách dấu phẩy

2. Cú pháp lệnh gán Pascal: <biến>:= <biểu thức>

3. Lệnh read(<danh sách biến>) hay

readln(<danh sách biến>), danh sách biến là tên biến khai báo, đợc sử dụng để nhập liệu từ bàn phím Sau nhập liệu cần nhấn phím Enter để xác

nhận Nếu giá trị nhập vào vợt phạm vi biến, nói chung kết tính tốn sai 4. Nội dung chú thích nằm cặp dấu { }

bị bỏ qua dịch chơng trình Các chú thích đợc dùng để làm cho chơng trình dễ đọc, dễ hiểu Ngồi sử dụng cặp dấu (* *) để tạo thích

V DẶN DỊ

- Làm lại tạp - Tiết sau tập RÚT KINH NGHIỆM

(30)

……… ………

- 

-Tiết: 15 Ngày Soạn: …./ …./09

Tuần: Ngày dạy : … / …./09

LUYỆN GÕ PHÍM NHANH VỚI FINGER BREAK OUT

I MỤC TIÊU: a 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

b Kĩ năng:

- Rèn luyện kỹ gõ bàn phím nhanh xác

- Vận dụng được: hình thành kỹ thói quen gõ bàn phím mười ngón tay II CHUẨN BỊ:

Sách giáo khoa, máy tính điện tử, phần mềm Finger break out III PHƯƠNG PHÁP:

- Hướng dẫn thừng thao tác; thực hành IV TIẾN TRÌNH DẠY HỌC:

(31)

? Hãy nêu mục đích sử dụng

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

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

Hoạt động 2: Tìm hiểu cách khởi động giới thiệu hình phần mềm.

? Hãy nêu cách để khởi động phần mềm

GV giới thiệu hình phần mềm

- u cầu HS nghiên cứu SGK => thành phần phần mềm

Nháy đúp chuột lên biểu tượng phần mềm hình Desktop

Học sinh ý quan sát

+ Các thành phần phần mềm gồm:

- Hình bàn phím vị trí trung tâm - Khu vực chơi phía hình bàn phím

2 Màn hình phần mềm:

a) Khởi động phần mềm: Để khởi động phần mềm ta nháy đúp chuột lên biểu tượng

- Muốn thoát khỏi phần mềm ta nháy chuột lên nút Stop khung bên phải nháy vào nút Close

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

HS nghiên cứu SGK => cách sử dụng

- Để bắt đầu chơi em nháy chuột nút Start khung bên phải

- Xuất hộp thoại cho biết phím (trong bàn phím) sử dụng lần chơi đó.-> Nhấn phím space để bắt đầu chơi

b) Giới thiệu hình phần mềm:

c) Thoát khỏi phần mềm - Muốn thoát khỏi phần mềm ta nháy chuột lên nút Stop khung bên phải nháy vào nút Close

(32)

Yêu cầu học sinh nghiên cứu SGK => cách sử dụng phần mềm

- Nhiệm vụ người chơi phải bắn phá có dạng

- Điều khiển ngang bắn cầu nhỏ phím tương ứng

- Khơng để cầu lớn “ chạm đất”

- Ở mức khó hơn, khơng để vật lạ chạm vào ngang

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

V DẶN DÒ:

- Về nhà xem lại bài, tiết sau “Thực hành” RÚT KINH NGHIỆM

……… ……… ……… ……….

- 

-Tiết: 16 Ngày Soạn: …./ …./09

Tuần: Ngày dạy : … / …./09

Thực hành

LUYỆN GÕ PHÍM NHANH VỚI FINGER BREAK OUT

- Biết sử dụng phần mềm Finger Break Out để luyện gõ mười ngón Kĩ năng:

(33)

- Cẩn thận, nghiêm túc luyện tập từ dễ đến khó - Phát triển tư duy, phản xạ nhanh

- Sách giáo khoa, máy tính điện tử, phần mềm Finger break out III PHƯƠNG PHÁP:

- Hướng dẫn thừng thao tác; thực hành IV TIẾN TRÌNH DẠY HỌC:

Hoạt động 1: Khởi động phần mềm

? Yêu cầu học sinh khởi động phần mềm

Nháy đúp chuột lên biểu tượng phần mềm hình Desktop để khởi động theo yêu cầu giáo viên

Hoạt động 2: Giới thiệu nội dung thực hành.

GV giới thiệu NỘI DUNG

thực hành Học sinh ý lắng nghe => Ghinhớ kiến thức

Hoạt động 3: Học sinh thực hành luyện gõ mười ngón phần mềm.

Sử dụng phần mềm để luyện gõ 10 ngón theo yêu cầu giáo viên IV DĂN DÒ

Nhận xét đánh giá tiết thực hành RÚT KINH NGHIỆM

……… ……… ……

- 

Tiết: 17 Ngày Soạn: …./ …./09

Tuần: Ngày dạy : … / …./09

BÀI TẬP I MỤC TIÊU:

- 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

2 Kĩ năng:

(34)

3 Thái độ:

- HS nghiêm túc học tập nghiên cứu học, giáo dục học sinh tính sáng tạo, tích cực học tập, lịng u thích mơn

- GV:Sách giáo khoa, máy tính điện tử - HS: Ơn lại kiến thức học

III PHƯƠNG PHÁP. - Hướng dẫn, thảo luận

IV HOẠT ĐỘNG DẠY HỌC:

Hoạt động 1: Củng cố lại số kiến thức học

? Trong Pascal có kiểu liệu

? Hãy nêu phép toán

* Kiểu liệu : - Interger : Số nguyên - Real : Số thực - Char : Kí tự - String : Xâu kí tự * Các phép tốn : - Cộng : +

Trừ : Nhân : * - Chia : /

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

1 Củng cố lại số kiến thức học

* Kiểu liệu : - Interger : Số nguyên - Real : Số thực - Char : Kí tự - String : Xâu kí tự * Các phép tốn : - Cộng : +

Trừ : Nhân : * - Chia : /

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

Hoạt động 2: Vận dụng để làm số tập.

Bài 1: Dãy số 2010 dữ

liệu kiểu nào? Dãy chữ số 2010 liệukiể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');

2 Vận dụng để làm số bài tập.

(35)

Bài Viết biểu thức toán học sau dạng biểu thức Pascal

a) a c b d ; b) ax2 bx c

  ;ax2bx c ; c)1 a(b 2)

x 5  ; d) (a2 b)(1 c)3

 

Bài 3: Viết chương trình tính tổng số ngun dương nhập từ bàn phím:

writeln(2010); a:=2010; b:=2010; c:=’2010’ end a) a/b+c/d;

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

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

Program tinhtong; Var a,b: integer; S: real; Begin

Writeln(‘ Nhap so nguyen duong a:’); readln(a);

Writeln(‘ Nhap so nguyen duong b:’); readln(b);

S:= a + b;

Writeln( ‘ Tong cua so a va b la:’, s:3:0);

Readln; End

Bài Viết biểu thức toán học sau dạng biểu thức Pascal

a) a c b d ; b) ax2 bx c

  ;ax2bx c ; c)1 a(b 2)

x 5  ; d) (a2 b)(1 c)3

 

(36)

Bài 4: Viết chương trình tính

diện tích chu vi hình chữ nhật Program chu_vi_hinh_chu_nhat;Var a,b,p: integer; Begin

Writeln(‘ Nhap chieu dai a:’); readln(a);

Writeln(‘ Nhap chieu rong b:’); readln(b);

P:= a + b;

Writeln( ‘ Chu vi hinh chu nhat la:’, P:3:0);

Readln; End

Bài 4: Viết chương trình tính diện tích chu vi hình chữ nhật

V DẶN DÒ:

- Về nhà ôn lại tất kiến thức học, tiết sau kiểm tra tiết RÚT KINH NGHIỆM

……… ……… ……… ………

(37)

-Tiết: 18 Ngày Soạn: …./ …./09

Tuần: Ngày dạy : … / …./09

KIỂM TRA TIẾT ( LT)

I MỤC TIÊU:

- Biết cách chuyển biểu thức toán học sang kí hiệu Pascal - Biết sử dụng câu lệnh đơn giản để viết chương trình

II Đề bài:

I TNKQ (5 điểm): Mỗi câu 0.5 điểm. ĐỀ 1:

1 A. 2 C. 3 A. 4 C. 5 B. 6 D. 7 B. 8 B. 9 D. 10

D.

ĐỀ 2:

1 B. 2 A. 3 B. 4 B. 5 A. 6 C. 7 C. 8 D. 9 D. 10

D.

II TNTL (2 điểm):

Câu 1: Var x: integer; (0.5 đ)

y: real; (0.5 đ)

Câu 2: Writeln(5*5 + (8-2)*2); (1 đ)

III VIẾ T CHƯƠ NG TRÌNH (3 điểm):

Var x: integer; (0.5 ñ)

Begin

Readln(x); (1 ñ)

Writeln(x*x); (1 ñ)

End

- Chương trình không gặp lỗi (0.5 đ)

- Gặp lỗi (-0.25 đ)

MA TRẬN ĐỀ:

Chủ đề TNKQ TNTL TNKQ TNTLNhận biết Thông hiểu TNKQ TNTLVận dụng Tổng

Khái niệm ban đầu chương trình ngơn ngữ

lập trình

4 câu 2đ

4 câu 2đ Thực tính tốn với

các kiểu liệu câu0.5đ câu0.5đ câu1đ câu 2đ

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

1 câu 0.5đ

1 câu 1đ

2 câu 1đ

5 câu 3đ

(38)

trình 3đ 3đ

Tổng câu 3đ câu 3đ câu 4đ 13 câu10đ

ĐỀ:

I TNKQ (5 điểm): Hãy khoanh tròn chữ đứng trước câu trả lời đúng: Câu 1: Trong từ sau, từ từ khoá?

A Ct_dau_tien B End C Begin D Program

Câu 2: Từ khóa sau dùng để khai báo hằng?

A Uses B Var C Const D Program

Câu 3: Ngôn ngữ lập trình là:

A chương trình máy tính B một thuật tốn

C mơi trường lập trình D ngơn ngữ dùng để viết ngơn ngữ máy tính

Câu 4: Khi ta khai báo biến x có kiểu integer phép gán sau hợp lệ?

A x:= 5000000; B x:= ‘tin_hoc’; C x:= 200; D x:= 1.23;

Câu 5: Cấu trúc chung chương trình gồm phần?

A 2 phần B 1 phaàn C 4 phaàn D 3 phaàn

Câu 6: Để khai báo biến x thuộc kiểu số thực ta khai báo:

A Var x: String; B Var x: integer; C Var x: Char; D Var x: Real;

Câu 7: Hãy cho biết kết xuất hình sau thực câu lệnh Writeln(‘16*2-3=’,16*2-3);

A 16*2-3= B 16*2-3=29C 29 D 16*2-3

Câu 8: Câu lệnh cho phép ta nhập giá trị a từ bàn phím là:

A Writeln(a); B readln(a);

C Write(‘nhap gia tri cua a:’); D Write(a);

Câu 9: Sau câu lệnh x:=5; x:=x*x; Giá trị biến x là:

A 5 B 10 C 15 D 25

Câu 10: Để gán giá trị 12 cho biến x ta dùng lệnh:

A x = 12; B x:12; C x =: 12; D x:= 12;

II TNTL (2 điểm):

Câu 1: Viết câu lệnh khai báo biến x có kiểu số nguyên biến y có kiểu số thực ngơn ngữ lập trình Pascal

Câu 2: Viết câu lệnh xuất kết biểu thức 52 (8 2).2

  hình

III VIẾ T CHƯƠ NG TRÌNH (3 điểm):

Viết chương trình nhập vào số nguyên x xuất bình phương số

THỐNG KÊ CHẤT LƯỢNG BỘ MƠN TSH

S

Giỏi Khá TB TC Yếu Kém

TS % TS % TS % TS % TS % TS %

(39)

- 

-Tiết: 19 Ngày Soạn: …./ …./09

Tuần: 10 Ngày dạy : … / …./09

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

- Hiểu toán biết cách xác định toán Kĩ năng:

- Rèn luyện kĩ phân tích xác định tốn Thái độ:

GV:Sách giáo khoa, máy tính điện tử HS: Sách, vở,học

III PHƯƠNG PHÁP - Giảng giải

Hoạt động 1: Tìm hiểu khái niệm tốn

? Bài toán khái niệm quen thuộc ta thường gặp môn học nào?

? Em cho ví dụ tốn

- Tuy nhiên, ngày ta thường gặp giải công việc đa dạng nhiều lập bảng cửu chương, lập bảng điểm bạn lớp…

- Giáo viên phân tích => yêu

+ Bài toán khái niệm ta thường gặp mơn như: tốn, vật lý, hố học…

Ví dụ như: tính tổng số tự nhiên từ đến 100, tính quảng đường tơ với vận tốc 60 km/giờ

+ Học sinh ý lắng nghe => ghi nhớ kiến thức

+ Ta hiểu tốn

1 Bài toán xác định toán: a) Bài toán:

(40)

cầu học sinh đưa khái niệm tốn

một cơng việc hay nhiệm vụ cần phải giải

Hoạt động 2: Tìm hiểu cách xác định toán. - Để giải

toán cụ thể, người ta cần xác định toán, tức xác định rõ điều kiện cho trước kết thu

Ví dụ 1: Để tính diện tích tam giác ta cần xác định:

- Điều kiện cho trước: cạnh đường cao tương ứng cạnh

- Kết thu được: Diện tích hình tam giác

Ví dụ 2: Bài tốn tìm đường tránh điểm tắt nghẽn giao thông

? Em xác định tốn

Ví dụ 3: Đối với tốn nấu ăn

- Điều kiện cho trước: Vị trí nghẽn giao thơng đường từ vị trí tới vị trí cần tới

- Kết thu được: Đường từ vị trí tới vị trí cần tới mà khơng qua điểm nghẽn giao thơng

- Điều kiện cho trước: Các thực phẩm có (trứng, mỡ, mắm, muối, rau…)

- Kết thu được: ăn

b) Xác định toán:

- Để giải toán cụ thể, người ta cần xác định toán, tức xác định rõ điều kiện cho trước kết thu

V DẶN DÒ:

(41)

……… ……… ……… ………

- 

-Tiết: 20 Ngày Soạn: …./ …./09

Tuần: 10 Ngày dạy : … / …./09

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

- Biết bước giải tốn máy tính, thuật tốn? Kĩ năng:

- Rèn luyện kĩ lập bước giải toán đơn giản Thái độ:

- Thái độ học tập nghiêm túc, rèn luyện tư logic II CHUẨN BỊ:

IV HOẠT ĐỘNG DẠY HỌC: Kiểm tra cũ: (5p)

? Hãy nêu khái niệm toán, để giải tốn cụ thể ta phải làm

Hoạt động 1: Tìm hiểu khái niệm thuật tốn

- Việc dùng máy tính giải tốn đưa cho máy tính dãy hữu hạn thao tác đơn giản mà thực để từ điều kiện cho trước ta nhận kết cần thu

=> đưa khái niệm thuật toán

2 Q trình giải tốn trên máy tính.

(42)

- Nói cách khác, thuật tốn bước để giải tốn, cịn chương trình thể thuật tốn ngơn ngữ lập trình cụ thể

+ Dãy hữu hạn thao tác cần thực để giải toán gọi thuật toán

+ Học sinh ý lắng nghe

Hoạt động 2: Tìm hiểu q trình giải tốn máy tính.

- Yêu cầu học sinh nghiên cứu SGK => trình giải tốn máy tính

- Viết chương trình thể thuật tốn ngơn ngữ lập trình cho máy tính hiểu thực

+ Q trình giải tốn máy tính gồm bước sau: - Xác định toán: Từ phát biểu toán, ta xác định đâu thông tin cho đâu thơng tin cần tìm - Mơ tả thuật tốn: Tìm cách giải toán diễn tả lệnh cần phải thực - Viết chương trình: Dựa vào mơ tả thuật tốn trên, ta viết chương trình ngơn ngữ lập trình mà ta biết

b) Quá trình giải tốn máy tính:

V DẶN DỊ:

(43)

……… ……… ……… ………

- 

-Tiết: 21 Ngày Soạn: …./ …./09

Tuần: 11 Ngày dạy : … / …./09

- Học sinh nắm vai trò biến, hằng, cách khai báo biến, - Biết cách sử dụng biến chương trình cấu trúc lệnh gán Kĩ năng:

- Rèn luyện kĩ sử dụng biến chương trình Thái độ:

III PHƯƠNG PHÁP

- Hướng dẫn, thảo luận nhóm IV HOẠT ĐỘNG DẠY HỌC:

Hoạt động 1: Ôn lại số kiển thức học - Biến đại lượng

nào? - Biến dùng để đặt tên cho một

(44)

- Cách khai báo biến nào?

- Có thể thực thao tác với biến?

- Viết cấu trúc lệnh gán, lệnh nhập giá trị cho biến, lệnh in giá trị biến?

vùng nhớ máy tính Biến lưu trữ liệu (giá trị) Giá trị biến thay đổi q trình thực chương trình

- Trước sử dụng biến phải khai báo theo dạng sau : Var tên biến : kiểu biến;

- Các thao tác thực với biến gán giá trị cho biến nhập giá trị cho biến tính tốn với giá trị biến

- Lệnh gán có dạng: Tên biến := biểu thức(gt);

- Lệnh nhập giá trị cho biến:Readln(tên biến);

- Lệnh in giá trị cho biến : Write(tên biến); Writeln(tên biến);

- Biến đại lượng nào?

- Cách khai báo biến nào?

- Có thể thực thao tác với biến?

- Viết cấu trúc lệnh gán, lệnh nhập giá trị cho biến, lệnh in giá trị biến?

(45)

* Bài tập 1:

Hãy lỗi sửa lỗi chương trình sau :

Const pi:=3.1416; Var cv,dt:integer

R:real; Begin

R=5.5 Cv=2*pi*r; Dt=pi*r*r;

Writeln(‘chu vi la:= cv’);

Writeln(‘dien tich la:=dt’);

Readln End

* Bài tập 2:

Viết chương trình tính diện tích S của hình tam giác với độ dài cạnh a và chiều cao tương ứng h (a và h là số tự nhiên nhập vào từ bàn phím)

+ Học sinh tìm sửa lỗi chương trình theo yêu cầu giáo viên

+ Học sinh viết chương trình: Program tinhtoan;

Var a,h: interger; S : real; Begin

Write(‘Nhap canh day chieu cao :’);

Readln (a,h); S:=(a*h)/2;

Writeln(‘ Dien tich hinh tam giac la :’,S:5:1);

Readln; End

2 Bài tập:

* Bài tập 1:Hãy lỗi sửa lỗi chương trình sau : Const pi:=3.1416;

Var cv,dt:integer R:real; Begin

R=5.5 Cv=2*pi*r; Dt=pi*r*r;

Writeln(‘chu vi la:= cv’); Writeln(‘dien tich la:=dt’); Readln

End

* Bài tập 2:

Viết chương trình tính diện tích S của hình tam giác với độ dài cạnh a và chiều cao tương ứng h (a và h là số tự nhiên nhập vào từ bàn phím)

V DẶN DỊ:

- Về nhà học bài, kết hợp SGK RÚT KINH NGHIỆM

……… ……… ……… ………

(46)

-Tiết: 22 Ngày Soạn: …./ …./09

Tuần: 11 Ngày dạy : … / …./09

TỪ BÀI TỐN ĐẾN CHƯƠNG TRÌNH (tt) I MỤC TIÊU:

- Biết khái niệm thuật tốn cách mơ tả thuật toán Kĩ năng:

- Rèn luyện kĩ mơ tả thuật tốn Thái độ:

III HOẠT ĐỘNG DẠY HỌC: Kiểm tra cũ: (5p)

? Hãy nêu khái niệm thuật tốn q trình giải tốn máy tính Bài mới:

Hoạt động 1: Tìm hiểu khái niệm thuật tốn ? Em nêu lại khái niệm

thuật toán

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

2 Thuật tốn mơ tả thuật tốn:

(47)

? Nêu bước phải làm để nấu cơm

- Yêu cầu học sinh nghiên cứu SGK => trình giải tốn máy tính

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

B1: vo gạo

B2: cho gạo vào nồi B3: Cho nồi vào nấu B4: Cho cơm vào bát

- INPUT: Trà, nước sôi, ấm chén

? Em mơ tả thuật tốn để liệt kê bước pha trà mời khách

- Nêu khơng có mơ tả khác thuật tốn, bước thuật toán thực cách theo trình tự

- Ví dụ: Hãy nêu thuật tốn để làm trứng tráng

- OUTPUT: Chén trà pha để mời khách

- Bước Tráng ấm, chén nước sôi

- Bước Cho trà vào ấm - Bước Rót nước sơi vào ấm đợi khoảng đến phút

- Bước Rót trà chén để khách

- INPUT: Trứng, dầu ăn, muối hành

- OUTPUT: Trứng tráng - Bước Đập trứng, tách vỏ cho trứng vào bát

- Bước Cho chút muối hành tươi thái nhỏ vào bát trứng Dùng đũa khuấy mạnh

- Bước Cho thìa dầu ăn vào chảo, đun nóng đỏ trứng vào đun tiếp phút

- Bước Lật mặt miếng trứng úp xuống Đun tiếp khoảng phút

- Bước Lấy trứng đĩa

+ Nêu thuật tốn để làm trứng tráng

V DẶN DÒ:

(48)

RÚT KINH NGHIỆM

……… ……… ……… ………

- 

-Tiết: 23 Ngày Soạn: …./ …./09

Tuần: 12 Ngày dạy : … / …./09

TỪ BÀI TOÁN ĐẾN CHƯƠNG TRÌNH (tt) I MỤC TIÊU:

- Tìm hiểu số ví dụ thuật toán Kĩ năng:

- Rèn luyện kĩ xác định mơ tả thuật tốn Thái độ:

Hướng dẫn, thảo luận nhóm IV HOẠT ĐỘNG DẠY HỌC:

Hoạt động 1: Tìm hiểu ví dụ 1.

- Một hình A ghép từ hình chữ nhật với chiều rộng 2a, chiều dài b hình bán nguyệt ban kính a hình đây:

? Em nêu thuật tốn để tính

+ Học sinh lắng nghe, xác định yêu cầu toán

+ Thuật toán để tìm diện tích hình A gồm bước sau: - Input: Số a ½ chiều rộng

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

(49)

diện tích hình A hình chữ nhật bán kính hình bán nguyệt, b chiều dài hình chữ nhật

- Output: Diện tích hình A Bước Tính S1 = 2a b

{Tính diện tích hình chữ nhật} Bước Tính S2 = π a2/2

{Tính diện tích hình bán nguyệt}

Bước Tính kết S = S1 +

S2 kết thúc

? Em nêu thuật tốn để tính diện tích hình A

Hoạt động 2: Tìm hiểu ví dụ 2.

- Tính tổng 100 số tự nhiên

Dùng biến SUM để lưu giá trị tổng Đầu tiên gán cho SUM có giá trị = Tiếp theo lần lược thêm giá trị 1,2,3, 100 vào SUM

? Nêu thuật toán

- Thuật toán dài dịng Ta mơ tả thuật tốn ngắn gọn sau: Bước SUM  0; i 

Bước i  i +

Bước Nếu i <= 100, SUM  SUM + quay lại bước Bước Thơng báo kết kết thúc thuật tốn

- Học sinh ý lắng nghe => ghi nhớ kiến thức

Bước SUM 

Bước SUM  SUM +

Bước 101 SUM  SUM + 100

Ví dụ 2: Viết thuật tốn tính tổng 100 số tự nhiên

V DẶN DÒ:

(50)

- 

-Tiết: 24 Ngày Soạn: …./ …./09

Tuần: 12 Ngày dạy : … / …./09

TÌM HIỂU THỜI GIAN VỚI PHẦN MỀM SUN TIMES I MỤC TIÊU:

- HS hiểu chức phần mềm, sử dụng phần mềm để quan sát thời gian địa phương vị trí khác trái đất

- Hs tự thao tác thực số chức phần mềm Kĩ năng:

- Rèn luyện kĩ sử dụng phần mềm để tìm hiểu thêm thiên nhiên, trái đất, từ nâng cao ý thức bảo vệ mơi trường sống

3 Thái độ:

- GV: Sách giáo khoa, máy tính điện tử - HS : Bút, vở, sáchGK

- Hướng dẫn,hoạt động nhóm IV HOẠT ĐỘNG DẠY HỌC:

+ Hoạt động 1: Tìm hiểu phần mềm - Các vị trí khác Trái Đất

(51)

- 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 nhiều thông tin liên quan đến thời gian

giúp em nhìn tồn cảnh vị trí, thành phố, thủ nước tồn giới nhiều thơng tin liên quan đến thời gian Hoạt động 2: Tìm hiểu cách khởi động phần mềm.

? Em nêu cách khởi động phần mềm

Yêu cầu học sinh khởi động phần mềm máy tính

Nháy đúp vào biểu tượng để khởi động phần mềm + Học sinh khởi động phần mềm máy tính theo yêu cầu giáo viên

2 Màn hình của phần mềm:

a) Khởi động phần mềm: Để khởi động phần mềm ta nháy đúp vào biểu tượng

hình Hoạt động : Tìm hiểu màn hình phần mềm.

Yêu cầu học sinh quan sát cho biết hình phần mềm gồm gì?

+ Màn hình phần mềm gồm:

- Các vùng sáng tối khác nhau.Vùng sáng cho biết vị trí thuộc vùng thời ban ngày, vùng tối ban đêm - Giữa vùng sáng tối có đường vạch liền, ranh giới ngày đêm

- Trên đồ có vị trí đánh dấu thành phố thủ quốc gia

b) Màn hình phần mêm:

Hoạt động : Tìm hiểu cách thoát khỏi phần mềm. ? Hãy cho biết cách khỏi phần

mềm

Ngồi ta nhấn tổ hợp phím Alt + F4 để thoát khỏi phần mềm

+ Để thoát khỏi phần mềm ta chọn Menu File => Exit

c) Thoát khỏi phần mềm: Để thoát khỏi phần mêm ta thực hiện:

- Chọn File => Exit

- Nhấn tổ hợp phím Alt + F4

V DẶN DỊ:

(52)

……… ……… ……… ………

- 

-Tiết: 25 Ngày Soạn: …./ …./09

Tuần: 13 Ngày dạy : … / …./09

TÌM HIỂU THỜI GIAN VỚI PHẦN MỀM SUN TIMES (tt) I MỤC TIÊU:

- Biết cách sử dụng phần mềm như: phóng to để quan sát, nhận biết ngày đêm

- Biết cách sử dụng số chức khác phần mềm: Ẩn hình ảnh bầu trời theo thời gian

2 Kĩ năng:

- Rèn luyện kĩ sử dụng phần mềm để tìm hiểu thêm thiên nhiên, trái đất, từ nâng cao ý thức bảo vệ môi trường sống

3 Thái độ:

Sách giáo khoa, máy tính điện tử III PHƯƠNG PHÁP

Hướng dẫn, hoạt động nhóm IV HOẠT ĐỘNG DẠY HỌC:

(53)

- Muốn phóng to để quan sát vùng đồ chi tiết ta nhấn giữ nút phải chuột kéo thả từ đỉnh đến đỉnh đối diện hình chữ nhật

- Yêu cầu HS nghiên cứu SGK => cách để quan sát nhận biết ngày đêm

- Quan sát xem thông tin thời gian chi tiết địa điểm cụ thể

Trên đồ có vùng sáng, tối khác cho biết thời gian vùng ngày hay đêm

- Học sinh ý quan sát theo hướng dẫn giáo viên + Vùng có màu đen đồ có thời gian ban đêm Xung

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

a) Phóng to quan sát vùng đồ chi tiết:

b) Quan sát nhận biết thời gian: ngày đêm

c) Quan sát xem thông tin thời gian chi tiết thời điểm cụ thể:

d) Quan sát vùng đệm

- Quan sát vùng đệm ngày đêm

quanh vùng có giải phân cách sáng-tối, vùng đệm ngày đêm

ngày đêm

Hoạt động 2: Tìm hiểu sớ chức khác phần mềm. - Để không hình ảnh bầu

trời theo thời gian ta thực sau: Option => Maps chọn hủy chọn mục Show Sky Color - Để cố định vị trí thời gian quan sát ta làm nào?

- Yêu cầu HS quan sát SGK => cho biết cách tìm địa điểm có thơng tin thời gian ngày giống - Tìm kiếm quan sát nhật thực trái đất ta thực hiện:

* Chọn địa điểm muốn tìm nhật thực * Thực lệnh View => Eclipse

+ Để chuyển cách thức thay đổi thông tin ta chọn Option => Maps => chọn học hủy chọn mục Hover Update + Các bước thực hiện:

- Chọn vị trí ban đầu

- Chọn Option => Anchor time to => chọn mục Sunrise để tìm theo thời gian

+ Học sinh ý quan sát cách thực

2 Một số chức khác a) Hiện khơng hình ảnh bầu trời theo thời gian

b) Cố định vị trí thời gian quan sát:

c) Tìm kiếm địa điểm có thơng tin thời gian ngày giống nhau:

(54)

V DẶN DÒ:

- Về nhà học kết hợp sách giáo khoa RÚT KINH NGHIỆM

……… ……… ……… ………

- 

-Tiết: 26 Ngày Soạn: …./ …./09

Tuần: 13 Ngày dạy : … / …./09

Thực hành:

TÌM HIỂU THỜI GIAN VỚI PHẦN MỀM SUN TIMES (tt) I MỤC TIÊU:

- Sử dụng phần mềm Sun times để thực hành: phóng to để quan sát vùng đồ chi tiết, quan sát nhận biết thời gian ngày đêm

2 Kĩ năng:

- Rèn luyện kĩ sử dụng phần mềm để tìm hiểu thêm thiên nhiên, trái đất, từ nâng cao ý thức bảo vệ mơi trường sống

3 Thái độ:

GV: Sách giáo khoa, máy tính điện tử HS: Sách, vở,đọc trước nhà III PHƯƠNG PHÁP

(55)

Hoạt động 1: Khởi động phần mềm ? Yêu cầu học sinh khởi động

phần mềm máy tính Nháy đúp vào biểu tượng để khởi động phần theo yêu cầu giáo viên

1 Khởi động phần mềm.

Hoạt động 2: Sử dụng phần mềm để quan sát - Phóng to quan sát vùng

bản đồ chi tiết

- Quan sát nhận biết thời gian: ngày đêm

+ Nhấn giữ nút phải chuột kéo thả từ đỉnh đến đỉnh đối diện hình chữ nhật + Học sinh quan sát vùng sáng tối khác tương ứng với ngày đêm khu vực

Sử dụng phần mềm để quan sát.

a) Phóng to quan sát vùng đồ chi tiết

b) Quan sát nhận biết thời gian: ngày đêm

- Quan sát xem thông tin thời gian chi tiết địa điểm cụ thể

- Quan sát vùng đệm ngày đêm

Thực theo chiều ngang đường thẳng từ trái sang phải để quan sát thời gian thời vị trí trái đất theo chiều thời gian chuyển động

+ Học sinh tiến hành quan sát theo yêu cầu giáo viên + Học sinh di chuyển để thấy được:

- Vùng đệm sáng – tối vùng mà thời gian thời chuyển từ sáng sang tối ngược lại Các vùng phía bên phải thời gian sáng sơm, vùng phía trái thời gian chiều tối

- Giữa vùng đệm có đường liền đường cho biết thời gian mặt trời mọc lặn

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

V DẶN DÒ

(56)

……… ……… ……… ………

- 

-Tiết: 27 Ngày Soạn: …./ …./09

Tuần: 14 Ngày dạy : … / …./09

Thực hành:

TÌM HIỂU THỜI GIAN VỚI PHẦN MỀM SUN TIMES (tt)

- Sử dụng số chức khác phần mềm để thực hành: Hiện khơng hình ảnh bầu trời theo thời gian, cố định vị trí thời gian quan sát,

2 Kĩ năng:

- Rèn luyện kĩ sử dụng phần mềm để tìm hiểu thêm thiên nhiên, trái đất, từ nâng cao ý thức bảo vệ môi trường sống

3 Thái độ:

(57)

- Hướng dẫn, hoạt động nhóm IV HOẠT ĐỘNG DẠY HỌC:

Hoạt động 1: Khởi động phần mềm ? Yêu cầu học sinh khởi động

phần mềm máy tính Nháy đúp vào biểu tượng để khởi động phần theo yêu cầu giáo viên

1 Khởi động phần mềm.

Hoạt động 2: Sử dụng số chức khác phần mềm.

- Hiện khơng hình ảnh bầu trời theo thời gian

- Cố định vị trí thời gian quan sát

+ Học sinh thực chọn Option => Maps chọn hủy chọn mục Show Sky Color để khơng hình ảnh bầu trời theo thời gian

+ Học sinh thực chọn Option => Maps => chọn

2 Sử dụng sô chức năng khác phần mềm. a) Hiện khơng hình ảnh bầu trời theo thời gian

- Tìm địa điểm cso thơng tin thời gian ngày giống

- Tìm hiểu quan sát nhật thực trái đất

họăc hủy chọn mục Hover Update

+ Học sinh thực hiện: - Chọn vị trí ban đầu

- Chọn Option => Anchor time to => chọn mục Sunrise để tìm theo thời gian

+ Học sinh thực để tìm hiểu quan sát nhật thực trái đất theo yêu cầu giáo viên

b) Cố định vị trí thời gian quan sát

c) Tìm địa điểm cso thơng tin thời gian ngày giống

d) Tìm hiểu quan sát nhật thực trái đất

V DẶN DÒ

- Giáo viên nhận xét đánh giá tiết thực hành - Về ôn lại

(58)

……… ……… ……… ………

- 

Tiết: 28 Ngày Soạn: …./ …./09

Tuần: 14 Ngày dạy : … / …./09

CÂU LỆNH ĐIỀU KIỆN I MỤC TIÊU:

- Biết số hoạt động phụ thuộc vào điều kiên, tính sai điều kiện, điều kiện phép so sánh

2 Kĩ năng:

- Rèn luyện kĩ bước đầu viết câu lệnh điều kiện Pascal Thái độ:

(59)

III PHƯƠNG PHÁP: Giảng giải

Hoạt động 1: Tìm hiểu hoạt động phụ thuộc vào điều kiện.

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

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

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

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

+ 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

1 Hoạt động phụ thuộc vào điều kiện:

Hoạt động 2: Tìm hiểu tính sai điều kiện

- Mỗi điều kiện nói mơ tả dạng phát biểu Hoạt động phụ thuộc vào kết kiểm tra phát biểu hay sai Vậy kiết kiểm tra ?

? Cho ví dụ

- 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

2 Tính sai các điều kiện:

(60)

- 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

? Ta thường sử dụng kí hiệu tốn học để so sánh

- Ví dụ : Nếu a > b ,phép so sánh in giá trị a hình ; ngược laị in giá trị b hình (có nghĩa phép so sánh cho kết sai)

+ Để so sánh ta thường sử dụng kí hiệu toán học như: <, >, =, ≠, ≤, ≥

3 Điều kiện phép so sánh:

V DẶN DÒ:

……… ……… ……… ………

Tiết: 29 Ngày Soạn: …./ …./09

Tuần: 15 Ngày dạy : … / …./09

CÂU LỆNH ĐIỀU KIỆN (tt) I MỤC TIÊU:

- Biết cần thiết câu trúc rẽ nhánh lập trình

- Hiểu cú pháp, hoạt động câu lệnh điều kiện dạng thiếu dạng đủ Pascal Kĩ năng:

(61)

III PHƯƠNG PHÁP Giangr giải

IV HOẠT ĐỘNG DẠY HỌC: Kiểm tra cũ:

? Hãy cho ví dụ số hoạt động phụ thuộc vào điều kiện

Bài mới:

Hoạt động 1: Tìm hiểu cấu trúc rẽ nhánh.

Ví dụ 2: 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 toán ? Em mơ tả hoạt động tính tiền cho khách

+ Mơ tả hoạt động tính tiền cho khách:

- B1 Tính tổng số tiền T khách hàng mua sách - B2 Nếu T ≥ 100000, số tiền phải toán 70%x T

- B3 In hoá đơn

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

Ví dụ 3: Trong ví dụ 2, chúng ta biết tổng số tiền không nhỏ 100 nghìn đồng, khách hàng giảm 30% tổng số tiền phải tốn Giả sử thêm vào đó, cửa hàng giảm 10% cho khách mua với tổng số tiền khơng đến 100 nghìn đồng ? Em mô tả hoạt động - Cách thể hoạt động phụ thuộc vào điều kiện ví

+ Mơ tả hoạt động tính tiền cho khách:

- B1 Tính tổng số tiền T khách hàng mua sách - B2 Nếu T ≥ 100000, số tiền phải toán 70%x T; ngược lài, số tiền phải toán 90% x T - B3 In hoá đơn

(62)

dụ gọi cấu trúc rẽ nhánh dạng thiếu ví dụ gọi cấu trúc rẽ nhánh dạng đủ

=> ghi nhớ kiến thức

Hoạt động 2: Tìm hiểu câu lệnh điều kiện.

- ? Câu lệnh điều kiện có dạng

+ Câu lệnh điều kiện có dạng dạng thiếu dạng đủ

5 Câu lệnh điều kiện:

* Dạng thiếu - Cú pháp:

IF <điều kiện> then <câu lệnh>; - Hoạt động: Chương trình kiêm tra điều kiện Nếu điều kiện thỗ mãn, chương trình thực câu lệnh sau từ khoá then, ngược lại câu lệnh bị bỏ qua

+ Thể dạng thiếu Pascal

If a > b then Writeln(a); - Ví dụ: giả sử cần in số a

hình giá trị a

Nếu a > b in hình a > b

* Dạng đủ:

- Cú pháp: If <điều kiện> then <Câu lệnh 1> Else <câu lệnh 2>; - Hoạt động?

(63)

V DẶN DÒ:

……… ……… ……… ………

- 

-Tiết: 30 Ngày Soạn: …./ …./09

Tuần: 15 Ngày dạy : … / …./09

SỬ DỤNG CÂU LỆNH ĐIỀU KIỆN IF THEN

(64)

2 Kĩ năng:

- Rèn kĩ ban đầu đọc chương trình đơn giản hiểu ý nghĩa thuật tốn sử dụng chương trình

3 Thái độ:

GV:Nội dung thực hành, máy tính điện tử HS: Sách ,vở,bút

III PHƯƠNG PHÁP: Thực hành máy

Hoạt động 1: Ôn lại câu lệnh điều kiện

? Nêu cú pháp hoạt động câu lệnh điều kiện dạng thiếu dạng đủ

a) Dạng thiếu: - Cú pháp:

IF <điều kiện> then <câu lệnh>; - Hoạt động: Chương trình kiêm tra điều kiện Nếu điều kiện thoã mãn, chương trình thực câu lệnh sau từ khố then, ngược lại câu lệnh bị bỏ qua

b) Dạng đủ:

- Cú pháp: If <điều kiện> then <Câu lệnh 1> Else <câu lệnh 2>; - Hoạt động: Chương trình kiểm tra điều kiện Nếu điều kiện thỗ mãn, chương trình thực câu lệnh sau từ khoá then, ngược lại câu lệnh thực

1 Ôn lại câu lệnh điều kiện:

(65)

- Viết chương trình nhập hai số nguyên a b khác từ bàn phím in hai số hình theo thứ tự khơng giảm

- Gõ chương trình sau: program sapxep ; uses crt ;

var a,b : integer ; begin

clrscr ;

write(‘ nhap so a : ‘) ; readln(a) ;

write(‘ nhap so b : ‘) ; readln(b) ;

if a < b then write(a,’ ‘,b) else

writeln(b,’ ‘,a) ; readln ;

- Tìm hiểu ý nghĩa câu lệnh chương trình

- Dịch chạy chương trình

+ Học sinh độc lập gõ chương trình vào máy

+ Học sinh tìm hiểu ý nghĩa câu lệnh chương trình theo yêu cầu giáo viên

+ Nhấn F9 để dịch nhấn Ctrl + F9 để chạy chương trình

2 Viết chương trình nhập hai số nguyên a b khác nhau từ bàn phím in hai số hình theo thứ tự không giảm

program sapxep ; uses crt ;

clrscr ;

V DẶN DÒ:

- Tiết sau thực hành: “ Bài thực hành số 4” (tt) RÚT KINH NGHIỆM

……… ……… ……… ………

(66)

-Tiết: 31 Ngày Soạn: …./ …./09

Tuần: 16 Ngày dạy : … / …./09

SỬ DỤNG CÂU LỆNH ĐIỀU KIỆN IF THEN

- Luyện tập sử dụng câu lệnh If then Kĩ năng:

- Rèn kĩ ban đầu đọc chương trình đơn giản hiểu ý nghĩa thuật toán sử dụng chương trình

3 Thái độ:

GV:Nội dung thực hành, máy tính điện tử HS: Sách ,vở,bút

III PHƯƠNG PHÁP: Thực hành máy IV HOẠT ĐỘNG DẠY HỌC

Hoạt động 1: Làm bài tập 2/53 - Viết chương trình nhập chiều

cao hai bạn Long Trang, in kết so sánh chiều cao bạn

- Yêu cầu học sinh viết gõ chương trình vào máy

+ Viết gõ chương trình vào máy Program Ai_cao_hon;

Var long, trang: real; Begin

Writeln(‘ nhap chieu cao cua Long’); Readln(long);

Writeln(‘nhap chieu cao cua Trang’); Readln(trang);

If long>trang then

Writeln(‘bạn Long cao hon’); If Long<trang then

Writeln(‘ban Trang cao hon’) else Writeln(‘hai ban bang nhau’); Readln;

End

(67)

- Lưu chương trình với tên aicaohon.pas Dịch sửa lỗi chương trình

+ Học sinh lưu, sửa lỗi chạy chương trình theo yêu cầu giáo viên

Hoạt động 2: Làm bài tập 3/53 - 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

- Tìm hiểu ý nghĩa câu lệnh chương trình

- Dịch chạy chương trình

+ Gõ chương trình vào máy Program ba_canh_tam_giac; Var a,b,c: real;

Begin

Write(‘nhap ba so a, b c:’); Readln(a,b,c);

If (a+b>c) and (b+c>a) and (c+a>b) then

Writeln(‘a,b,c ba cạnh tam giác’) else

Writeln(‘a,b,c khong la ba canh cua tam giac’);

Readln; End

+ Học sinh tìm hiểu ý nghĩa câu lệnh chương trình theo yêu cầu giáo viên

+ Nhấn F9 để dịch nhấn Ctrl + F9 để chạy chương trình

2 Viết chương trình nhập hai số nguyên a b khác từ bàn phím in hai số ra màn hình theo thứ tự không giảm

program sapxep ; uses crt ;

clrscr ;

V DẶN DÒ:

- Về nhà xem lại bài, tiết sau làm tập RÚT KINH NGHIỆM

……… ……… ……… ………

(68)

-Tiết: 32 Ngày Soạn: …./ …./09

Tuần: 16 Ngày dạy : … / …./09

- Sử dụng kiến thức học để làm số tập Kĩ năng:

- Rèn luyện kĩ sử dụng câu lệnh Pascal Thái độ:

GV:Nội dung tập, máy tính điện tử HS: Sách ,vở,bút

III PHƯƠNG PHÁP: Hướng dẫn

Hoạt động 1: Bài tập 1. - Các câu lệnh Pascal sau

được viết hay sai? a) If x:=7 then a = b; b) IF x > 5; then a:=b; c) IF x > then a:= b; m:=n; d) IF x > then a:=b; else m:=n;

+ Hoc sinh làm tập theo yêu cầu giáo viên

1 Bài tập 1

- Các câu lệnh Pascal sau viết hay sai? a) If x:=7 then a = b;

b) IF x > 5; then a:=b; c) IF x > then a:= b; m:=n;

d) IF x > then a:=b; else m:=n;

Hoạt động 2: Bài tập 2. - Sau câu lệnh sau

a) IF ( 45 mod 3) = then X:= X + 1;

b) IF x > 10 then X:= X + 1;

Giá trị biến X bao nhiêu, trước giá trị X 5?

a) Giá trị biến X =

b) Giá trị biến X = 2 Bài tập 2.- Sau câu lệnh sau a) IF ( 45 mod 3) = then X:= X + 1;

b) IF x > 10 then X:= X + 1;

(69)

của X 5? Hoạt động 3: Bài tập 3

- Viết chương trình kiểm tra số nguyên dương A nhập từ bàn phìm số chẵn hay số lẻ

- Có biến chương trình?

- Làm để biết số nguyên dương A số chẵn hay số lẻ - Yêu cầu học sinh viết chương trình

+ Có biến biến A có kiểu liệu Integer

+ Để kiểm tra số nguyên dương A số chẵn hay số lẽ, ta lấy số chia cho lấy phần dư Nếu phần dư A số chẵn, ngược lại A sô lẻ

+ Viết chương trình theo hướng dẫn giáo viên

Program Kiem_tra_so_chan_le; Var A: Integer;

Begin

Writeln(‘Nhap so A:’); Readln(a);

If A mod = then

Writeln(A,’la so chan’) Else Writeln(A,’la so le’);

Readln; End

3 Bài tập 3

- Viết chương trình kiểm tra số nguyên dương A nhập từ bàn phìm số chẵn hay số lẻ

V DẶN DÒ:

- Về nhà hệ thống lại kiến thức học, tiết sau ôn tập RÚT KINH NGHIỆM

(70)

- 

-Tiết: 33 Ngày Soạn: …./ …./09

Tuần: 17 Ngày dạy : … / …./09

- Hoạt động cá nhân máy

ĐỀ

B

i : Nhập vào cạnh hình chữ nhật In hình diện tích chu vi Đáp án

Program HINH_CHU_NHAT; Uses Crt;

Var a,b,s,c: real; Begin Clrscr;

Writeln(‘ TINH DIEN TICH & CHU VI HINH CHU NHAT:’); Writeln(‘ -‘); Write('Nhap chieu dai='); readln(a);

Write('Nhap chieu rong=');readln(b);

KIỂM TRA THỰC HAØNH THỜI GIAN: 45 phút

I MỤC TIÊU

- Hs biết cách phân tích tốn sử dụng ngơn ngữ Passcal để viết thành chương trình hồn chỉnh

II U CẦU 1. Kiến thức:

- Kiểm tra kiến thức học sinh về: Phân tích tốn

Viết thuật toán

Biết sử dụng biến,các câu lệnh đơn giản Passcal

2. Kỹ năng:

(71)

s:=a*b; c:=(a+b)*2;

Writeln('Dien tich hinh chu nhat la:’,s:6:2); Writeln('Chu vi hinh chu nhat:',c:6:2); Readln;

End

Tiết: 34 Ngày Soạn: …./ …./09

Tuần: 17 Ngày dạy : … / …./09

ÔN TẬP

- Củng cố kiến thức học vận dụng để viết số chương trình Kĩ năng:

- Rèn luyện kĩ sử dụng số câu lệnh để viết chương trình Thái độ:

GV:Sách giáo khoa, máy tính điện tử HS: Ơn lại kiến thức bài, sách ,vở III PHƯƠNG PHÁP

- Giải đáp, hướng dẫn

THẦY HOẠT ĐỘNG CỦA TRÒ NỘI DUNG

(72)

1 Ngơn ngữ lập trình gì? Chương trình dịch gì?

2 Từ khố gì?

Câu 1: Ngơn ngữ lập trình tập hợp kí hiệu quy tắc viết lệnh tạo thành chương trình hồn chỉnh thực máy tính

+ Chương trình dịch chương trình có chức chuyển đổi chương trình viết ngơn ngữ lập trình thành chương trình thực máy tính

Câu

+ Từ khố: từ vựng để giao tiếp người máy Từ khố ngơn ngữ lập trình từ dành riêng, khơng dùngcho mục đích khác ngồi mục đích sử dụng ngơn ngữ lập trình quy

1 Ngơn ngữ lập trình gì? Chương trình dịch gì?

(73)

3 Tên ngôn ngữ lập trình gì? Quy tắc đặt tên?

4 Cấu trúc chung chương trình gồm phần? Hãy trình bày cụ thể phần?

định Câu

+ Tên: dãy kí tự dùng để tên số, tên biến, tên chương trình, … Tên tạo thành từ chữ chữ số song bắt buộc chữ đầu phải chữ

- 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 đại lượng khác nhau chương trình phải có tên khác nhau + Tên khơng trùng với các từ khoá

Câu

Cấu trúc chung chương trình gồm có phần:

+ Phần khai báo thường gồm câu lệnh dùng để:

- Khai báo tên chương trình

- Khai báo thư viện ( chứa lệnh có sẵn sử dụng chương trình ) số khai báo khác

Phần khai báo có khơng có phần khai báo phải đặt trước phần thân chương trình

+ Phần thân cuả 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ó

3 Tên ngơn ngữ lập trình gì? Quy tắc đặt tên?

4 Cấu trúc chung chương trình gồm phần? Hãy trình bày cụ thể phần?

V DẶN DÒ

- Về nhà hệ thống lại kiến thức học, tiết sau ôn tập (tt) RÚT KINH NGHIỆM

(74)

- 

-Tiết: 35 Ngày Soạn: …./ …./09

Tuần: 17 Ngày dạy : … / …./09

ÔN TẬP

- Củng cố kiến thức học vận dụng để viết số chương trình Kĩ năng:

GV:Sách giáo khoa, máy tính điện tử HS: Ơn lại kiến thức bài, sách ,vở III PHƯƠNG PHÁP

- Giải đáp, hướng dẫn

(75)

1 Các kiểu liệu Turbo Pascal?

Câu 1:

Bảng liệt kê số kiểu liệu ngơn ngữ lập trình Pascal:

1 Các kiểu liệu Turbo Pascal?

Tên kiểu Phạm vi giá trị intege

r

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ố

(76)

2 Nêu cách khai báo biến, Pascal? Cho VD?

3 Bài toán gì? Q trình giải tốn máy tính gồm bước?

4 Trình bày cú pháp câu lệnh điều kiện dạng đủ câu lệnh điều kiện dạng thiếu Cho ví dụ?

Câu 2

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

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

Const tên = giá trị hằng; - Const từ khố ngơn ngữ lập trình dùng để khai báo

VD: Khai báo biến: Var m,n : Interger; S : real; Thongbao: string;

Khai báo hằng: Const a = 10; Pi = 3.14; Câu 3.

Bài tốn cơng việc hay nhiệm vụ cần phải giải

Q trình giải tốn máy tính gồm có bước:

Bước : Xác định bài tốn Bước : Mơ tả thuật tốn Bước : Viết chương trình Câu 4

Cú pháp câu lệnh điều kiện dạng đủ câu lệnh điều kiện dạng thiếu

Dạng thiếu: If < Điều kiện > then <Câu lệnh>;

Dạng đủ: If < Điều kiện > then <Câu lệnh 1> Else <Câu lệnh 2>; Cho ví dụ: If a> b then write (a);

If a>b then Max := a else Max:= b;

2 Nêu cách khai báo biến, Pascal? Cho VD?

3 Bài tốn gì? Q trình giải tốn máy tính gồm bước?

4 Trình bày cú pháp câu lệnh điều kiện dạng đủ câu lệnh điều kiện dạng thiếu Cho ví dụ?

V DẶN DÒ:

- Về nhà hệ thống lại kiến thức học, tiết sau ôn tập RÚT KINH NGHIỆM

(77)

- 

-Tiết: 36 Ngày Soạn: …./ …./09

Tuần: 18 Ngày dạy : … / …./09

KIỂM TRA HỌC KÌ I I MỤC TIÊU:

- Kiểm tra, đánh giá mức độ hiểu biết học sinh qua NỘI DUNG học Kĩ năng:

- Thái độ nghiêm túc II NỘI DUNG:

I PHẦN LÝ THUYẾT (7 điểm)

Trắc nghiệm :

(Khoanh tròn ghi vào phần trả lời câu trả lời nhất, câu 0,4 điểm)

Câu 1: Để khỏi chương trình Pascal ta dùng tổ hợp phím

a Ctrl + X c Ctrl+ F9 b Alt + F9d Alt +X Câu Để chạy chương trình ta sử dụng tổ hợp nào:

a Ctrl + F9 b Alt + F9 c F9 d Ctrl + Shitf + F9 Câu Trong Pascal, khai báo sau đúng?

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 Lệnh Readln dùng để:

A) Khai báo tiêu đề chương trình

B) Tạm ngừng chương trình, người dùng nhấn phím Enter C) Kết thúc chương trình

D) Bắt đầu thân chương trình Câu Kết phép chia Mod là:

a b c d

Câu Những tên có ý nghĩa xác định từ trước không phép sử dụng cho mục đích khác gọi gì?

a Tên riêng b Từ khoá c Biến d Tên có sẵn Câu 8.Từ khóa VAR dùng để làm gì?

a Khai báo Tên chương trình b Khai báo thư viện c Khai báo Hằng d Khai báo Biến

(78)

a 128 b.255 c 512 d.1024

Câu 10.Nếu ta dùng số Pi= 3.14, để tính chu vi đường trịn ta dùng từ khóa để khai báo ?

a Program b Uses c Var d Const

Câu 11 Câu lệnh write(‘Toi la Turbo Pascal’);

a In hình dòng chữ Toi la Turbo Pascal đưa trỏ xuống dòng b Câu lệnh sai cú pháp

c Dùng để yêu cầu nhập giá trị cho biến Toi la Turbo Pascal

d In hình dịng chữ Toi la Turbo Pascal, khơng đưa trỏ xuống dòng Câu 12 Dãy số 20.10 thuộc kiểu liệu nào?

a kiểu số nguyên b Kiểu số thực c.Kiểu chuỗi d Kiểu xâu Câu 13 Chọn đáp án trả lời Cú pháp câu lệnh điều kiện dạng thiếu là:

a if <câu lệnh> then <điều kiện> b if <điều kiện 1> then <điều kiện 2> c if <điều kiện> then <câu lệnh> d if <câu lệnh 1> then <câu lệnh 2> Câu 14 Cấu trúc chương trình gồm phần:

a phần b phần c phần d phần

Câu 15 Các từ khóa gồm:

a program, uses, write, read b begin, end, read, if, then c begin, if, then, else d program, uses, begin, end Câu 16 Cách khai báo sau đay Khai báo số thực a,b

a Var a,b: real b Var a,b:string c Var a,b: byte d Var a,b: char Câu 17 Trong Pascal cách khai báo biến sau đúng:

a var n:= integer b var n: integer c const n:integer d var n= real II/ PHẦN TỰ LUẬN (3 điểm)

Câu viết biểu thức toán học sau dưới dạng biểu thức Pascal: (1 điểm).

a.15(4+30).(6+12) => d.(a+b).(d+e)2 => Câu (2 điểm)

Viết chương trình nhập hai sớ từ bàn phím và hiển thị man hình tổng hai sớ đó

Đáp án

I. TRẮC NGHIỆM

Câu d Câu 2.a Câu 3.a Câu 4.c Câu 5.b Câu 6.b Câu 7.b

Câu 8.d Câu 9.b Câu 10.d Câu 11.d Câu 12.b Câu 13.c Câu 14.a

(79)

Câu 1:

a 15*(4+30)*(612) b (a+b)*(d+e)*(d+e)

Câu 2:

program tong_2_so var a,b,s :real;

Begin

Writeln(‘nhap a:’); Readln(a); Writeln(‘nhap b:’); Readln(b); S:=a+b;

Writeln(‘tong so la:’,s); Readln

(80)

Tiết: 37 Ngày Soạn: …./…./09 Tuần: 19 Ngày dạy : … /…./10

CÂU LỆNH LẶP I MỤC TIÊU:

- 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ĩ năng:

- Rèn luyện kỹ vận dụng câu lệnh lặp Thái độ:

GV: Sách giáo khoa, máy tính điện tử HS: Sách ,vở ,xem trước nhà III PHƯƠNG PHÁP

- Giải đáp, hướng dẫn, giảng giải IV HOẠT ĐỘNG DẠY HỌC:

Hoạt động 1: Tìm hiểu cơng việc phải thực nhiều lần sống.

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

? Em cho vài dụ sống mà ta phải thực lặp lặp lại nhiều lần với số lần biết trước trước

+ 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

1 Các công việc phải thực hiện

Khi viết chương trình máy tính, 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

(81)

Ví dụ 1: Giả sử cần vẽ hình vng có cạnh đơn vị Mỗi hình vng ảnh dịch chuyển hình bên trái khoảng cách đơn vị

? Việc vẽ hình thực theo thuật tốn

Ví dụ 2: Thuật tốn tính S= 1+2+3+ … + 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

- Mọi ngôn ngữ lập trình có cách để thị cho máy tính thực hiện cấu trúc lặp với câu lệnh “câu lệnh lặp”

Việc vẽ hình thực theo thuật toán sau:

- 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 Học sinh ý lắng nghe, ghi nhớ kiến thức

2 Câu lệnh lặp - lệnh thay cho nhiều lệnh:

Cách mô tả hoạt động trong thuật tốn ví dụ 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”

Hoạt động 3: Ví dụ cầu lệnh lặp

- Cú pháp: For <biến đếm>:= <giá trị đầu> to <giá trị cuối> <câu lệnh>;

- Học sinh quan sát hoạt động vòng lặp sơ đồ khối => nêu hoạt động vịng lặp

Ví dụ: Chương trình sau in hình thứ tự lần lặp

Program lap; Var i: integer; Begin

For i:= to 10

+ Hoạt động vòng lặp: - B1: biến đếm nhận giá trị đầu - B2: Chương trình kiểm tra biểu thức điều kiện, biểu thức điều kiện thực câu lệnh - B3: Biến đếm tự động tăng lên đơn vị quay lại B2

- B4: Nếu biểu thức điều kiện nhận giá trị sai khỏi vịng lặp

(82)

Writeln(‘day la lan lap thu’,i); Readln;

End

V DẶN DÒ:

……… ……… ………

(83)

-Tiết: 38 Ngày Soạn: …./…./10 Tuần: 20 Ngày dạy : … /…./10

CÂU LỆNH LẶP (tt) I MỤC TIÊU:

- Biết pháp hoạt động vòng lặp xác định For - Biết sử dụng vòng lặp For để viết số chương trình Kĩ năng:

- Rèn luyện kỹ sử dụng vòng lặp để làm tập Thái độ:

GV: Sách giáo khoa, máy tính điện tử HS: Sách ,vở ,xem trước nhà III PHƯƠNG PHÁP

- Giải đáp, hướng dẫn IV HOẠT ĐỘNG DẠY HỌC:

(84)

Ví dụ 5: Chương trình sau tính tổng N số tự nhiên với N nhập từ bàn phím

Program tinh_tong; Var N,i: Integer; S: longint; Begin

Writeln(‘nhap so N =’); Readln(N);

S:=0;

For i:=1 to N S:=S+i Witeln(‘tong la:’,S); Readln;

End

- Ví dụ 6: Ta kí hiệu N! tích N số tự nhiên đầu tiên:

N! = 1.2.3…N

Yêu cầu học sinh viết chương trình theo hướng dẫn giáo viên

Program tinh_giai_thua; Var N,i: Integer;

P: Longint; Begin

Write(‘N =’); readln(N); P:=1;

For i:=1 to N P:=P*i; Wirteln(N,’!=’,P); Readln;

End

2 Tính tổng tích bằng câu lệnh lặp:

Ví dụ 5: Chương trình sau tính tổng N số tự nhiên với N nhập từ bàn phím

Program tinh_tong; Var N,i: Integer; S: longint; Begin

Writeln(‘nhap so N =’); Readln(N);

S:=0;

For i:=1 to N S:=S+i Witeln(‘tong la:’,S); Readln;

End

- Ví dụ 6: Ta kí hiệu N! tích N số tự nhiên đầu tiên: N! = 1.2.3…N

V DẶN DÒ:

(85)

- 

- Giải đáp, hướng dẫn IV HOẠT ĐỘNG DẠY HỌC:

Hoạt động 1: Bài tập 1.

- Sau thực đoạn chương trình sau, giá trị biến j ?

J:= 0;

For i:= to J:= j + 2;

+ Sau thực đoạn chương trình trên, giá trị biến j =

1 Bài tập 1

- Sau thực đoạn chương trình sau, giá trị biến j ? J:= 0;

For i:= to J:= j + 2;

- Các câu lệnh Pascal sau có hợp lệ khơng? Vì sao?

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 do; Writeln(‘A’);

+ Học sinh đọc đề => suy nghĩ trả lời

a) Câu lệnh khơng hợp lệ giá trị đầu lớn giá trị cuối

b) Câu lệnh khơng hợp lệ giá trị đầu giá trị cuối giá trị nguyên

c) Đây câu lệnh hợp lệ

d) Đây câu lệnh khơng hợp lệ sau từ khóa khơng có dấu chấm phẩy

2 Bài tập 2.

- Các câu lệnh Pascal sau có hợp lệ khơng? Vì sao? 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 do; Writeln(‘A’);

(86)

- Viết chương trình in hình bảng cửu chương

- Yêu cầu học sinh viết chương trình

- Nhận xét chương trình học sinh

- Yêu cầu học sinh dịch, sửa lỗi chạy chương trình

+ Học sinh tìm hiều đề

+ Học sinh viết chương trình theo yêu cầu giáo viên

Program in_bang_cuu_chuong ; Var i: integer;

Begin

For i:= to 10

Writeln(‘2 lan’,i,’=’i*2); Readln;

End

+ Thực theo yêu cầu giáo viên

3 Bài tập 3

- Viết chương trình in hình bảng cửu chương

V DẶN DÒ

……… ……… ………

- 

(87)

- Giải đáp, hướng dẫn IV HOẠT ĐỘNG DẠY HỌC

Tính tam giác: Nụâp vào ba số a,b,c Kiểm tra xem có thể độ dài ba cạnh hay khơng, khơng in ra màn hình ' Khong la ba canh cua mot tam giac' Ngược lại, thì in diện tích, chu vi tam giác hình.

+ HS thực theo yêu cầu

1 Bài tập 1

Program TAMGIAC; Uses crt;

Var a,b,c,s,p : real; Begin

Clrscr;

Writeln(‘ nhập cạnh :’); Readln(a,b,c);

If (a+b)>c and (a+c)>b and (b+c)>a then

Begin p:= abc;

s:=sqrt(p*(p-a)*(p-b)*(p-c)); end

else

writeln(‘a;b;c không ba cạnh tam giác’);

(88)

Tính xn (Với n số nguyên không

âm). + Học sinh đọc đề => suynghĩ trả lời

2 Bài tập 2. Program

TINH_X_LUY_THUA_N; Uses crt;

Var i,n,x:integer; lt:real; begin

writeln(‘tính luy thừa xmux n:’);

writeln(‘nhập x:’); readln(x); writeln(‘nhập n:’); readln(n); lt:= 1;

for i:=1 to n lt:=lt*i writeln(‘ x^n :’,lt); readln

end

V DẶN DÒ

- Về nhà học kết hợp sách giáo khoa Chuẩn bị thực hành số RÚT KINH NGHIỆM

……… ……… ………

(89)

SỬ DỤNG LỆNH LẶP FOR DO

- Biết viết chương trình Pascal có câu lệnh lặp For Kĩ năng:

- Rèn luyện kĩ đọc hiểu chương trình Thái độ:

- Gv: Nội dung thực hành, máy tính điện tử - Hs: Ôn lại lý thuyết ,đọc trước thực hành III PHƯƠNG PHÁP

- Giải đáp, hướng dẫn, thực hành máy tính IV HOẠT ĐỘNG DẠY HỌC:

HOẠT ĐỘNG CỦA

Hoạt động 1: Ôn lại câu lệnh lặp For do.

? Hãy nêu cú pháp chức

của câu lệnh lặp For - Cú pháp: For <biến đếm>:=<giá trị đầu> to <giá trị cuối> <câu lệnh>;

+ Hoạt động vòng lặp: - B1: biến đếm nhận giá trị đầu - B2: Chương trình kiểm tra biểu thức điều kiện, biểu thức điều kiện thực câu lệnh - B3: Biến đếm tự động tăng lên đơn vị quay lại B2

1 Ơn lại câu lệnh lặp For do: + Cú pháp:

+ Hoạt động

(90)

- Gõ chương trình sau đây: uses crt;

var N,i:integer; begin

clrscr;

write('Nhap so N='); readln(N); writeln;

writeln('Bang nhan ',N); writeln;

for i:=1 to 10 writeln(N,' x ',i:2,' = ',N*i:3);

readln end.

- Tìm hiểu ý nghĩa câu lệnh chương trình, dịch chương trình sửa lỗi

- Chạy chương trình với giá trị nhập vào lần lược 1, 2,… 10 Quan sát kết nhận hình

+ Học sinh đọc kĩ đề phân tích yêu cầu tốn

+ Gõ chương trình vào máy theo u cầu giáo viên

+ Tìm hiểu ý nghĩa câu lệnh theo hướng dẫn giáo viên

+ Nhấn phím F9 để sửa lỗi (nếu có)

+ Nhấn Ctrl + F9 để chạy chương trình nhập giá trị vào, quan sát kết hình theo hướng dẫn giáo viên

2 Viết chương trình in màn hình bảng nhân số từ 1 đến 9, số nhập từ bàn phím dừng hình để có thể quan sát kết quả

Program bang_cuu_chuong uses crt;

var N,i:integer; begin

clrscr;

write('Nhap so N='); readln(N); writeln;

writeln('Bang nhan ',N); writeln;

for i:=1 to 10 writeln(N,' x ',i:2,' = ',N*i:3);

readln end.

V DẶN DÒ:

……… ……… ………

- 

(91)

SỬ DỤNG LỆNH LẶP FOR DO

- Biết viết chương trình Pascal có câu lệnh lặp For Kĩ năng:

- Rèn luyện kĩ đọc hiểu chương trình Thái độ:

- Gv: Nội dung thực hành, máy tính điện tử - Hs: Ơn lại lý thuyết ,đọc trước thực hành III PHƯƠNG PHÁP

- Giải đáp, hướng dẫn, thực hành máy tính IV HOẠT ĐỘNG DẠY HỌC:

Hoạt động 1: Bài tập 2

- Chỉnh sửa chương trình để làm đẹp kết hình

? Kết chủ chương trình nhận có nhược điểm

? Nên sửa lại cách

- Chỉnh sửa câu lệnh lặp chương trình sau:

+ Có hai nhược điểm sau đây: - Các hàng kết sát nên khó đọc

- Các hàng kết không cân hàng tiêu đề

+ Nên sửa lại cách chèn thêm hàng trống hàng kết đẩy hàng sang phải khoảng cách

1 Chỉnh sửa chương trình để làm đẹp kết màn hình.

for i:=1 to 10 begin

GotoXY(5,WhereY); writeln(N,' x ',i:2,' = ',N*i:3); writeln ;

end;

- Dịch chạy chương trình với giá trị gõ vào từ bàn phím

(92)

Quan sát kết nhận hình

+ Học sinh thực theo yêu cầu giáo viên

Hoạt động 2: Tìm hiểu chương trình sau:

Program tao_bang; Uses crt;

Var i,j: byte; Begin Clrscr;

For i:= to Begin

For j:= to Write(10*i + j:4); Writeln;

End; Readln; End

- Gõ chạy chương trình, quan sát kết hình

+ Tìm hiểu chương trinh theo hướng dẫn giáo viên

+ Học sinh độc lập gõ chương trình

+ Nhấn F9 để dịch sửa lỗi chương trình

+ Nhấn Ctrl + F9 để chạy chương trình kiểm tra kết

2

Tìm hiểu chương trình sau:

Program tao_bang; Uses crt;

Var i,j: byte; Begin Clrscr;

For i:= to Begin

For j:= to Write(10*i + j:4); Writeln;

End; Readln; End

V DẶN DÒ:

- Tiết sau học : HỌC VẼ HÌNH VỚI PHẦN MỀM GEOGEBRA RÚT KINH NGHIỆM

……… ……… ………

- 

HỌC VẼ HÌNH VỚI PHẦN MỀM GEOGEBRA I MỤC TIÊU:

(93)

- Tìm hiểu phần mềm Geogebra

- Biết cách khởi động biết hình làm việc phần mềm Kĩ năng:

- Rèn luyện kĩ sử dụng phần mềm Geogebra Thái độ:

GV: Sách giáo khoa, máy tính điện tử, phần mềm Geogebra HS: Sách, ,đọc nhà

III PHƯƠNG PHÁP - Giải đáp, hướng dẫn IV HOẠT ĐỘNG DẠY HỌC:

Hoạt động 1: Tìm hiểu phần mềm Geogebra. ? Hãy nêu mục đích phần

mềm

Phần mềm có khả tạo gắn kết đối tượng hình học, gọi quan hệ thuộc, vng góc, song song

+ Phần mềm Geogebra dùng để vẽ hình học đơn giản điểm, đoạn thẳng, đường thẳng

1 Em biết về Geogebra?

Hoạt động 2: Tìm hiểu cách khởi động phần mềm. ? Hãy nêu cách để khởi động phần

mềm

Hoặc vào menu Start \ All Programs\ GeoGebra \ GeoGebra

- Gọi học sinh lên thực hành khởi động phần mềm máy tính

Để khởi động phần mêm ta nháy đúp vào biểu tượng hình

+ Học sinh khởi động phần mềm máy tính theo yêu cầu giáo viên

2 Làm quen với phần mềm Geogebra tiếng Việt:

(94)

? Màn hình làm việc Geogebra gồm thành phần

- Chú ý: Các lệnh bảng chọn không dùng để vẽ đối tượng – hình

- Mỗi cơng cụ có biểu tượng riêng tương ứng Biểu tượng cho biết công dụng công cụ

+ Màn hình làm việc Geogebra gồm:

- Bảng chọn: hệ thống lệnh phần mềm

- Thanh cơng cụ: Chứa cơng cụ làm việc cơng cụ dùng để vẽ, điều chỉnh làm việc với đối tượng

- Khu vực thể đối tượng

V DẶN DÒ:

- Về nhà học bài, kết hợp SGK, tiết sau thực hành RÚT KINH NGHIỆM

……… ……… ………

- 

(95)

HỌC VẼ HÌNH VỚI PHẦN MỀM GEOGEBRA (tt) I MỤC TIÊU:

- Biết công cụ làm việc phần mềm: cơng cụ di chuyển, cơng cụ liên quan đến đối tượng điểm…

2 Kĩ năng:

- Rèn luyện kĩ sử dụng cơng cụ làm việc phần mềm Thái độ:

- Thái độ học tập nghiêm túc, yêu thích mơn học II CHUẨN BỊ:

Hoạt động : Tìm hiểu cơng cụ làm việc phần mềm. * Cơng cụ di chuyển:

? Cơng cụ di chuyển có ý nghĩa nào?

* Các công cụ liên quan đến đối tượng điểm

Yêu cầu học sinh nghiên cứu SGK cho biết ý nghĩa công cụ

- Công cụ ? - Công cụ ? - Công cụ ?

* Các công cụ liên quan đến đoạn, đường thẳng

Các công cụ , ,

+ Cơng cụ di chuyển có ý nghĩa đặc biệt không dùng để vẽ khởi tạo hình mà dùng để di chuyển hình

- Cơng cụ : dùng để tạo điểm

- Công cụ : dùng để tạo điểm giao hai đối tượng có mặt phẳng

- Công cụ : dùng để tạo trung điểm đoạn thẳng

(96)

- dùng để tạo đường, đoạn, tia qua hai điểm cho trước

? Hãy nêu thao tác thực * Các cơng cụ tạo mối quan hệ hình học

- Công cụ dùng để tạo đường thẳng qua điểm vng góc với đường đoạn thẳng cho trước

- Công cụ tạo

đường thẳng song song với đường (đoạn) cho trước qua điểm cho trước

- Công cụ dùng để vẽ

đường trung trực đoạn thẳng hai điểm cho trước

- Công cụ dùng để tạo

đường phân giác góc cho trước Góc xác định ba điểm mặt phẳng

Thao tác: chọn cơng cụ, sau nháy chuột chọn hai điểm hình

+ Thao tác: chọn cơng cụ, sau chọn điểm, đường (đoạn, tia) ngược lại chọn đường (đoạn, tia) chọn điểm

+ Thao tác: chọn cơng cụ, sau chọn đoạn thẳng chọn hai điểm cho trước mặt phẳng

+ Thao tác: chọn công cụ sau chọn ba điểm mặt phẳng Điểm chọn thứ hai đỉnh góc

* Các công cụ tạo mối quan hệ hình học

V DẶN DỊ:

……… ……… ………

- 

(97)

Tuần: 23 Ngày dạy : … /…./10

HỌC VẼ HÌNH VỚI PHẦN MỀM GEOGEBRA (tt) I MỤC TIÊU:

- Biết cơng cụ làm việc phần mềm: công cụ di chuyển, công cụ liên quan đến đối tượng điểm…

2 Kĩ năng:

- Rèn luyện kĩ sử dụng công cụ làm việc phần mềm Thái độ:

Hoạt động 1: Tìm hiểu cơng cụ làm việc phần mềm. * Cơng cụ liên quan đến hình

trịn

- Cơng cụ tạo hình tròn

bằng cách xác định tâm điểm hình trịn

Cơng cụ dùng để tạo hình trịn cách xác định tâm bán kính

- Cơng cụ dùng để vẽ hình

trịn qua ba điểm cho trước

- Cơng cụ dùng để tạo

nửa hình trịn qua hai điểm đối xứng tâm

- Thao tác: chọn cơng cụ, chọn tâm hình trịn điểm thứ hai nằm hình trịn

Thao tác: chọn cơng cụ, chọn tâm hình trịn, sau nhập giá trị bán kính hộp thoại

- Thao tác: chọn cơng cụ, sau lần

lượt chọn ba điểm

Thao tác: chọn công cụ, chọn hai điểm Nửa hình trịn tạo phần hình trịn theo chiều ngược kim đồng hồ từ điểm thứ

c) Giới thiệu công cụ làm việc

(98)

- Cơng cụ tạo cung

tròn phần hình trịn xác định trước tâm hình trịn hai điểm cung trịn

- Cơng cụ xác định

cung tròn qua ba điểm cho trước

* Các công cụ biến đổi hình học

-Cơng cụ dùng để tạo

đối tượng đối xứng với đối tượng cho trước qua trục đường đoạn thẳng

-Công cụ dùng để tạo

đối tượng đối xứng với đối tượng cho trước qua điểm cho trước (điểm gọi tâm đối xứng)

? Nêu cách thoát khỏi phần mềm

đến điểm thứ hai

Thao tác: Chọn cơng cụ, chọn tâm hình trịn chọn hai điểm Cung tròn xuất phát từ điểm thứ đến điểm thứ hai theo chiều ngược chiều kim đồng hồ

- Thao tác: chọn công cụ sau lần

lượt chọn ba điểm mặt phẳng

Để thoát khỏi phần mềm ta nháy chuột chọn hồ sơ => đóng nhấn tổ hợp phím Alt + F4

* Các cơng cụ biến đổi hình học

Hoạt động 2: Tìm hiểu đới tượng hình học. - Một hình hình học bao gồm

nhiều đối tượng

- Đối tượng hình học gồm đối tượng tự đối tượng phụ thuộc

+ Các đối tượng hình hoc gồm: điểm, đường thẳng, tia, hình trịn, cung trịn

3 Đối tượng hình học: - Một hình hình học bao gồm nhiều đối tượng

- Đối tượng hình học gồm đối tượng tự đối tượng phụ thuộc

V DẶN DÒ:

- Về nhà học bài, kết hợp SGK, tiết sau thực hành RÚT KINH NGHIỆM

(99)

Tuần: 23 Ngày dạy : … /…./10

Thực hành: HỌC VẼ HÌNH VỚI PHẦN MỀM GEOGEBRA

2 Kĩ năng:

III PHƯƠNG PHÁP - Giải đáp, hướng dẫn IV HOẠT ĐỘNG DẠY HỌC

Hoạt động 1: Khởi động phần mềm Geogebra

- Khởi động phần mềm Geogebra máy tính

- Yêu cầu học sinh kết thúc phần mềm

- Yêu cầu học sinh khởi động phần mềm theo cách khác

+ Kích đúp vào biểu tượng hình để khởi động phần mềm theo yêu cầu giáo viên + Học sinh kết thúc phần mềm theo yêu cầu giáo viên

+ Nháy chuột vào menu Start \ All Programs\ GeoGebra \ GeoGebra để khởi động phần mềm

1 Khởi động phần mềm

(100)

Yêu cầu học sinh nhận biết thành phần hình làm việc phần mềm máy tính

+ Học sinh thực theo hướng dẫn giáo viên

2 Nhận biết hình làm việc phần mềm.

V DẶN DỊ:

- Xem trước tập RÚT KINH NGHIỆM

……… ……… ………

- 

(101)

Thực hành: HỌC VẼ HÌNH VỚI PHẦN MỀM GEOGEBRA (tt) I MỤC TIÊU:

- Biết công cụ làm việc phần mềm: cơng cụ di chuyển, cơng cụ liên quan đến đối tượng điểm…

2 Kĩ năng:

- Rèn luyện kĩ sử dụng cơng cụ làm việc phần mềm Thái độ:

Hoạt động : Khởi động phần mềm. Yêu cầu học sinh khởi động phần

mềm Geogebra

+ Kích đúp vào biểu tượng hình để khởi động phần mềm theo yêu cầu giáo viên

1 Khởi động phần mềm:

Hoạt động 2: Sử dụng phần mềm để làm số bài tập Sử dụng phần mềm để vẽ số

hình sau:

+ Dùng cơng cụ vẽ đoạn thẳng để vẽ cạnh tam giác

+ Cho trước đỉnh A, B, C Dựng đỉnh D hình than ABCD dựa cơng cụ đoạn thẳng đường song song

2 Sử dụng phần mềm để vẽ số hình hình học:

- Vẽ hình tam giác

(102)

+ Cho trước đỉnh A, B, C Dựng đỉnh D hình thang cân ABCD dựa cơng cụ đoạn thẳng, đường thẳng, đường trung trực phép biến đổi đối xứng qua trục Cho trước tam giác A, B, C Dùng cơng cụ đường trịn vẽ đường trịn qua điểm A,B,C

+ Cho trước tam giác A, B, C Dùng công cụ đường phân giác, đường vng góc đường trịn vẽ đường trịn nội tiếp tam giác ABC

- Vẽ hình thang cân

- Vẽ đường tròn ngoại tiếp tam giác,

- Vẽ đường tròn nội tiếp tam giác

V DẶN DÒ:

- Xem trước tập lại RÚT KINH NGHIỆM

……… ……… ………

- 

(103)

Tuần: 24 Ngày dạy : … /…./10

Thực hành: HỌC VẼ HÌNH VỚI PHẦN MỀM GEOGEBRA (tt) I MỤC TIÊU:

2 Kĩ năng:

Hoạt động : Khởi động phần mềm. Yêu cầu học sinh khởi động phần mềm

Geogebra + Kích đúp vào biểu tượng

hình để khởi động phần mềm theo yêu cầu giáo viên

1 Khởi động phần mềm:

Hoạt động 2: Sử dụng phần mềm để làm số bài tập Sử dụng phần mềm để vẽ số hình

sau: Cho trước cạnh AB

đường thẳng qua A Hãy vẽ hình thoi ABCD lấy đường thẳng cho đường chéo Sử dụng công cụ thích hợp học để dựng đỉnh C, D hình thoi

2 Sử dụng phần mềm để vẽ số hình hình học:

(104)

Sử dụng cơng cụ thích hợp để vẽ hình vng biết trước cạnh

Cho trước cạnh BC, vẽ tam giác ABC

Cho hình đường thẳng mặt phẳng Hãy dựng hình đối xứng hình cho qua trục đường thẳng Sử dụng công cụ đối xứng trục để vẽ hình

- Vẽ hình vng

- Vẽ hình tam giác

- Vẽ hình đối xứng trục đối tượng cho trước hình

V - DẶN DÒ:

- Xem trước :LẶP VỚI SỐ LẦN CHƯA BIẾT TRƯỚC RÚT KINH NGHIỆM

……… ……… ………

- 

(105)

Tuần: 25 Ngày dạy : … /…./10

Bài 8: LẶP VỚI SỐ LẦN CHƯA BIẾT TRƯỚC

- Hiểu 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;

- Hiểu 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ĩ năng:

GV: Sách giáo khoa, máy tính điện tử HS: Sách, ,đọc nhà

III PHƯƠNG PHÁP - Giải đáp, hướng dẫn

Hoạt động 1: Tìm hiểu ví dụ 1. - Một ngày chủ nhật Long gọi

điện cho Trang Không có nhấc máy Long định gọi lại thêm lần Như Long biết trước lặp lại gọi điện thêm lần

GV: Chiếu ví dụ lên máy chiếu ? Lần Long lặp lại việc gọi điện lần

? Điều kiện để kết thúc hoạt động lặp gì?

+ Chưa thể biết trước được, lần, hai lần nhiều

+ Điều kiện để kết thúc hoạt động lặp có người nhấc máy

(106)

? Tìm hiểu bước thuật tốn ví dụ

- Ta có sơ đồ khối

Nhận xét?

+ Đọc kĩ đề

+ Kí hiệu S tổng cần tìm ta có thuật tốn sau:

- Bước 1.S  0, n 

- Bước 2. Nếu S ≤ 1000, n  n + 1; ngược lại chuyển tới bước

-Bước 3. S  S + n và quay lại bước

- Bước 4. In kết : S n số tự nhiên nhỏ cho S > 1000 Kết thúc thuật toán

* 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

V DẶN DÒ

……… ……… ………

(107)

Bài 8: LẶP VỚI SỐ LẦN CHƯA BIẾT TRƯỚC (tt)

- Biết cú pháp hoạt động câu lệnh lặp với số lần trước - Biết số lỗi lập trình cần tránh

2 Kĩ năng:

- Rèn luyện kĩ sử dụng câu lệnh lặp không xác định Pascal Thái độ:

Hoạt động 1: Tìm hiểu ví dụ lệnh lặp với số lần không biết trước. - Câu lệnh lặp trước

trong Pascal có dạng: * Cú pháp:

While <điều kiện> do <câu lênh>;

- Trong đó: Điều kiện? Câu lệnh?

? Yêu cầu học sinh nghiên cứu SGK => hoạt động 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

+ Học sinh nghiên cứu SGK => hoạt động:

- B1 Kiểm tra điều kiện

- B2 Nếu điều kiện sai, câu lệnh bị bỏ qua việc thực câu lệnh

(108)

+ Nghiên cứu chương trình SGK

theo yêu cầu giáo viên

+ Kết nhận sau chạy chương trình n = 45 tổng tiên lớn 1000 1034

- Đưa số ví dụ lên máy chiếu - Yêu cầu học sinh tìm hiểu chương trình SGK

? Hãy cho biết kết nhận sau chạy chương trình

Hoạt động 2: Tìm hiểu lặp vơ hạn và 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 bao kết thúc

- GV chiếu chương trình lên máy chiếu phân tích

V DẶN DÒ

……… ……… ………

- 

SỬ DỤNG LỆNH LẶP WHILE DO

(109)

- Viết chương trình Pascal sử dụng câu lệnh lặp với số lần chưa biết trước Kĩ năng:

- Rèn luyện kĩ đọc chương trình, tìm hiểu tác dụng câu lệnh Thái độ:

Hoạt động 1: Làm bài tập Viết chương trình sử dụng lệnh

lặp While … để tính n số thực x1,x2,x3…xn Các số n x1,x2,x3…, xn nhập từ bàn phím

- Ý tưởng?

- Mơ tả thuật tốn chương trình, biến dự định sử dụng kiểu chúng

+ Sử dụng biến đếm lệnh lặp While…do để nhập cộng dần số vào biến kiểu số thực nhập đủ n số

+ Chú ý lắng nghe => ghi nhớ kiến thức

1 Viết chương trình sử dụng lệnh lặp While … để tính n số thực x1,x2,x3…xn Các số n x1,x2,x3…, xn nhập từ bàn phím

Gõ chương trình sau đây: Program tinh_trung_binh; Var n, dem: integer; X, tb: real; Begin

Dem:=0; tb:=0;

(110)

- Gõ chương trình sau đây: Program tinh_trung_binh; Var n, dem: integer; X, tb: real; Begin

Dem:=0; tb:=0;

Writeln(‘nhap cac so can tinh n =’); Readln(n);

While dem < n Begin

Dem:= dem + 1;

Writeln(‘nha so thu’, dem,’=’); Readln(x);

Tb:= tb + x; End;

Tb:=tb/n;

Witeln(‘Trung binh của’,n,’so =’, tb:10:3);

Readln; End

- Lưu chương trình với tên tinh_tb - Đọc hiểu tìm hiểu ý nghĩa câu lệnh Dịch chương trình sửa lỗi, có Chạy chương trình với liệu gõ từ bàn phím kiểm tra kết nhận

+ Học sinh độc lập gõ chương trình vào máy

+ Học sinh lưu chương trình theo yêu cầu giáo viên + Học sinh thực theo yêu cầu giáo viên

Readln(n);

While dem < n Begin

Dem:= dem + 1;

Writeln(‘nha so thu’, dem,’=’); Readln(x);

Tb:= tb + x; End;

Tb:=tb/n;

Witeln(‘Trung binh của’,n,’so =’, tb:10:3);

Readln; End

V DẶN DÒ:

……… ……… ………

- 

(111)

Tuần: 26 Ngày dạy : … /…./10

SỬ DỤNG LỆNH LẶP WHILE DO (tt)

- Rèn luyện kĩ đọc chương trình, tìm hiểu tác dụng câu lệnh Thái độ:

Hoạt động 1: Làm bài tập SGK - Gọi học sinh đọc đề sách

giáo khoa - Ý tưởng?

- Giáo viên đưa ý tưởng để học sinh tìm hiều

Ý tưởng: Kiểm tra N có chia hết cho số tự nhiên ≤ i ≤ N hay khơng Kiểm tra tính chia hết phép chia lấy phần dư (mod)

? Đọc tìm hiểu ý nghĩa câu lệnh chương trình sau đây:

Uses Crt;

Var n,i:integer; Begin Clrscr;

Bài Tìm hiểu chương trình nhận biết số tự nhiên N nhập vào từ bàn phím có phải số ngun tố hay khơng

- Học sinh tìm hiểu ý tưởng theo hướng dẫn giáo viên

+ Học sinh đọc chương trình tìm hiểu ý nghĩa câu lệnh theo hướng dẫn giáo viên

Bài Tìm hiểu chương trình nhận biết số tự nhiên N nhập vào từ bàn phím có phải số nguyên tố hay không Uses Crt;

Var n,i:integer; Begin

Clrscr;

write('Nhap vao mot so nguyen:

');readln(n); If n<=1 then

writeln('N khong la so nguyen to')

(112)

write('Nhap vao mot so nguyen:

');readln(n); If n<=1 then

writeln('N khong la so nguyen to')

else begin i:=2;

while (n mod i<>0) i:=i+1; if i=n then writeln(n,' la so nguyen to!')

else

writeln(n,' khong phai la so nguyen to!'); end;

readln end

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

chương trình kiểm tra kết + Học sinh độc lập gõ chươngtrình vào máy. + Nhấn Ctrl + F9 để chạy kiểm tra chương trình

i:=2;

while (n mod i<>0) i:=i+1; if i=n then writeln(n,' la so nguyen to!')

else

writeln(n,' khong phai la so nguyen to!');

end; readln end

V DẶN DÒ: - Tiết sau tập

……… ……… ………

(113)

- Viết chương trình Pascal sử dụng câu lệnh lặp với số lần biết trước Kĩ năng:

- Rèn luyện khả đọc chương trình, tìm hiểu tác dụng kết hợp câu lệnh Thái độ:

Hoạt động 1: Ôn tập câu lệnh lặp xác định For do.

? Nêu cú pháp vòng lặp xác định

? Nêu hoạt động vòng lặp

+ Cú pháp: For <biến đếm>:= <giá trị đầu> to <giá trị cuối> <câu lệnh>; + Hoạt động vòng lặp:

- B1: biến đếm nhận giá trị đầu

- B2: Chương trình kiểm tra biểu thức điều kiện, biểu thức điều kiện thực câu lệnh

- B3: Biến đếm tự động tăng lên đơn vị quay lại B2

? Nêu cú pháp vòng lặp xác định

? Nêu hoạt động vòng lặp

(114)

1 Các câu lệnh Pascal sau có hợp lệ khơng, sao?

a) for i:=100 to do writeln('A');

b) for i:=1.5 to 10.5 do writeln('A');

c) for i=1 to 10 do writeln('A');

d) for i:=1 to 10 do; writeln('A');

e) var x: real; begin for x:=1 to 10 do writeln('A'); end.

2 Hãy mô tả thuật tốn để tính tổng sau đây:

i A =

1 1

1.32.43.5 n n( 1)

+ Trừ câu 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 dùng để xác định giá trị đầu giá trị cuối câu lệnh lặp * Thuật toán tính tổng:

A = ( 1) 1     n n Bước 1 Gán A  0, i  Bước 2 A  i i( 12)



Bước 3 i i +

Bước 4 Nếu i n, quay lại bước Bước 5 Ghi kết A và kết thúc thuật toán

1 Các câu lệnh Pascal sau có hợp lệ khơng, sao?

f) for i:=100 to do writeln('A');

g) for

i:=1.5 to 10.5 do writeln('A');

h) for i=1 to 10 do

writeln('A');

i) for i:=1 to 10 do;

writeln('A'); j) var x: real; begin for x:=1 to 10 do writeln('A'); end.

V DẶN DÒ:

- Về nhà học kết hợp sách giáo khoa, tiết sau học làm tập (tt) RÚT KINH NGHIỆM

……… ……… ………

- 

(115)

Tuần: 27 Ngày dạy : … /…./10

BÀI TẬP (tt) I MỤC TIÊU:

III HOẠT ĐỘNG DẠY HỌC:

Hoạt động 1: Nêu khác biệt câu lệnh xác định và câu lệnh không xác định GV: yêu cầu học sinh nhớ lại

kiến thức trả lời câu hỏi

Sự khác biệt:

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

c) Lệnh lặp với số lần cho trước, câu lệnh được thực lần, sau kiểm tra điều kiện Lệnh lặp

(116)

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 mới thực

Hoạt động 2: Bài tập. ? Hãy tìm hiểu thuật toán

sau cho biết thực thuật tốn, máy tính thực vòng lặp? Khi kết thúc, giá trị S bằng bao nhiêu? Viết chương trình Pascal thể thuật tốn

a) Thuật tốn

Bước 1 S  10, x  0.5

Bước 2 Nếu S  5.2, chuyển tới bước Bước 3 S  S  x quay lại bước

Bước 4 Thông báo S và kết thúc thuật toán b) Thuật toán

Bước 1 S  10, n  Bước 2 Nếu S ≥ 10, chuyển tới bước Bước 3 n  n + 3, S  S n quay lại bước Bước 4 Thông báo S và kết thúc thuật tốn

a) Thuật tốn 1: 10 vịng lặp thực Khi kết thúc thuật toán S = 5.0 Đoạn chương trình Pascal tương ứng:

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 do begin n:=n+3; S:=S-n end;

writeln(S);

a) Thuật toán

Bước 1 S  10, x  0.5 Bước 2 Nếu S  5.2, chuyển tới bước

Bước 3 S  S  x quay lại bước

Bước 4 Thông báo S và kết thúc thuật toán

b) Thuật toán

Bước 1 S  10, n  Bước 2 Nếu S ≥ 10, chuyển tới bước

Bước 3 n  n + 3, S S  n quay lại bước

Bước 4 Thông báo S và kết thúc thuật tốn

V DẶN DỊ:

- Về nhà học tiết sau kiểm tra tiết (LT) RÚT KINH NGHIỆM

……… ……… ………

(117)

KIỂM TRA TIẾT ( LT)

I MỤC TIÊU:

- Hệ thống lại số kiến thức học

- Biết sử dụng vịng lặp xác định vịng lặp khơng xác định để viết chương trình II PHƯƠNG PHÁP

- Hoạt động cá nhân III ĐỀ BÀI:

MA TRẬN ĐỀ Mức độ

Nội Dung

Hiểu Biết Vận dụng

Bài 7 2,15 1,4,6,7 5,10,11,12,13

Bài 8 15 3 8,9,14

Phần I: TRẮC NGHIỆM Hãy khoanh tròn vào chữ đứng trước câu trả lời em cho (6,5đ)

Câu 1: Trong vòng lặp For <biến đếm>:=<giá trị đầu> to <giá trị cuối> <câu lệnh> củaPascal, vòng lặp, biến đếm thay đổi

a +1 b -1

c Một giá trị d Một giá trị khác không

Câu 2: Phát biểu sau ?

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 while…do d Ngôn ngữ Pascal thể cấu trúc lặp với số lần lặp chưa biết trước câu lệnh For…do

Câu 3: Câu lệnh lặp while…do có dạng là:

a x:=10; While x:=10 x:=x+5; b x:=10; While x:=10 x=x+5;

c x:=10; While x=10 x=x+5; d x:=10; While x=10 x:=x+5;

Câu 4: Câu lệnh pascal sau hợp lệ?

a For i:=100 to writeln(‘A’); b For i:= to 10 writeln(‘A’);

c For i:=1.5 to 10.5 writeln(‘A’); d For i= to 10 writeln(‘A’);

Câu 5: Cho S i biến nguyên Khi chạy đoạn chương trình :

s:=0;

(118)

writeln(s);

Kết in lên hình S laø :

a 11 b 15 c 10 d

Câu 6: Lần lượt thực câu lệnh for i:= to 3.5 writeln(i:3:1); viết hình?

a Thứ tự biến đếm, chiếm chỗ lấy chữ số sau phần thập phân b Viết số viết số 3.5

c Chỉ viết số 3.5 mà

d Khơng thực giá trị biến đếm có kiểu thứ tự Real

Caâu 7: Trong caâu lệnh lặp For i:=1 to 10 do begin

… End

Câu lệnh ghép thực lần (bao nhiêu vòng lặp thực hiện)

a khôn

g lần

b laàn

c laàn d 10 laàn

Câu 8: Tìm hiểu đoạn lệnh sau cho biết với đoạn lệnh chương trình thực vịng lặp S:=0; n:=0;

While S< =10 do Begin

n:=n+1; s:=s+n;

end;

a laàn b lần c lần d 10

Câu 9: Câu lệnh sau lặp vô hạn lần

a s:=5; i:=0;

While i<=s s:=s + 1;

b s:=5; i:=1;

While i<=s i:=i + 1; c s:=5; i:=1;

While i> s i:=i + 1; d s:=0; i:=0;While i<=n

if (i mod2)=1 then S:=S + I else i:=i+1;

Câu 10: Để tính tổng S=1 + +3 +4 … + n; em chọn đoạn lệnh: a for i:=1 to n

if ( i mod 2)=0 then S:=S + i;

b for i:=1 to n

if ( i mod 2)=1 then S:=S + i; c for i:=1 to n

S:= S + i ;

d for i:=1 to n

if ( i mod 2)<>0 then S:=S + i;

Câu 11: Để tính tổng S=2 + + … + n; em chọn đoạn lệnh: a For i:=1 to n

if ( i mod 2)=0 then S:=S + i;

b For i:=1 to n S:= S + i ; c c For i:=1 to n

if ( i mod 2)=1 then S:=S + i; d for i:=1 to n doif ( i mod 2)<>0 then S:=S + i;

Câu 12: Để tính tổng S=1/2+1/4 + 1/6 + … +1/ n; em chọn đoạn lệnh:

a for i:=1 to n

if ( i mod 2)=0 then S:=S + 1/i; b for i:=1 to n doif ( i mod 2) < > then S:=S + i; c for i:=1 to n

if ( i mod 2)=0 then S:=S – 1/i else S:= S + 1/i;

d for i:=1 to n

if ( i mod 2)=0 then S:=S +1/ i else S:=S-1/i;

Câu 13: Để đếm có số lẻ nhỏ hay n ; em chọn đoạn lệnh:

(119)

if ( I mod 2)< >0 then S:=S + 1; if ( I mod 2) =0 then S:=S + 1; c for i:=1 to n

if ( I mod 2)=0 then S:=S + I ;

d for i:=1 to n

if ( I mod 2)=0 then S:=S + I;

Phần 2: TỰ LUẬN (3,5đ)

Câu 14: Hãy tìm hiểu đoạn chương trình sau Khơng cần viết chương trình, cho biết lệnh Writeln in hình giá trị i, j, k bao nhiêu?

i:=1; j:=2; k:=3; Trả lời

While i<=6 i:=i+1; j:=j+1; k:=k+j; I=

Space:=’ ’; J=

Write(I,space,j,space,k); K=

Câu 15: Hãy xác định sai cho phát biểu

Nội dung Đúng Sai

Trong câu lệnh sau do câu lệnh lặp While … do phải có lệnh làm thay đổi giá trị điều kiện điều khiển vòng lặp, để sau số lần hữu hạn lần lặp, điều kiện phải có giá trị “sai”, vịng lặp kết thúc (không bị lặp vô hạn lần)

Đ Trong nhiều trường hợp, việc thực câu lệnh lặp While… do tốn thời gian so với câu lệnh

laëp for … do

S Câu lệnh sau do câu lệnh lặp while … do khơng thực lần từ đầu

điều kiện điều khiển vòng lặp có giá trị “sai” Đ

Mọi câu lệnh lặp For…do thay cách thích hợp câu lệnh While do S Trả lời trắc nghiệm

Caâu 10 11 12 13

Đ.Án A A D B B D D C A C A A A

V DẶN DÒ:

- Về nhà chuẩn bị số RÚT KINH NGHIỆM

……… ……… ………

(120)

LÀM VIỆC VỚI DÃY SỐ I MỤC TIÊU:

- Làm quen với việc khai báo sử dụng biến mảng - Tìm hiểu số ví dụ biến mảng

2 Kĩ năng:

- Việc gán giá trị, nhập giá trị tính tốn với giá trị phần tử biến mảng thực thông qua số tương ứng phần tử

3 Thái độ:

GV:Sách giáo khoa, giáo án HS: Đọc trước nhà III PHƯƠNG PHÁP

- Hướng dẫn,giảng giải IV HOẠT ĐỘNG DẠY HỌC:

Hoạt động 1: Tìm hiểu dãy sớ và biến mảng - Yêu cầu HS đọc ví dụ 1

- Ví dụ Pascal ta cần nhiều câu lệnh khai báo nhập liệu dạng sau đây, câu lệnh tương ứng với điểm học sinh

? Dữ liệu mảng

+: Ví dụ Giả sử cần viết chương trình nhập điểm kiểm tra học sinh lớp sau in hình điểm số cao Vì biến lưu giá trị nhất, để nhập điểm so sánh chúng, ta cần sử dụng nhiều biến, biến cho học sinh

Dữ liệu kiểu mảng tập hợp

(121)

hữu hạn phần tử có thứ tự, phần tử có kiểu liệu, gọi kiểu phần tử Việc thứ tự thực cách gán cho phần tử số:

Giá trị biến mảng mảng, tức dãy số (số nguyên, số thực) có thứ tự, số giá trị biến thành phần tương ứng

Hoạt động 2: Ví dụ biến mảng.

- Để làm việc với dãy số nguyên hay số thực, phải khai báo biến mảng có kiểu tương ứng phần khai báo chương trình

- Yêu cầu học sinh nghiên cứu SGK => Nêu cách khai báo biến mảng

- Cách khai báo đơn giản biến mảng ngôn ngữ Pascal sau:

var Chieucao: array[1 50] of real; var Tuoi: array[21 80] of integer;

+ Cách khai báo mảng Pascal sau:

Tên mảng : array[<chỉ số đầu> <chỉ số cuối>] of <kiểu liệu>

- Trong số đầu số cuối hai số nguyên biểu thức nguyên thoả mãn số đầu ≤ số cuối kiểu liệu integer real

2 Ví dụ biến mảng:

Cách khai báo mảng Pascal sau:

Tên mảng : array[<chỉ số đầu> <chỉ số cuối>] of <kiểu liệu>

V DẶN DÒ

(122)

……… ……… ………

- 

LÀM VIỆC VỚI DÃY SỐ (tt) I MỤC TIÊU:

- Làm quen với việc khai báo sử dụng biến mảng - Biết cách tìm giá trị lớn giá trị nhỏ dãy số Kĩ năng:

- Rèn luyện kĩ tìm giá trị lớn giá trị nhỏ dãy số Thái độ:

(123)

Ví dụ Viết chương trình nhập N số ngun từ bàn phím in hình số nhỏ số lớn N nhập từ bàn phím

- Giáo viên đưa ý tưởng để viết chương trình

Trước hết ta khai báo biến N để nhập số số nguyên nhập vào Sau khai báo N biến lưu số nhập vào phần tử biến mảng A Ngoài ra, cần khai báo biến i làm biến đếm cho lệnh lặp biến Max để lưu số lớn nhất, Min để lưu số nhỏ

- Yêu cầu học sinh tìm hiểu ý nghĩa câu lệnh chương trình

+ Học sinh đọc tìm hiểu u cầu tốn

(124)

- Trong chương trình này, lưu ý số điểm sau: Số tối đa phần tử mảng phải khai báo số cụ thể (Ở 100)

program MaxMin; uses crt;

Var

i, n, Max, Min: integer; A: array[1 100] of integer; Phần thân chương trình tương tự đây:

Begin clrscr;

write('Hay nhap dai cua day so, = '); readln(n);

writeln('Nhap cac phan tu cua day so:');

For i:=1 to n Begin

write('a[',i,']='); readln(a[i]); End;

Max:=a[1]; Min:=a[1]; for i:=2 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; End

+ Học sinh ý lắng nghe V DẶN DÒ

- Về nhà học bài, kết hợp SGK, tiết sau thực hành

(125)

- Viết chương trình Pascal sử dụng biến mảng Kĩ năng:

Hoạt động 1: Ơn tập lí thuyết

GV: yêu cầu học sinh nhớ lại kiến thức trả lời câu hỏi

a) Nêu lại cú pháp khai báo biến mảng b) Nêu lợi ích việc sử dụng biến mảng

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

Hoạt động 2: Bài tập. ? Viết chương trình nhập vào dãy

số nguyên có n phần tử In hình phần tử nhỏ nhất, phần tử lớn giá trị trung bình danh sách hình - Yêu cầu hs suy nghĩ viết chương trình

Program

MAX_MIN_AVG; Uses crt;

Var a:array[1 20]of

- Hs Suy nghĩ viết chương trình

Program MAX_MIN_ AVG;

Uses crt;

Var a:array[1 20]of

integer;i,n,max,min,sum:integer; Begin

Clrscr;

Writeln('TIM MAX, MIN,

(126)

integer;i,n,max,min,sum:integer; Begin Clrscr;

Writeln('TIM MAX, MIN, AVERAGE CUA MOT DAY SO');

Writeln(' -'); Write('Nhap so phan tu cua day n='); readln(n);

For i:=1 to n Begin Write('Nhap a[',i,']=');readln(a[i]); End; Min:=a[1]; Max:=a[1]; Sum:=0; For i:=1 to n

Begin

If (Min > a[i]) then Min:=a[i];

If (Max < a[i]) then Max:=a[i]; Sum:=sum+a[i];

End

Writeln('Day so vua nhap la: '); Writeln(' -');

For i:=1 to n

Write(a[i]:4); Writeln;

Writeln('Gia tri lon nhat la:',Max); Writeln('gia tri nho nhat la:',Min); Writeln('gia tri trung binh

la:',Sum/n:6:2); Readln; End;

Writeln(' -');

Write('Nhap so phan tu cua day n=');

readln(n); For i:=1 to n Begin Write('Nhap a[',i,']=');readln(a[i]); End; Min:=a[1]; Max:=a[1]; Sum:=0;

For i:=1 to n Begin If (Min >

a[i]) then Min:=a[i];

If (Max < a[i]) then Max:=a[i];

Sum:=sum +a[i];

End

Writeln('Day so vua nhap la: ');

Writeln(' -');

F or i:=1 to n

Write(a[i]:4); Writeln; Writeln('Gia tri lon nhat la:',Max);

Writeln('gia tri nho nhat la:',Min);

Writeln('gia tri trung binh la:',Sum/n:6:2);

Readln; End;

V DẶN DÒ:

- Chuẩn bị thục hành RÚT KINH NGHIỆM

……… ……… ………

(127)

XỬ LÝ DÃY SỐ TRONG CHƯƠNG TRÌNH I MỤC TIÊU:

- Làm quen với việc khai báo sử dụng biến mảng - Ôn luyện cách sử dụng câu lệnh lặp for

2 Kĩ năng:

- Củng cố kĩ đọc hiểu chỉnh sửa chương trình Thái độ:

Hoạt động 1: Bài 1 Chương trình tìm giá trị nhỏ

trong dãy số nguyên P_Min ?

HS chia nhóm làm thực hành

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

Min:=a[1];

for i:=2 to n if Min>a[i] then Min:=a[i];

write('So nho nhat la Min =

(128)

',Min); readln;

End. 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 Hoạt động 2: Bài tập 2

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 GV gợi ý:

- Dùng câu lệnh if…then…

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

write(i,' '); readln(a[i]); End;

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;

(129)

writeln(Kh, ' ban hoc kha '); writeln(TB, ' ban hoc trung binh'); writeln(K, ' ban hoc kem ');

readln; End V DẶN DÒ:

……… ……… ………

(130)

XỬ LÝ DÃY SỐ TRONG CHƯƠNG TRÌNH

- Làm quen với việc khai báo sử dụng biến mảng - Ôn luyện cách sử dụng câu lệnh lặp for

2 Kĩ năng:

- Củng cố kĩ đọc hiểu chỉnh sửa chương trình Thái độ:

Hoạt động 1:Bài 1 Chương trình tính tổng dãy số,

in hình dãy số vừa nhập

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

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

(131)

readln; End.

Hoạt động 2: Bài 2 Bổ sung chỉnh sửa chương

trình BT2 (tiết 59 ) để nhập loại điểm Tố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

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;

TBtoan: = TBtoan /n; TBvan: = TBvan /n;

writeln('Diem TB mon Toan : ',TBtoan : 3:2);

writeln('Diem TB mon Van: ',TBvan :3:2); readln;

End.

Bổ sung chỉnh sửa chương trình BT2 (tiết 59 ) để nhập loại điểm Tố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

V DẶN DÒ:

- Về nhà xem trước bài: “ Quan sát hình khơng gian với phần mềm Yenka RÚT KINH NGHIỆM

……… ……… ………

(132)

QUAN SÁT HÌNH KHƠNG GIAN VỚI PHẦN MỀM YENKA I MỤC TIÊU:

- Học sinh nghe giới thiệu phần mềm Yenka

- Nắm khung hình làm việc tạo số mơ hình làm việc Kĩ năng:

- Rèn luyện kĩ khởi động tìm hiểu hình làm việc phần mềm Thái độ:

Hoạt động 1: Giới thiệu phần mềm Yenka. - Cho học sinh đọc thông tin

SGK

Yenka phần mềm nhỏ, đơn giản hữu ích làm quen với hình khơng gian hình chóp, hình nón, hình trụ Ngồi việc tạo hình này, em cịn thay đổi kích thước, màu, di chuyển xếp chúng Từ hình khơng gian em cịn sáng tạo mơ hình hồn chỉnh cơng trình xây dựng, kiến trúc theo ý

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

Yenka phần mềm nhỏ, đơn giản hữu ích làm quen với hình khơng gian hình chóp, hình nón, hình trụ

(133)

Cho học sinh đọc thông tin phần - Để khởi động phần mềm ta làm

- Hãy cho biết màm hình củ phần mềm có nhữ gì?

- Hãy nêu cách thoát khỏi phần mềm

Cho học sinh đọc thông tin phần

- Nháy đúp vào biểu tượng để khởi động phần mềm, xuất cửa sổ sau đây: - Hộp công cụ dùng để tạo hình khơng gian Các hình tạo khung hình

- Thanh cơng cụ chứa nút lệnh dùng để điều khiển làm việc với đối tượng

- Muốn thoát khỏi phần mềm, nháy nút Close công cụ

2 Giới thiệu phần mềm làm việc phần mềm. a) Khởi động phần mềm:

b) Màn hình chính:

Hoạt động 3: Tìm hiểu cách tạo hình khơng gian. Giáo viên giới thiệu bảng tạo mơ

hình hình học không gian

GV giới thiệu số chức

- Để thiết lập đối tượng hình đầu, em phải làm việc với hộp công cụ: Objects

- Các cơng cụ dùng để tạo hình khơng gian thường gặp gồm hình trụ ( ), hình nón ( ), hình chóp ( ) hình lăng trụ ( ) Khi kéo thả đối tượng vào hình, em nhận mơ hình có dạng sau:

- Ta sử dụng cơng cụ đặc biệt phần mềm để quan sát tốt mơ hình vừa tạo

(134)

Nháy vào biểu tượng cơng cụ Khi trỏ trở thành dạng

Đưa trỏ chuột lên mơ hình, nhấn giữ di chuyển chuột, em thấy mơ hình quay khơng gian 3D Lệnh hết tác dụng em thả chuột

Phóng to, thu nhỏ

Nháy chuột vào biểu tượng cơng cụ Khi trỏ trở thành dạng

Nhấn giữ di chuyển chuột em thấy mơ hình phóng to, thu nhỏ tuỳ thuộc vào di chuyển chuột Lệnh hết tác dụng em thả chuột

Dịch chuyển khung mơ hình

Nháy chuột vào biểu tượng cơng cụ Khi trỏ trở thành dạng

Nhấn giữ di chuyển chuột em thấy mơ hình chuyển động theo hướng di chuyển chuột Lệnh hết tác dụng em thả chuột

V DẶN DÒ

……… ……… ………

(135)

QUAN SÁT HÌNH KHƠNG GIAN VỚI PHẦN MỀM YENKA (tt) I MỤC TIÊU:

- Học sinh nắm ý nghĩa số lệnh bản, khám phá điều khiển hình khơng gian

2 Kĩ năng:

- Có kỹ tạo hình nhờ vào lệnh điều khiển hình học khơng gian đơn giản mà học sinh vẽ

3 Thái độ:

Hoạt động 1: Tìm hiểu cách tạo hình khơng gian (tt) - Giáo viên giới thiệu Menu File

=> Nêu cách tạo mới, lưu mở tệp mơ hình

+ Học sinh ý lắng nghe quan sát

+ Để tạo ta chọn Menu File => New

+ Để lưu ta chọn Menu File => Save (Save as)

+ Để mở tệp mơ hình ta chọn Menu File => Open

(136)

Hoạt động : Tìm hiểu cách điều khiển hình khơng gian. - Để thay đổi di chuyển

một đối tượng hình học ta làm nào?

? Nêu cách để thay đổi kích thước

- Giáo viên giới thiệu cách thay đổi màu cho hình

Muốn tơ màu, thay đổi màu cho hình, em dùng cơng cụ Khi nháy chuột vào công cụ em thấy danh sách màu sau:

Các bước thực tô màu:

Kéo thả màu mơ hình Khi hình xuất chấm đen cho biết hình thay đổi màu Kéo thả màu vào chấm đen để tô màu

Ví dụ, ta tơ màu mặt hình lăng trụ tam giác với màu khác

- Muốn di chuyển hình khơng gian, ta kéo thả đối tượng - Để thay đổi kích thước đối tượng trước tiên cần chọn hình Khi xuất đường viền nút nhỏ đối tượng, cho phép tương tác để thay đổi kích thước Tuỳ vào đối tượng mà nút, đường viền có dạng khác

4 Khám phá, điều khiển các hình không gian:

a) Thay đổi, di chuyển b) Thay đổi kích thước

c) Thay đổi màu cho cách hình

V DẶN DỊ

……… ……… ………

(137)

- Học sinh nắm ý nghĩa số lệnh bản, khám phá điều khiển hình khơng gian

2 Kĩ năng:

- Có kỹ tạo hình nhờ vào lệnh điều khiển hình học khơng gian đơn giản mà học sinh vẽ

3 Thái độ:

1 Kiểm tra cũ:

? Màn hình làm việc phần mềm gồm thành phần nào?

Hoạt động : Tìm hiểu cách điều khiển hình khơng gian GV ngồi chức tơ màu

thay đổi, di chuyển phần mềm cịn cung cấp cho khác thay đổi tính hình

GV muốn thay đổi tính hình học em thao tác nào?

GV nhận xét câu trả lời học sinh tổng kết lại

HS quan sát lắng nghe

HS nháy đúp chuột lên hình cần thay đổi thực lệnh thích hợp

HS ghi

4 Khám phá, điều khiển hình không gian:

(138)

e) Gấp giấy thành hình khơng gian

V DẶN DỊ - Về nhà học bài, kết hợp SGK RÚT KINH NGHIỆM

……… ……… ………

(139)

-Tiết: 64 - 65 Ngày Soạn: …./4/10 Tuần: 32 -33 Ngày dạy : 13 / 4/10

Thực hành:

- Vận dụng kiến thức tiết lý thuyết để áp dụng vào tiết thực hành

2 Kĩ năng:

- Có kỹ tạo hình nhờ vào lệnh điều khiển hình học không gian đơn giản mà học sinh vẽ

3 Thái độ:

GV:Sách giáo khoa, giáo án HS: Học nhà

III PHƯƠNG PHÁP - Hướng dẫn,giảng giải IV HOẠT ĐỘNG DẠY HỌC:

Hoạt động: THỰC HÀNH GV em thực thao tác khởi

động phần mềm yenka

GV quan sát hướng dẫn em thao tác chưa

GV để vào hình làm việc phần mềm thực thao tác gì? GV để tạo mơ hình khơng gian em sử dụng hộp thoại gì?

GV em sử dụng công cụ hộp thoại Objects để tạo mơ hình khơng gian sau

HS thực thao tác khởi dộng phần mềm yenka

HS thực hành nháy nút Try Basic Version

HS sử dụng hộp thoại Objects

HS thực hành tạo mô hình khơng gian

- Nháy đúp chuột vào biểu tượng Yenka hình

- Nháy nút Try Basic Version để vào hình làm việc phần mềm

(140)

GV quan sát hướng dẫn em thực chưa

GV để thoát khỏi phần mềm em thực nào?

HS thực thao tác thoát khỏi phần mềm

- Nháy vào nút close công cụ

V DẶN DÒ

(141)

Tiết: 66 Ngày Soạn: …./4/10 Tuần: 33 Ngày dạy : / 4/10

KIỂM TRA TIẾT ( TH)

I MỤC TIÊU:

- Học sinh thực kiểm tra thực hành máy tính - Kiếm thức chủ yếu thuộc học cuối - Hệ thống lại số kiến thức học

- Biết sử dụng vòng lặp xác định để viết chương trình II CHUẨN BỊ

- GV: Đề

- HS: Học nhà III PHƯƠNG PHÁP

- Hoạt động nhóm máy IV ĐỀ BÀI

Ma trận đề Mức độ

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

Bài 7 Câu 2 Câu 2

Bài 8 Câu 1 Câu 1

Câu 1: Lập trình tính tổng: A= 1+2+3+ +n

ở n số tự nhiên nhập từ bàn phím (viết lệnh while do) Câu 2 : Bạn tính tổng

(viết lệnh for do)

(Lưu ý : Mỗi câu ghi lại thành File Mydocmens có tên LOP8A1_1.PAS Và LOP8A1_2.PAS).

ĐÁP ÁN + THANG ĐIỂM VÀ HƯỚNG DẪN CHẤM. Câu :

:

Câu Nội dung Điểm

(142)

1

Program B1 ; Uses CRT; Var

i, n: integer; tong: real; Begin

Clrscr;

write('cho so tu nhien n: '); Readln(n); tong:=0; i:=1;

1,5 while i<= n

Begin

tong:= tong+ i; i: = i+1; End;

1 writeln(' Tong can tim la: ', tong:12:6);

Readln;

End

2

Làm cho điểm

1,5 Program B2;

Var i: byte; s: real; Begin

s:=0; 1,5

For i:=1 to 20 s:= s+1/i;

Writeln(' 1+ 1/2 + 1/3 + + 1/20 = ', s: 14:10);

Readln; End

V DĂN DÒ - Tiết sau ôn tập

THỐNG KÊ CHẤT LƯỢNG BỘ MÔN TSH

S

Giỏi Khá TB Yếu Kém

TS % TS % TS % TS % TS %

8A 8B K8

(143)

Tuần: 34 Ngày dạy : / 4/10

ÔN TẬP HỌC KỲ II I MỤC TIÊU:

- Củng cố lại toàn kiến thức học từ đến

- Thực làm trắc nghiệm Vận dụng vào để viết chương trình đơn giản - Có kỹ thành thạo thực máy tính viết chương trình máy tính

- Sách giáo khoa, giáo án, tài liệu tin học có liên quan - Đọc tài liệu nhà trước

- Hướng dẫn, giảng giải IV TIẾN TRÌNH DẠY HỌC

Hoạt động 1: ÔN TẬP LÝ THUYẾT GV: Đặt số câu hỏi yêu cầu

học sinh trả lời :

- Nhắc lại cú pháp vòng lặp với số lần biết trước?

- Nêu cú pháp vòng lặp với số lần chưa biết trước?

HS: Suy nghĩ trả lời

Hoạt động 2: BÀI TẬP GV: chiếu số tập trắc

nghiệm yêu cầu học sinh suy nghĩ trả lời

- Hoạt động nhóm:

Bài tập: viết chương trình tính tổng n số tự nhiên với n nhập từ bàn phím.

(Nhóm 1,3: dùng lệnh for…to… do Nhóm 2, 4: dùng lệnh

while… do… để viết)

(144)

V DẶN DÒ

- Về nhà học bài, kết hợp SGK - Tiết sau ôn tập tiếp

(145)

Tiết: 68 Ngày Soạn: …./4/10 Tuần: 34 Ngày dạy : / 4/10

ÔN TẬP HỌC KỲ II I MỤC TIÊU:

- Củng cố lại toàn kiến thức học từ đến - Vận dụng vào để viết chương trình đơn giản

- Có kỹ thành thạo thực máy tính viết chương trình máy tính II CHUẨN BỊ:

- Sách giáo khoa, giáo án, tài liệu tin học có liên quan - Đọc tài liệu nhà trước

- Hướng dẫn, giảng giải IV TIẾN TRÌNH DẠY HỌC

Hoạt động 1: ƠN TẬP LÝ THUYẾT GV: Đặt số câu hỏi yêu cầu

học sinh trả lời :

- Nhắc lại cú pháp biến mảng

HS: Suy nghĩ trả lời

Hoạt động 2: BÀI TẬP Bài tập:

a) Viết chương trình pascal sử dụng biến mảng để nhập từ bàn phím phần tử dãy số Độ dài dãy số nhập từ bàn phím

HS: Viết chương trình

V DẶN DỊ

- Tiết sau Thi học kí RÚT KINH NGHIỆM

Định dạng
Số trang	145
Dung lượng	10,35 MB