Giao an

IV. Viết chương trình sử dụng lệnh lặp While … do để tính n số thực x1,x2,x3…xn.. - Đọc hiểu và tìm hiểu ý nghĩa của từng câu lệnh. Chạy chương trình với các bộ dữ liệu được gõ từ b[r]

(1)

Tiết:

Tuần: Ngày dạy : 17/08/2010

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 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, 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 PHƯƠNG PHÁP

- Thuyết trình, 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 để 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

V DẶN DÒ:

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

……… ……… ………

(3)

-Tiết:

Tuần: Ngày dạy : … /08/2010

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

- 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, yêu thích viết chương trình để thực số cơng việc II CHUẨN BỊ:

- Giản 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 viết chương trình lệnh cho máy tính làm việc.

- Để đ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 toá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 tố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ố ? 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

V DẶN DÒ:

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

……… ……… ………

(5)

-Tiết:

Tuần: Ngày dạy : … /08/2010

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, u thích mơn học II CHUẨN BỊ:

- Giảng giải

Hoạt động 1: Tìm hiểu 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

? 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

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

V DẶN DÒ:

- Học kết hợp SGK

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

……… ……… ………

(7)

Tiết:

Tuần: Ngày dạy : … /08/2010

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:

1 Kiến thức:

- 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, 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 PHƯƠNG PHÁP

- Thuyết trình

IV HOẠT ĐỘNG DẠY HỌC: 1 Kiểm tra cũ:

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

Bài mới:

Hoạt động 1: Tìm hiểu từ khố tên chương trình.

- 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ừ dà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 đại lợng khác nhau chơng trình phải có tên khác nhau

(8)

Hoạt động 2: Tìm hiểu cấu trúc chung chương trình.

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

* Phần khai báo: 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.

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

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

……… ……… ……….

(9)

-Tiết:

Tuần: Ngày dạy :31/08/2010

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, yê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 PHƯƠNG PHÁP:

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

+ Hoạt động 1: Làm quen với việc khởi động thoát khỏi Turbo Pascal.

? 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 để khỏi chương trình Pascal

Ta sử dụng tổ hợp phím Alt + X để thoát 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)

(10)

Hoạt động 2: Nhận biết thành phần: chọn , tên tệp mở, trỏ, dịng

trợ giúp phía 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 V DẶN DỊ:

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

……… ……… ……….

(11)

-Tiết:

Tuần: Ngày dạy : 03/9/2010

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

LÀM QUEN VỚI TURBO PASCAL

I MỤC TIÊU:

1 Kiến thức:

- 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 PHƯƠNG PHÁP:

- Thực hành nhóm, thảo luận IV.TIẾN TRÌNH DẠY HỌC:

Hoạt động 1: Soạn thảo chương trình đơn giản. - 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 chạy chương trình đơn giản.

- 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ươngtrì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

V DẶN DÒ:

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

……… ……… ………

(13)

-Tiết:

Tuần: Ngày dạy : 07/09/2010

Bài 3: CHƯƠNG TRÌNH MÁY TÍNH VÀ DỮ LIỆ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 PHƯƠNG PHÁP:

- Giang giải

Hoạt động 1: Tìm hiểu liệu kiểu liệu. - Để quản lí tăng hiệu xử lí,

các 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ự

(14)

Hoạt động 2: Tìm hiểu phép tốn với liệu kiểu số. - Giới thiệu số phép toán số

học Pascal như: cộng, trừ, nhân, chia

* Phép DIV : 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 tốn số học Pascal:

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

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

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

V DẶN DÒ:

(15)

Tiết:

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

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

- 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 PHƯƠNG PHÁP:

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

1 Kiểm tra cũ:

? 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

- Ngồi phép tố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 tố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ố

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

=

< nhỏ > lớn

≠ khác

≤ nhỏ

(16)

Hoạt động 2: Tìm hiểu giao tiếp người máy. 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 tố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

V DẶN DÒ:

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

(17)

Tiết:

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

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.

(18)

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Ò.

……… ……… ………

(19)

Tiết: 10

Tuần: Ngày dạy : 16/09/2010

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 trình Nhấn phím Enter để tiếp tục

+ 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 toán);

- Hiểu cách giao tiếp ng-ời máy thông qua lệnh

(20)

Mở lại tệp chương trình CT2.pas và sửa câu lệnh cuối sách giáo khoa trước từ khố End Dịch và chạ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

……… ……… ………

- 

-Tiết: 11

(21)

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

I MỤC TIÊU:

1 Kiến thức:

- 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 độ:

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



và 100 50

5



hình Cách làm :

(22)

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

……… ……… ………

Tiết: 12

(23)

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

I MỤC TIÊU:

1 Kiến thức:

- 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 độ:

- 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 toá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; x:=y; x:=(a+b)/2;

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

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

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

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

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

(24)

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 tốn tính trung bình cộng hai giá trị nằm hai biến nhớ avà 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

(25)

Tiết: 13

Tuần: Ngày dạy : /…/2010

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

Hoạt động 2: tập 1.

- 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

(26)

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

bộ liệu (đơn giá số l-ợng) nh sau (1000, 20), (3500, 200), (18500, 123) Kiểm tra tính kết in

c) Chạy chơng trình với liệu (1, 35000) Quan sát kết nhận đợc Hãy thử đốn lí chơng 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

……… ……… ………

(27)

-Tiết: 14

Tuần: Ngày dạy : … /…/2010

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 và sử dụng biến, hằng. Và yêu cầu học sinh khởi động máy

- Lắng nghe khởi động

và kiểm tra tình trạng máy tính => 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 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 Thử viết chơng trình nhập số nguyên

x y, in giá trị x y hình Sau hoán đổi giá trị x y in lại hình giá trị x y

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

program hoan_doi;

var x,y,z:integer;

(28)

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

……… ……… ………

(29)

-Ngày soạn: / /2010 Lớp: 8A4 Tiết: -Ngày dạy: / /2010 Sĩ số : 24 vắng: Lớp: 8A5 Tiết: Ngày dạy: / /2010 Sĩ số : 23 vắng:

Ti

BÀI TẬP

I MỤC TIÊU:

1 Kiến thức:

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

2 Kĩ năng:

- Rèn luyện kĩ sử dụng phép tốn ngơn ngữ Pascal 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(5’) III HOẠT ĐỘNG DẠY HỌC:

Hoạt động 1: Củng cố lại số kiến thức học(20’) ? 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 toá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.(15’) Bài 1: Dãy số 2010 dữ

(30)

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ố nguyên dương nhập từ bàn phím:

hoặc kiểu xâu kí tự Tuy nhiên, để chương trình dịch Turbo Pascal hiểu 2010 liệu kiểu xâu, phải viết dãy số cặp dấu nháy đơn (') var a: real; b: integer; c: string; begin

writeln('2010'); writeln(2010); a:=2010; b:=2010; c:=’2010’ end 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 1: Dãy số 2010 liệu kiểu nào?

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

 

(31)

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

H Đ

Củng c

ó

-

d ặn d ị:

- Về nhà ơn lại tất kiến thức học, tiết sau kiểm tra tiết

……… ……… ………

(32)

Ti

êt 19

KIỂM TRA TIẾT ( LT)

I MỤC TIÊU:

- Biết cách chuyển biểu thức tố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 ĐÁP ÁN – ĐỀ BÀI:

I TNKQ (2 điểm): Mỗi câu 0.25 điểm.

1 D. 2 C. 3 B. 4 D.

II TNTL (3 đ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 (5điểm):

Câu 1: (2 ñieåm)

Var x: integer; (0.5 ñ)

Begin

Readln(x); (0.5 ñ)

Writeln(x*x); (1.0 ñ)

End

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

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

Câu 2: (3 điểm)

Program dientich_hinhthang; Var a, b, h: Real;

Begin

Writeln(‘Nhap dai day lon – day nho – chieu cao: ‘); Readln(a,b,h);

Writeln(‘Dien tich hinh thang la: ‘,(a+b)*h/2 :2:2); Readln

(33)

ĐỀ BAØI:

I TNKQ (2 điểm): Hãy khoanh tròn chữ đứng trước câu trả lời đúng: Câu 1: Để 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 2: Hãy cho biết kết xuất hình sau thực câu lệnh Writeln(‘16*2-3=’,16*2-3); A 16*2-3= B 16*2-3=29 C 29 D 16*2-3

Câu 3: 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);

Caâu 4: Sau câu lệnh x:=5; x:=x*x; Giá trị biến x laø:

A 5 B 10 C 15 D 25

II TNTL (3 đ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 (5 điểm):

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

Câu 2: Viết chương trình tính diện tích hình chữ nhật Trong độ dài đáy chiều cao nhập từ bàn phím

THỐNG KÊ CHẤT LƯỢNG TSH

S

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

TS % TS % TS % TS % TS %

8A 8B

- 

(34)

Lớp: 8A5 Tiết: Ngày dạy: / /2010 Sĩ số : 23 vắng:

Ti

ết:20

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 TIẾN TRÌNH DẠY HỌC:

Hoạt động 1: Giới thiệu phần mềm(5’) ? 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.(20’) ? Hãy nêu cách để khởi động

phần mềm

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

- Yê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

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

Học sinh ý lắng nghe => ghi nhớ

(35)

- 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

kiến thức

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

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

Hoạt động 3: Tìm hiểu cách sử dụng phần mềm.(15’) 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:

H Đ C ủng c ó - d ặn d ị: (5’)

- Về nhà xem lại bài, tiết sau “Thực hành” * D ặn d ò:

……… ……… ……….

- 

Ti

ết: 21

(36)

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

- Rèn luyện kỹ gõ bàn phím nhanh xác Thái độ:

- 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 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 H Đ

C ủng c ó - d ặn d ị:(5’)

Nhận xét đánh giá tiết thực hành

 D ặn d ò:

……… ………

- 

Ti

ết 22

(37)

- 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 độ:

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

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

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

Hoạt động 1: Tìm hiểu khái niệm toán(20’) ? 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ụ toá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 cầu học sinh đưa khái niệm toán

+ 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 công việc hay nhiệm vụ cần phải giải

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

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

(38)

- Để 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

H Đ C ủng c ó - d ặn d ò: (5’)

* D ặn d ò:

……… ……… ………

(39)

Ti

ết 23

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

I MỤC TIÊU:

1 Kiến thức:

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

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

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

Hoạt động 1: Tìm hiểu khái niệm thuật tốn(20’) - 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 tốn

- Nói cách khác, thuật toá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

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

a) Khái niệm thuật tốn:

(40)

- Yêu cầu học sinh nghiên cứu SGK => q 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

+ Quá 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 tố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) Q trình giải tốn máy tính:

H Đ C ủng c ố - d ặn d ò (5’

 D ặn d ò

……… ……… ………

(41)

Ti

ết 24

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

I MỤC TIÊU:

1 Kiến thức:

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

- Rèn luyện kĩ mô tả thuật toá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(20’) ? Em nêu lại khái niệm

thuật toán + Thuật toán dãy thaotá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:

Hoạt động 2: Tìm hiểu cách mơ tả thuật tốn.(20’) ? 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

(42)

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

H Đ C ủng c ó - d ặn d ò: (5’)

* D

……… ……… ………

(43)

Ti ết 25

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

I MỤC TIÊU:

1 Kiến thức:

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

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

Hoạt động 1: Tìm hiểu ví dụ 1.(20’) - 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 diện tích hình A

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

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

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

- 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 diện tích hình A

(44)

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

H Đ C ủng c ố - d ặn d ò: (5’)

* d

……… ……… ………

(45)

-Tiết: 23-24

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

BÀI TẬP

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

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

- Biến dùng để đặt tên cho vùng nhớ máy tính Biến lưu trữ liệu (giá trị) Giá trị biến thay đổi 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);

1 Ôn lại số kiến thức đã học:

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

(46)

Hoạt động 2: Vận dụng kiến thức học để làm số 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)

+ 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

……… ……… ………

(47)

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

1 Kiến thức:

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

- Hs tự thao tác thực số chức phần mềm Kĩ 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 nằm múi khác - 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

1 Giới thiệu phần mềm - Phần mềm Sun times giúp em nhìn tồn cảnh vị trí, thành phố, thủ nước tồn giới 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 phần mềm:

(48)

ở hình Hoạt động : Tìm hiểu 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 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Ò:

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

……… ……… ………

(49)

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

I MỤC TIÊU:

1 Kiến thức:

- 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 độ:

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

(50)

- 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ảiphâ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:

(51)

V DẶN DÒ:

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

……… ……… ………

- 

Thực hành:

I MỤC TIÊU:

1 Kiến thức:

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

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

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

(52)

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 đồ 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Ò

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

(53)

……… ……… ………

- 

Thực hành:

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

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

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

(54)

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

RÚT KINH NGHIỆM

(55)

- 

Tiết: 28 Ngày Soạn: …./…./09 Tuần: 14 Ngày dạy : … /…./09

CÂU LỆNH ĐIỀU KIỆN

- 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 độ:

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

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

(56)

? 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, 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:

Hoạt động 3: Tìm hiểu điều kiện phép so sánh. - Các phép so sánh có vai trị

rất quan trọng việc mơ tả thuật tốn lập trình

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

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

(57)

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

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)

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

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

(58)

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 tố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í dụ gọi cấu trúc rẽ nhánh dạng thiếu cịn ví dụ gọi cấu trúc rẽ nhánh dạng đủ

+ 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

(59)

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?

+ 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

V DẶN DÒ:

(60)

- 

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

(61)

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

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:

Hoạt động 2: Làm tập1/52 - 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

+ 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

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 ;

(62)

- Dịch chạy chương trình + Nhấn F9 để dịch nhấn Ctrl + F9 để chạy chương trình

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

……… ……… ………

- 

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

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

(63)

Hoạt động 1: Làm 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

1 Ôn lại câu lệnh điều kiện:

- 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

(64)

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

writeln(b,’ ‘,a) ; readln ;

V DẶN DÒ:

- Về nhà xem lại bài, tiết sau làm tập RÚT KINH NGHIỆM

……… ……… ………

- 

(65)

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

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

Giá trị biến X bao nhiêu, trước giá trị X 5?

(66)

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

- 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

……… ……… ………

(67)

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

KIỂM TRA THỰC HAØNH

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:

(68)

Tiết: 34 Ngày Soạn: …./…./09 Tuần: 17 Ngày dạy : … /…./09

ÔN TẬP

I MỤC TIÊU:

1 Kiến thức:

- 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 IV HOẠT ĐỘNG DẠY HỌC:

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

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

(69)

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ừ dà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ì?

(70)

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 đạ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

……… ……… ………

(71)

ÔN TẬP

I MỤC TIÊU:

1 Kiến thức:

- 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

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 : Ôn lại số kiến thức học.

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ố

(72)

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

Quá trình giải tốn máy tính gồm có bước:

Bước : Xác định 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

……… ……… ………

(73)

KIỂM TRA HỌC KÌ I

I MỤC TIÊU:

1 Kiến thức:

- 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

Câu Kiểu liệu String có độ dài ký tự?

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 ?

(74)

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ạ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ừ bàn phím 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 Câu 15.d Câu 16.a Câu 17.b

II TỰ LUẬN 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

(75)

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

CÂU LỆNH LẶP

- 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 khơng biết 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

(76)

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 tố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 toán

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

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”

V DẶN DỊ:

……… ……… ………

- 

(77)

1 Kiến thức:

- 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

Hoạt động 1: 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

Writeln(‘day la lan lap thu’,i); Readln;

End

+ 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

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

(78)

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

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

……… ……… ………

- 

(79)

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;

Hoạt động 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’);

+ 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 khơng phả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’);

(80)

- 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

- Viết chương trình in hình bảng cửu chương

V DẶN DÒ

……… ……… ………

- 

(81)

- Giải đáp, hướng dẫn IV HOẠT ĐỘNG DẠY HỌC

Hoạt động 1: Bài tập 1.

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’);

(82)

Tính x (Với n số nguyên không

âm). + Học sinh đọc đề => suynghĩ trả lời

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

……… ……… ………

(83)

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

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

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

- B4: Nếu biểu thức điều kiện nhận giá trị sai khỏi vịng lặp

1 Ôn lại câu lệnh lặp For do: + Cú pháp:

+ Hoạt động

(84)

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

yêu cầu tốn

+ Gõ chương trình vào máy theo yê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

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

……… ……… ………

- 

(85)

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

(86)

màn hình 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:

(87)

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

(88)

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

……… ……… ………

- 

(89)

- 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 : Tìm hiểu cơng cụ là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

(90)

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 đ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Ò:

……… ……… ………

- 

(91)

HỌC VẼ HÌNH VỚI PHẦN MỀM GEOGEBRA (tt)

I MỤC TIÊU:

1 Kiến thức:

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

Hoạt động 1: Tìm hiểu cơng cụ là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 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 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

(92)

- 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

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

(93)

Thực hành: HỌC VẼ HÌNH VỚI PHẦN MỀM GEOGEBRA

- 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 độ:

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

(94)

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

việc phần mềm.

V DẶN DÒ:

- Xem trước tập RÚT KINH NGHIỆM

……… ……… ………

- 

(95)

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

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 để làm số 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

(96)

đỉ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

……… ……… ………

- 

(97)

Thực hành: HỌC VẼ HÌNH VỚI PHẦN MỀM GEOGEBRA (tt)

I MỤC TIÊU:

1 Kiến thức:

- 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 để làm số 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:

(98)

để 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

……… ……… ………

- 

(99)

Bài 8: LẶP VỚI SỐ LẦN CHƯA BIẾT TRƯỚC

I MỤC TIÊU:

1 Kiến thứ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

(100)

tốn ví dụ

- Ta có sơ đồ khối

Nhận xét?

+ 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Ò

……… ……… ………

- 

(101)

- 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 trước.

- Câu lệnh lặp khơng biết trước 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

(102)

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

- 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ơ hạn lỗi lập trình cần tránh.

- Khi viết chương trình sử dụng cấu trúc lặp cần ý tránh tạo nên vịng lặp khơng 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

(103)

2 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: Làm tập

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

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

(104)

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

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

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

……… ……… ………

- 

(105)

SỬ DỤNG LỆNH LẶP WHILE DO (tt)

- 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: Làm 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')

else

(106)

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

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

……… ……… ………

(107)

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

BÀI TẬP

- 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 độ:

- Thái độ học tập nghiêm túc, u thích mơn học

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

- B4: Nếu biểu thức điều kiện nhận giá trị sai khỏi vòng lặp

? Nêu cú pháp vòng lặp xác định

? Nêu hoạt động vòng lặp

(108)

1 Các câu lệnh Pascal sau có hợp lệ khơng, sao?

a) for i:=100 to

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

không hợp lệ:

a) Giá trị đầu phải nhỏ giá trị cuối;

b) Các giá trị đầu giá trị cuối phải số nguyên;

c) Thiếu dấu hai chấm gán giá trị đầu;

d) Thừa dấu chấm phẩy thứ nhất, ta muốn lặp lại câu lệnh

writeln('A') mười lần, ngược lại câu lệnh hợp lệ;

e) Biến x đã khai báo biến có liệu kiểu số thực khơng thể dùng để xác định giá trị đầu giá trị cuối câu lệnh lặp

* Thuật tốn tính tổng:

A = ( 1) 1     n n

Bước 1 Gán A  0, i 

Bước 2 A 

( 2)

i i

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

……… ……… ………

- 

(109)

BÀI TẬP (tt)

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

Hoạt động 1: Nêu khác biệt câu lệnh xác định 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

(110)

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: Bài tập.

? Hãy tìm hiểu thuật tố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 toá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

……… ……… ………

(111)

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

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;

(112)

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

Câu 7: Trong câ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:

(113)

if ( I mod 2)=0 then S:=S + I ; 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

……… ……… ………

(114)

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

LÀM VIỆC VỚI DÃY SỐ

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

(115)

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Ò

(116)

……… ………

- 

LÀM VIỆC VỚI DÃY SỐ (tt)

I MỤC TIÊU:

1 Kiến thức:

- 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 độ:

(117)

nguyên 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

cầu toán

(118)

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

cầu giáo viên 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

(119)

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

BÀI TẬP

- 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: u cầu học sinh nhớ lại kiến thức

và 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: Bài tập.

? Viết chương trình nhập vào dãy số ngun 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,

(120)

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;

-');

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

……… ……… ………

(121)

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

XỬ LÝ DÃY SỐ TRONG CHƯƠNG TRÌNH

I MỤC TIÊU:

1 Kiến thức:

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

(122)

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

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;

(123)

writeln(TB, ' ban hoc trung binh'); writeln(K, ' ban hoc kem ');

readln; End

V DẶN DÒ:

……… ……… ………

(124)

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

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

(125)

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

……… ……… ………

(126)

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

QUAN SÁT HÌNH KHƠNG GIAN

VỚI PHẦN MỀM YENKA

I MỤC TIÊU:

1 Kiến thức:

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

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

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ụ

(127)

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

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 tạ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

(128)

thanh 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Ò

……… ……… ………

(129)

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

VỚI PHẦN MỀM YENKA (tt)

I MỤC TIÊU:

1 Kiến thức:

- 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 tạ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

(130)

- Để thay đổi di chuyển đố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ô mà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Ò

……… ……… ………

(131)

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

QUAN SÁT HÌNH KHÔNG GIAN

I MỤC TIÊU:

1 Kiến thức:

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

(132)

nhớ kiến thức

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

……… ……… ………

(133)

-Tuần: 32 -33 Ngày dạy : 13 / 4/10

Thực hành:

I MỤC TIÊU:

1 Kiến thức:

- Vận dụng kiến thức tiết lý thuyết để áp dụng vào tiết thực hành 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

(134)

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Ị

(135)

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

(136)

1

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

(137)

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

(138)

- Về nhà học bài, kết hợp SGK - Tiết sau ôn tập tiếp

(139)

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

Giao an

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

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

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

VÀ NGƠN NGỮ LẬP TRÌNH

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

VÀ NGƠN NGỮ LẬP TRÌNH (tt)

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

LÀM QUEN VỚI TURBO PASCAL

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

LÀM QUEN VỚI TURBO PASCAL

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

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

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

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

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

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

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

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

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

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

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

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

Ti

BÀI TẬP

Củng c

ó

d ặn d ị:

Ti

êt 19

KIỂM TRA TIẾT ( LT)

Ti

ết:20

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

H Đ C ủng c ó - d ặn d ị: (5’)

Ti

ết: 21

C ủng c ó - d ặn d ị:(5’)

Ti

ết 22

H Đ C ủng c ó - d ặn d ò: (5’)

Ti

ết 23

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

H Đ C ủng c ố - d ặn d ò (5’

Ti

ết 24

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

H Đ C ủng c ó - d ặn d ò: (5’)

Ti ết 25

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

H Đ C ủng c ố - d ặn d ò: (5’)

BÀI TẬP

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

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

Thực hành:

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

Thực hành:

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

CÂU LỆNH ĐIỀU KIỆN

CÂU LỆNH ĐIỀU KIỆN (tt)

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

SỬ DỤNG CÂU LỆNH ĐIỀU KIỆN IF THEN

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

SỬ DỤNG CÂU LỆNH ĐIỀU KIỆN IF THEN

KIỂM TRA THỰC HAØNH

ÔN TẬP

ÔN TẬP

KIỂM TRA HỌC KÌ I

I PHẦN LÝ THUYẾT (7 điểm)

Đáp án

CÂU LỆNH LẶP

SỬ DỤNG LỆNH LẶP FOR DO

SỬ DỤNG LỆNH LẶP FOR DO

HỌC VẼ HÌNH VỚI PHẦN MỀM GEOGEBRA

HỌC VẼ HÌNH VỚI PHẦN MỀM GEOGEBRA (tt)

Thực hành: HỌC VẼ HÌNH VỚI PHẦN MỀM GEOGEBRA

Thực hành: HỌC VẼ HÌNH VỚI PHẦN MỀM GEOGEBRA (tt)

Bài 8: LẶP VỚI SỐ LẦN CHƯA BIẾT TRƯỚC

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