1. Trang chủ
  2. » Tài Chính - Ngân Hàng

giao an tham khao hay

85 4 0

Đang tải... (xem toàn văn)

Tài liệu hạn chế xem trước, để xem đầy đủ mời bạn chọn Tải xuống

THÔNG TIN TÀI LIỆU

Thông tin cơ bản

Định dạng
Số trang 85
Dung lượng 1,42 MB

Nội dung

- Hoïc sinh bieát ñöôïc caùc kieåu döõ lieäu vaø döõ lieäu nhaäp vaøo maùy tính - Hoïc sinh bieát duøng caùc pheùp toaùn veà döõ lieäu.. - Hoïc sinh bieát caùch con ngöôøi giao tieáp vôù[r]

(1)

Gi¸o ¸n Tin häc - Năm học 2009- 2010 Ngy dy:

Tit : : MÁY TÍNH VÀ CHƯƠNG TRÌNH MÁY TÍNH I/Mục tiêu::

- Học sinh biết số khái niệm thuật giải máy tính ngơn ngữ máy tính

- Học sinh biết lệnh sống hàng ngày thực vài ví dụ - Học sinh biết sử dụng ệnh vào tốn cụ thể

- Học sinh nghiêm túc trịng học tập

II/ Chuẩn bị

GV: SGK, máy chiếu HS: Xem trước nhà

IV Ti n trình gi ngế ả

Hoạt động Nội dung

Hoạt động 1:Tìm hiểu người ra lệnh cho máy tính nào?

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

VD: Nháy đúp lên biểu tượng Ra lệnh cho máy tính thực khởi động chương trình phần mềm

? Khi thực chép đoạn văn ta lệnh cho máy tính ? Đó lệnh nào?

Hoạt động 2: Tìm hiểu hoạt động RơBơt qt nhà

GV: Chiếu hình chiếu

Giả sử có đống rác RơBơt vị trí Hình SGK, từ vị trì thời RoBơt để RơBơt nhặt rác bỏ rác vào thùng

x

x x

? Nhìn vào hình em mơ tả bước để RơBơt nhặt rác bỏ vào thùng?

Giả sử lệnh viết lưu thành tệp với tên “ nhặt rác” lệnh tệp điều khiển Rơbơt tự động thực nhiệm vụ nhặt

I.Con ngưởi lệnh cho máy tính nào?

- Để dẫn máy tính thực cơng việc đó, người đưa cho máy tính nhiều lệnh máy tính thực lệnh theo thứ tự nhận

VD1: Gõ chữ A lên hình  Ra lệnh cho máy tính ghi ký tự hình

VD2: Sao chép đoạn văn  Yêu cầu máy tính thực công việc sau:

Sao chép đoạn văn vào nhớ chép đoạn văn từ nhớ vị trí

II Ví dụ : Rô- bôt quét nhà

Nếu thực lệnh sau Rơbơt hồn thành nhiệm vụ:

1 TiÕn bíc

2 Quay tr¸i, tiến bớc Nhặt rác

4 Quay phải, tiÕn bíc Quay tr¸i, tiÕn bíc Bỏ rác vào thùng Thuứng

Raực RoõBoõt

(2)

rác v2 bỏ rác vào thùng rác

D Củng cố - Ghi nhớ

- Laøm tập SGK V Rút kinh nghiệm

- Học sinh hiểu bài, biết sử dụng lệnh hàng ngày để đưa vào máy tính - Học sinh tự lấy ví dụ minh họa

- Thời gian đảm bảo - Hồn thành chương trình



Tiết :Bài MÁY TÍNH VÀ CHƯƠNG TRÌNH MÁY TÍNH(TT)

IMục tiêu::

- Học sinh biết số khái niệm thuật giải máy tính ngơn ngữ máy tính

- Học sinh biết lệnh sống hàng ngày thực vài ví dụ - Học sinh biết sử dụng ệnh vào toán cụ thể

- Học sinh nghiêm túc tròng học tập

II Chuẩn bị

GV: SGK, máy chiếu HS: Xem trước nhà

IV Tiến trình giảng

Hoạt động Nội dung

Hoạt động 1: Cách viết chương trình, ra lệnh cho máy tính thực hiện

- Việc viết lệnh điều khiển Rôbôt thực chất viết chương trình - Khi thực chương trình máy tính thực lệnh có chương trình cách

Hoạt động 2:Tìm hiểu lý phải viết chương trình

- Để thực cơng việc, máy tính phải hiểu lệnh viết chương trình Vậy làm để máy tính hiểu lệnh người? Ta lệnh cho máy tính cách nói gõ phím khơng?

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

III Viết chương trình – lệnh cho máy tính thực hiện

Trở lại ví dụ Robơt nhặt rác, chương trình có lệnh sau:

IV Tại phải viết chương trình?

- Máy tính nói hiểu ngôn ngữ riêng gọi ngôn ngữ máy tính

- Viết chương trình sử dụng từ có nghĩa (thường tiếng Anh)

(3)

Gi¸o ¸n Tin häc - Năm học 2009- 2010

chửụng trỡnh

- Mụ tả máy chiếu việc lệnh cho máy tính thực

Như chương trình đưa vào máy tính phải chuyển đổi thành dạng dạy Bit ( gồm số 1)

D Củng cố - Ghi nhớ

- Làm tập SGK V Rút kinh nghiệm

- Học sinh hiểu bài, biết sử dụng lệnh hàng ngày để đưa vào máy tính - Học sinh tự lấy ví dụ minh họa

- Thời gian đảm bảo - Hồn thành chương trình

 Ngày dạy:

Tiết 3: LAØM QUEN VỚI CHƯƠNG TRÌNH VÀ NGƠN NGỮ LẬP TRÌNH (T1)

IMục tiêu::

- Học sinh biết số khái niệm thuật giải máy tính ngơn ngữ máy tính

- Học sinh biết lệnh sống hàng ngày thực vài ví dụ - Học sinh biết sử dụng ệnh vào toán cụ thể

- Học sinh nghiêm túc tròng học tập

II Chuẩn bị

GV: SGK

HS: Xem trước nhà

IV Tiến trình giảng

Hoạt động Nội dung

Hoạt động 1:Ví dụ chương trình

Để máy tính làm theo u cầu người ta phải cung cấp cho máy tính lệnh

Ví dụ: Để in dịng chữ “ Chào bạn” hình ta phải cung cấp cho máy tính lệnh để xuất dịng chữ hình

Muốn viết lệnh ta cần có ngun tắc khơng?

Ta tìm hiểu cấu trúc chương trình hay lệnh chương trình

Trong chương trình gồm lệnh hay gồm nhiều dòng lệnh khác

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

- Ví dụ : Viết chương trình in hình dịng chữ “chào bạn hình”

chương trình gồm dòng lệnh sau đây:

(4)

Hoạt động 2:Ngơn ngữ lập trình gồm những ?

- Chúng ta quan sát nhìn vào ví dụ đơn giản trên, ta thấy chương trình viết gồm ký tự bảng chữ

- Giống ngôn ngữ khác, ngơn ngữ lập trình gồm bảng chữ riêng mà lệnh chương trình bao gồm bảng chữ

- Ngồi bảng chữ ngơn ngữ lập trình cịn tập hợp qui tắc để sử dụng chương trình

Chẳng hạn kết thúc lệnh dấu chấm phẩy, lệnh đuợc cách nhiều khoảng trắng

Hoạt động 3:Từ khóa tên

- Trong ch¬ng trình trên, ta thấy có từ nh program, uses, begin, end, Đó từ khoá

- Từ khóa từ có nghĩa dành riêng cho chương trình, với ngơng ngữ lập trình khác từ khóa khác

- Như biết chương trình cần có tên để phân biệt với chương trình khác để người sử dụng dễ nhớ tên chương trình mà cần sử dụng có ý nghĩa định

- Tên phải có qui tắc định việc đặt tên: Tên bắt đầu nào, chiều dài tối đa bao nhiêu, tên có trùng với từ khóa hay không?

- Bảng chữ ngôn ngữ lập trình thờng gồm chữ tiếng Anh số kí hiệu khác nh dấu phép tốn (+, , *, /, ), dấu đóng mở ngoặc, dấu nháy, - Các quy tắc : quy định cách viết từ thứ tự chúng

- Cãu leọnh: xác định thao tác mà máy tính cần thực kết đạt đợc

III Từ khóa tên

T khóa : từ dành riêng Pascal không

đặt trùng với từ khóa

And,array,begin,case,const,div,do,downto,end,else,fil e of, forward,function,goto,if,in, label,mod,, not, nul, of, or,procedure, program,set,string,then,to,

type,record,, repeat,until, var , while, with

Tên :Là dãy ký tự Tên tạo chữ cái, chữ số ký tự gạch nối Tên phải bắt đầu bàng chữ khơng có ký tự trắng chiều dài tối đa 127 ký tự, tên không trùng với từ khóa

Củng cố - Ghi nhớ

- Làm tập SGK V Rút kinh nghieäm

- Học sinh hiểu bài, biết sử dụng thành phần ngơn ngữ lập trình - Biết khai báo tên từ khóa chương trình

- Phân biệt đâu tên đâu từ khóa - Học sinh tự lấy ví dụ minh họa

(5)

Gi¸o ¸n Tin häc - Năm học 2009- 2010

 Ngày dạy: 18/9/09

Tiết 4: LAØM QUEN VỚI CHƯƠNG TRÌNH VÀ NGƠN NGỮ LẬP TRÌNH(T2)

IMục tiêu::

- Học sinh biết số khái niệm thuật giải máy tính ngơn ngữ máy tính

- Học sinh biết lệnh sống hàng ngày thực vài ví dụ - Học sinh biết sử dụng ệnh vào tốn cụ thể

- Học sinh nghiêm túc trịng học tập

II Chuẩn bị

GV: SGK HS: Xem trước nhà

III Tiến trình giảng

Hoạt động Nội dung

Hoạt động 1: Cấu trúc chung chương trìn

- Với chương trình mà người sử dụng phải tuân theo cấu trúc định để thực chương trình đem đến kết định

- Tuy nhiên sử dụng người ta chương trình không cần phải làm tất theo cấu trúc chung mà chương trình người ta giảm bớt phần mà chương trình khơng cần thiết

- Tuy nhiên có phần mà khơng thể bỏ qua chương trình

Hoạt động 2: Ví dụ

- Trong phần làm quen với ngơn ngữ lập trình cụ thể, ngơn ngữ Pascal Để lập trình ngơn ngữ Pascal, ta cần có mơi trờng lập trình ngơn ngữ đợc cài đặt máy tính

- Díi minh hoạ việc viết chạy chơng trình cụ thể môi trờng lập trình Turbo Pascal

- Khởi động chương trình Turbo Pascal gõ nội dung ca chng trỡnh - chạy chơng trình, ta nhấn tỉ hỵp phÝm Ctrl+F9

IV Cấu trúc chung chương trình

- 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 c¸c th viƯn (chøa c¸c lƯnh viết sẵn cần sử dụng chơng trình) số khai báo khác

- Phần thân chơng trình gồm câu lệnh mà máy tính cần thực Đây phần bắt buộc phải có

V Ví dụvề ngơn ngữ lập trình- Pascal

1 Chương trình nhập năm sinh,in tuổi:

Program nhapnamsinhintuoi; Var namsinh,tuoi:integer;

Begin

Write(‘Haõy cho biết bạn sinh năm naøo’); Readln(namsinh);

Tuoi:=2008-namsinh;

Write(‘Năm bạn :’,tuoi,’tuổi’); Readln;

End.

2 Chương trình in câu “Xin chao cac ban” hình

Program xinchao;

Begin

Write(‘Xin chào bạn’); Readln;

End.

(6)

- Học sinh hiểu bài, biết sử dụng ví dụ cụ thể vè chương trình Pascal - Biết khai báo tên từ khóa chương trình

- Phân biệt đâu tên đâu từ khóa - Học sinh tự lấy ví dụ minh họa

- Hồn thành chương trình

 Ngày dạy: 25/9/09

Tieỏt 5: Bài thực hành (T1) Làm quen với Turbo Pascal 1 Mc ớch, yờu cu

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ở bảng chọn chän lƯnh

 Gõ đợc chơng trình Pascal n gin

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

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

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

Cách 1: Nháy đúp chuột biểu tợng hình (hoặc bảng chọn Start); 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 th mục TP\BIN)

b) Quan sát hình Turbo Pascal so sánh với hình dới đây:

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 ( ) để di chuyển qua lại bảng chọn

(7)

Giáo án Tin học - Năm häc 2009- 2010

H×nh 12

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 FileF, bảng chọn RunR, )

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

h) Nhấn tổ hợp phím Alt+X để khỏi Turbo Pascal Bài 2. Soạn thảo, lu, dịch chạy chơng trình đơn giản a) Khởi động lại Turbo Pascal gõ dòng lệnh dới đây:

program CTDT; uses crt;

begin

clrscr;

writeln('Chao cac ban'); write('Minh la Turbo Pascal'); end.

Chó ý

- Gõ khơng để sót dấu nháy đơn ('), dấu chấm phẩy (;) dấu chấm (.) dịng lệnh

- Soạn thảo chơng trình tơng tự nh soạn thảo văn bản: sử dụng phím mũi tên để di chuyển trỏ, nhấn phím Enter để xuống dịng mới, nhấn phím Delete BackSpace để xoá

- Câu lệnh uses crt; đợc dùng để khai báo th viện crt, lệnh clrscr; có tác dụng xóa hình Chỉ sử dụng câu lệnh clrscr; sau khai báo th viện crt

b) Nhấn phím F2 (hoặc lệnh FileSave) để lu chơng trình Khi hộp thoại ra, gõ tên tệp (ví dụ

CT1.pas) Save file as (phần mở rộng ngầm định .pas) nhấn Enter (hoặc nháy OK)

c) Nhấn tổ hợp phím Alt+F9 để dịch chơng trình Khi đó, chơng trình đợc dịch kết nh hình 14 sau đây:

H×nh 14

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

d) Nhấn tổ hợp phím Ctrl+F9 để chạy chơng trình quan sát kết

H×nh 15

Nhấn Enter để quay hình soạn thảo

(8)

Ngày dạy : 25/9/09

Tiết 6: Bµi thùc hµnh 1(T2)

Làm quen với Turbo Pascal 1 Mục đích, yêu cu

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ở bảng chọn chọn lệnh

Gõ đợc chơng trình Pascal đơn giản

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

Bài 3. Chỉnh sửa chơng trình, lu kết thúc

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

Hình 16

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

H×nh 17

Lu ý. Qua thơng báo lỗi trên, ta thấy phần thân chơng trình Pascal khóa begin Nói chung câu lệnh Pascal kết thúc dấu chấm phảy (;), riêng từ khóa end. kết thúc phần thân chơng trình ln có dấu chấm (.) kèm

c) Nhấn Alt+X để thoát khỏi Turbo Pascal, nhng không lu chỉnh sửa

TổNG KếT 1. Các bớc thực hiện:

Khi ng Turbo Pascal;

Soạn thảo chơng trình;

Biên dịch chơng trình: Alt + F9;

Chạy chơng trình (Ctrl + F9) ;

2. Pascal không phân biệt chữ hoa, chữ thờng: begin, BeGin, hay BEGIN

3. Các từ khoá Pascal là: program, begin, end

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

5. Nói chung câu lệnh Pascal đợc kết thúc dấu chấm phẩy (;)

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

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

7. Câu lệnh clrscr dùng để xóa hình sử dụng đợc khai báo th viện crt Th viện crt chứa lệnh viết sẵn để thao tác với hình bàn phím

(9)

Gi¸o ¸n Tin häc - Năm học 2009- 2010

Ngy dạy: 02/10/09

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

- Học sinh biết kiểu liệu liệu nhập vào máy tính - Học sinh biết dùng phép toán liệu

- Học sinh biết cách người giao tiếp với máy tính - Học sinh nghiêm túc học tập nghiên cứu học

II Chuẩn bị

GV: SGK, máy chiếu HS: Xem trước nhà

III Tiến trình giảng

Hoạt động Nội dung

Hoạt động 1: Dữ liệu kiểu liệu

-Thông tin đa dạng đưa vào máy tính nên liệu liên quan đến thơng tin đa dạng - Các kiểu liệu khác có chiều dài, giá trị nhận vào kiểu liệu khác

- Một số kiểu liệu hay sử dụng ngơn ngữ lập trình định nghĩa sẵn cách lưu trữ sử dụng kiểu liệu theo vấn đề khác

- Ở ngơn ngữ lập trình Pascal sử dụng liệu kiểu số biến liệu kiểu số thành liệu kiểu chuỗi cách thêm vào trước sau dãy kí số cặp dấu nháy đơn ‘ ‘

Hoạt động 2: Các phép toán với dữ liệu kiểu số

- Trong ngơn ngữ lập trình thực phép tốn số học: cộng, trừ nhân, chia,

- Các phép toán số học ngơn ngữ lập trình Pascal có cách biểu diễn có giống cách viết phép tốn số học bình thường khơng?

I Dữ liệu kiểu liệu

- Các ngơn ngữ lập trình thường phân liệu thành kiểu khác nhau: Chữ, số nguyên, số thập phân, - Các kiểu liệu xử lí theo cách khác - Ngơn ngữ lập trình định nghĩa sẵn số kiểu liệu bản, kiểu liệu xác định giá trị có liệu phép tốn thực hiện:

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

- Một số kiểu liệu ngơn ngữ lập trình Pascal

Tªn kiĨu KÝ hiệu Phạm vi giá trị

Kiểu số

nguyờn Integer Số nguyên khoảng 215 đến 215 

KiÓu sè

thực real Số thực khoảng 10-38 đến 1038 Kiểu kí tự char Mt kớ t bng

chữ

Kiểu xâu string DÃy tối đa gồm 255 kí tự

II.Các phép toán với liệu kiểu số KÝ hiƯu Tên phép toán Kiu liu

+ cộng số nguyªn, sè thùc

 trõ sè nguyªn, sè thùc

* nhân số nguyên, số thực

/ chia số nguyên, số thực

div chia lấy phần nguyên số nguyên mod chia lấy phần d số nguyên Vớ duï:

5/2=2.5 -12/5=-2.4 div =2 -12 div 5=-2 mod 2= -13 mod =-1

- Có thể kết hợp phép tốn số học để trở thành phép toán phức tạp

Ví dụ:

a x b –c+d a*b-c+d

15 + x

a

(10)

- Các phép tốn số học có khác so với phép tốn tính tốn tay hay không?

- Trong trường hợp cần thực lúc nhiều phép tính khác ngơn ngữ Pascal có đáp ứng hay khơng?

- Các phép tốn có ưu tiên khác q trình tính tốn hay khơng?

- Trong phép tốn tính tóan pascal có tn thủ theo qui tắc tính tốn số học hay khơng?

2

5

( 2)

3

x y

x

a b

 

  (x+5)/(a+3)-y/(b+5)*(x+2)*(x+2)

Các qui tắc tính biểu thức số học:

- Các phép toán ngoặc thực trước tiên - Phép toán nhân chia trước

- Cộng trừ theo thứ tự trái sang

Củng cố

Ngày dạy : 02/10/09

Tiết 8: Bài CHƯƠNG TRÌNH MÁY TÍNH VÀ DỮ LIỆU (tt) I Mục tiêu:

- Học sinh biết kiểu liệu liệu nhập vào máy tính - Học sinh biết dùng phép toán liệu

- Học sinh biết cách người giao tiếp với máy tính - Học sinh nghiêm túc học tập nghiên cứu học

II Chuẩn bị

GV: SGK, máy chiếu HS: Xem trước nhà III Tiến trình giảng

HOẠT ĐỘNG NỘI DUNG

HĐ1: Các phép so sánh:

Gv: Yêu cầu hs nhắc lại kí hiệu tốn học ngơn ngữ lập trình?

Hs: Nhắc lại: +, -, *, /, div, mod

1.Các phép so sánh: Kí hiệu

trong

(11)

Gi¸o ¸n Tin häc - Năm học 2009- 2010 Gv: Ngoi cỏc phộp tốn số học, ta cịn có

các kí hiệu toán học quen thuộc dùng để so sánh nào?

Hs trả lời: kí hiệu so sánh tốn học như: =, <, >, #, …

Gv: Kí hiệu phép tốn phép so sánh khác nhau, tùy theo từnmg ngơn ngữ lập trình

Hs: ý lắng nghe

Gv: giới thiệu bảng kí hiệu phép so sánh ngơn ngữ Pascal

Hs: ý quan sát ghi

Gv: kết phép so sánh sai Gv cho vài ví dụ minh họa cụ thể

Hs: ý lắng nghe ghi nhớ

pascal

= Bằng =

<> Khác 

< Nhỏ <

<= Nhỏ

> Lớn >

>= Lớn

Bảng 4

Ví dụ: 3*2> 4; 5=5; 5<>6; … => kết 5*2=9, 22<17, … => kết sai

HĐ2: Giao tiếp người - máy tính

Gv: Em hiểu giao tiếp người máy tính?

Hs: - Giao tiếp người máy tính trao đổi liệu hai chiều người máy tính

Gv: Cho ví dụ cụ thể việc giao tiếp người máy tính?

Hs: VD như: người thường có nhu cầu tính tốn, kiểm tra, điều chỉnh, bổ sung… Ngược lại máy tính cho kết tính tốn, tìm kiếm, gợi ý…đó q trình giao tiếp người máy tính

Gv: gọi hs khác nhận xét Hs: Cho nhận xét

Gv: Nhận xét

Hs: ý lắng nghe ghi

Gv: giải thích thêm trường hợp tương tác trên:

- Thơng báo kết tính toán: yêu cầu chương trình Ví dụ, câu lệnh: write(‘dien tich hinh tron la’,x);

In kết tính diện tích hình trịn sau:

- Nhập liệu: chương trình ngừng chờ người dùng nhập liệu vào tiếp tục

- Chương trình tạm ngừng: tạm ngừng khỏang thời gian định đến người dùng nhấn phím

- Hộp thoại: công cụ cho việc gao

2 Giao tiếp người máy tính:

 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 hợac tương tác người máy tính

 Sau số trường hợp tương tác người máy tính:

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

(12)

chương trình

Hs: ý lắng nghe tiếp thu

Gv: chốt lại: trường hợp nói lên giao tiếp người - máy tính

Hs: lắng nghe

.Củng cố:

Câu hỏi: Thế trình giao tiếp người – máy tính?

 Trả lời: Q 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 hợac tương tác người máy tính

Câu hỏi: Trong NNLT pascal có phép so sánh nào?  Trả lời: =, <>, <, <=, >, >=

IV.dặn dò:

- Học bài, làm tập 6, SGK/ 22 - Xem lại tiết 7, chuẩn bị cho thực hành

Ngaøy daïy : 07/10/09

Tiết 9:

Bài thực hành 2: Viết Chương Trình Để Tính Tốn (T1) I/ Mục tiêu:

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

II/ Chuẩn bị:

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

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

1 ổn định lớp: 2 Bài cũ:

HS1: Hãy phân biệt ý nghĩa câu lệnh Pascal sau đây:

Writeln('5+20=','20+5'); vàWriteln('5+20=',20+5);

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

(13)

Gi¸o ¸n Tin häc - Năm học 2009- 2010 a) 15 ≥ 3; b) (20  15)2≠ 25;

 Trả lời:

a) True; b) Fales

3 trình thực hành:

H 1: Chu n BĐ ẩ ị

HĐ GV HĐ HS

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

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

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

- Hs lắng nghe

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

HĐ GV HĐ HS`

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

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

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

- Gv: gọi hs khác nhận xét -Gv: nhận xét, ghi điểm

- Gv lưu ý thêm: dùng dấu ngoặc đơn để nhóm phép tốn - Gv: trình thực hành phần quan trọng yêu cầu hs nên ghi lại vào

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

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

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

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

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

- Gv lưu ý thêm: biểu thức Pascal đặt câu lệnh writeln để in kết Các em có cách viết khác sau làm quen với khái niệm Biến

- Gv: yêu cầu Hs lưu chương trình với tên CT2.pas sau dịch chạy chương trình để kiểm tra kết nhận hình

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

Hs: làm 1a

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

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

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

Hs: ghi nhớ

Hs: khởi động Pascal làm 1b Hs: thực hành

Hs: lắng nghe, ghi nhớ, thực hành Hs: Trả lời

Hs: ý lắng nghe

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

(14)

H 3: T ng k tĐ ổ ế

HĐ GV HĐ HS

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

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

Hs: kiểm tra máy tính Hs: lắng nghe

4 dặn dị:

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

- Xem trước Ngày dạy: 07/10/09

Tiết 10:

Bài thực hành 2: Viết Chương Trình Để Tính Tốn (TT) I/ Mục tiêu:

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

II/ Chuẩn bị:

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

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

1 ổn định lớp:

2 trình thực hành:

H 1: Chu n BĐ ẩ ị

HĐ GV HĐ HS

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

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

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

- Hs lắng nghe

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

HĐ GV HĐ HS

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

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

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

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

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

- Gv: u cầu hs thực hành theo thứ tự từ câu

Hs: thực hành Hs: trả lời

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

(15)

Gi¸o ¸n Tin học - Năm học 2009- 2010 a đến câu d

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

- Gv: câu c yêu cầu điều gì?

- Gv: yêu cầu hs quan sát kết rút nhận xét

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

- Gv: từ rút nhận xét

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

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

Hs: thực hành, nhận xét kết câu Hs: thêm lệnh delay (5000) vào sau câu lệnh writeln chương trình

Hs: chạy chương trình nhận xét Hs: thực hành

Hs: thực hành Hs: thực hành Hs: Rút nhận xét Hs: lắng nghe Hs: thực hành

H 3: T ng k tĐ ổ ế

HĐ GV HĐ HS

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

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

Hs: kiểm tra máy tính Hs: lắng nghe

5 dặn dò:

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

- Xem trước

Ngày dạy : 14/10/09

Ti t 11ế : SỬ DỤNG BIẾN TRONG CHƯƠNG TRÌNH (T1)

I Mục tiêu:

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

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

II Chuẩn bị:

– GV: Giáo án, tài liệu tham khảo, máy tính – HS: SGK, tài liệu tham khảo, ghi

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

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

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

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

(16)

được nhập lưu nhớ máy tính, sau máy tính thực phép cộng a + b

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

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

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

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

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

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

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

- Khai báo kiểu liệu biến

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

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

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

HS trả lời:

Integer: số nguyên Real: số thực

String: xâu kí tự GV: Giải thích thêm

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

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

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

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

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

VD2: Tính giá trị biểu thức 100+50

3 ;

100+50

5 ghi kết hình

Gán:

X  100 + 50 X  X/3 ; Write (X) X  X/5 ; Write (X) 2 Khai báo biến: Việc khai báo biến gồm: - Khai báo tên biến

- Khai báo kiểu liệu biến VD:

(17)

Gi¸o ¸n Tin häc - Năm học 2009- 2010 - S, dientich l cỏc bin có kiểu thực

(real),

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

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

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

Hoạt động 3: Củng cố

Cho HS thực câu 4/33

Hoạt động 4: Dặn dò

Xem lại đọc trước phần lại Làm câu 4, 6/33

IV/ Củng cố :

- Giáo viên củng cố lại đề mục

- Yêu cầu học sinh nắm vững kiến thức  Ngày dạy : 14/10/09

Ti t 12:ế S D NG BI N TRONG CHỬ Ụ ƯƠNG TRÌNH (T2)

I M c tiêuụ :

– HS bi t khái ni m h ngế ệ ằ

– HS bi t vai trò c a h ng l p trìnhế ủ ằ ậ

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

II Chu n b :ẩ

– GV: Giáo án, tài li u tham kh o, máy tính.ệ ả – HS: SGK, tài li u tham kh o, v ghiệ ả

III Ti n trình d y h c:ế

Ho t đ ng c a GV HSạ ộ ủ N i dungộ

Ho t ng 1:ạ độ ki m tra cể ũ

1 Bi n dùng đ làm gì? (3 m)ế ể ể

2 Cách khai báo bi n? (3 m)ế ể

3 Câu 6/33 (4 m)ể

* áp án: Đ

1 Bi n đ c dùng đ l u tr d li u d li u đ c ế ượ ể ữ ữ ệ ữ ệ ượ

bi n l u tr có th thay đ i th c hi n ế ữ ể ổ ự ệ

ch ng trình.ươ

2 Vi c khai báo bi n g m:ệ ế

(18)

- Khai báo ki u d li u c a bi nể ữ ệ ủ ế

3

a) Var S, a, h: integer b) Var a, b: integer; c, d: real;

Ho t ng 2ạ độ S d ng bi n ch ng trìnhử ụ ế ươ

GV: Sau khai báo, ta có th s d ng bi nể ụ ế

trong ch ng trình Các thao tác có th th c hi n v iươ ể ự ệ

các bi n là:ế

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

GV l u ý HS: Ki u d li u c a giá tr đ c gánư ể ữ ệ ủ ị ượ

cho bi n ph i trùng v i ki u c a bi n đ c gánế ả ể ủ ế ượ

m t giá tr m i, giá tr c c a bi n b xoá Ta có thộ ị ị ũ ủ ế ị ể

th c hi n vi c gán giá tr cho bi n t i b t kì th i mự ệ ệ ị ế ấ ể

nào ch ng trình, giá tr c a bi n có thươ ị ủ ế ể

thay đ i ổ

GV gi i thi u d ng c a câu l nh gán giá tr choớ ệ ủ ệ ị

bi n r i l y VD cho HS ế ấ

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

trong đó, d u ấ  bi u th phép gán Ví d :ể ị ụ

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

xy (bi n ế x đ c gán giá tr c a bi n ượ ị ủ ế y);

ii + (bi n ế i đ c gán giá tr hi n t i c a ượ ị ệ ủ i c ngộ

thêm đ n v ) ị

GV nh n m nh: Tu theo ngơn ng l p trình,ấ ỳ ữ ậ

cách vi t l nh gán c ng có th khác Ví d , trongế ệ ũ ể ụ

ngôn ng Pascal, ng i ta dùng phép gán d u kép "ữ ườ ấ :=" đ phân bi t v i phép so sánh d u b ng (=) ể ệ ấ ằ

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

Ho t ng 3ạ độ H ngằ

GV: Ngồi cơng c đ l u tr d li u làụ ể ữ ữ ệ

bi n, ngơn ng l p trình cịn có công c khác làế ữ ậ ụ

h ngằ Khác v i bi n, h ng đ i l ng có ế ằ ượ giá trị khơng i

đổ su t q trình th c hi n ch ng trình.ố ự ệ ươ

Gi ng nh bi n, mu n s d ng h ng, ta c ngố ế ố ụ ằ ũ

c n ph i khai báo tên c a h ng Tuy nhiên h ng ph iầ ả ủ ằ ằ ả

đ c gán giá tr khai báo ượ ị

Tên h ng c ng ph i tuân theo quy t c đ t tên c aằ ũ ả ắ ặ ủ

ngơn ng l p trình.ữ ậ

GV l y VD v khai báo h ng pascal vàấ ề ằ

3 S d ng bi n chử ụ ế ương trình: Các thao tác có th th c hi n v i bi n làể ự ệ ế

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

- Tính tốn v i bi n ế

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

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

bi nế ;

Trong ngơn ng Pascal, kí hi u phép gán làữ ệ

d u :=ấ

VD: SGK/31

4 H ng: ằ

H ng đ i l ng có giá tr khơng đ iằ ượ ị ổ

trong su t ch ng trìnhố ươ

Vi c khai báo h ng g m:ệ ằ

- Khai báo tên h ngằ

- Gán giá tr cho h ng.ị ằ

VD:

Const pi = 3.14; Bankinh = 2;

(19)

Gi¸o ¸n Tin häc - Năm học 2009- 2010

gi i thớch cho HSả

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

- Các h ng ằ pi, bankinh đ c gán giá tr t ngượ ị ươ

ng 3.14

V i khai báo trên, đ tính chu vi c a hình trịn, taớ ể ủ

có th dùng câu l nh sau:ể ệ

chuvi:=2*pi*bankinh;

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

HS: Vi c s d ng h ng r t hi u qu n u giá trệ ụ ằ ấ ệ ả ế ị

c a h ng (bán kính) đ c s d ng nhi u câuủ ằ ượ ụ ề

l nh c a ch ng trình N u s d ng h ng, c nệ ủ ươ ế ụ ằ ầ

thay đ i giá tr , ta ch c n ch nh s a m t l n, t i n iổ ị ỉ ầ ỉ ộ ầ

khai báo mà khơng ph i tìm s a c ch ngả ả ươ

trình

GV: Chính giá tr c a h ng khơng đ i trongị ủ ằ ổ

su t ch ng trình nên khơng th dùng câu l nh đ thayố ươ ể ệ ể

đ i giá tr c a h ng (nh đ i v i bi n) b t kì v tríổ ị ủ ằ ố ế ấ ị

nào ch ng trìnhươ

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

Ho t ng 4ạ độ C ng củ ố

Nh c l i cách s d ng bi n ch ng trìnhắ ụ ế ươ

H ng đ i l ng nh th nào?ằ ượ ế

Cách khai báo h ng?ằ

Nêu s gi ng khác gi a h ng vàự ố ữ ằ

bi n, cách khai báo?ế

Ho t ng 5ạ độ D n dòặ

Xem l i đ c tr c th c hành 3ạ ọ ướ ự

Làm câu 1, 2, 3, 5/33

đ i giá tr c a h ng (nh đ i v i bi n) ổ ị ủ ằ ố ế

b t kì v trí ch ng trìnhấ ị ươ

IV/ Củng coá :

- Yêu cầu học sinh nắm vững cách khai báo biến sử dụng biến

(20)

Ngày dạy : 21/10/09 Tiết : 13-14 : BAØI THỰC HAØNH SỐ 3

KHAI BÁO VAØ SỬ DỤNG BIẾN

I/ Mục đích yêu cầu :

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

cho bieán

- Kết hợp lệnh write(), writeln(), read(), readln() để thực việc nhập

liệu từ bàn phím

- Hiểu kiểu liệu

II/ Chuẩn bị :

- Giáo viên: Máy tính, bảng kiểu liệu trng Pascal - Học sinh: Chuẩn bị thực hành trước nhà

III/ Tiến trình dạy :

Hoạt động GV HS Nội Dung GV : Đưa bảng kiểu liệu

Pascal: Giải thích tên kiểu liệu, phạm vi giá trị (các giá trị biến nhận )

GV nêu cách khai báo biến, giải thích

GV Lấy ví dụ SGK, giải thích ví dụ Hỏi : Nếu khai báo Var x, y : byte;

1/ Các kiểu liệu Pascal cách khai báo biến với kiểu liệu a/ Các kiểu liệu Pascal

Tên kiểu liệu Phạm vi giá trị Byte Các số nguyên từ o

-> 255

Integer Các số nguyên từ -215

đến 215-1.

Real Số thực có giá trị tuyệt đối

khoảng 2.9x10-39 đến

1.7x1038 số 0

Char Các ký tự bảng chữ

String Các dãy gồm tối đa 255 ký tự

Var <danh sách biến>:<kiểu liệu>; Trong đó:

- Danh sách biến danh sách

hoặc nhiều tên biến cách dấu phẩy ( , )

- Kiểu liệu

(21)

Giáo án Tin học - Năm häc 2009- 2010

Trong chương trình có lệnh gán x:= 256; hay x := -5 có khơng ?

HS: Khong phạm vi giá trị nằm phạm vị kiểu liệu byte

HS : Đọc đề tốn, soạn thảo lập trình

Cơng thức :

Tiềnthanhtốn = đơngiá x sốlượng+phídịchvụ

Lưu chương trình với tên Tinhtien.Pas dịch chỉnh sửa lỗi, có

HS làm việc theo nhoùm

HS : đọc đề

GV: lấy ví dụ có cốc nước A mực đỏ, B chứa mực xanh, tráo đổi cho A chứa mực xanh, B chứa mực đỏ?

Caùch : A->C; B-> A; C -> B Caùch : B -> C; A -> B; C -> A

Var x, y : byte;

Var so_nguyen : intger; Var ho_ten: string;

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

a/ Chương trình: 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 } Write ( ‘ dongia = ‘); Readln ( dongia);

Write ( ‘ soluong=’); Readln ( soluong);

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

Writeln ( thongbao, thanhtien :10:2); Readln

End 3/ Baøi :

Program hoan_doi; Var x,y,z : integer ; Begin

Read( x, y);

Writeln ( x, ‘ ‘ , y); Readln

End IV/ Củng cố :

- Đọc, hiểumục tổng kết

- Làm tập lập trình tính diện tích chu vi hình chữ nhật độ dài cạnh nhập từ

(22)

Ngày dạy : 28/10/09

Tiết 15: BÀI TẬP

I Mục tiêu:

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

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

 Gv: giáo án

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

1 Kiểm tra cũ: 2 Bài mới:

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

Hoạt động 1: sửa tập - Gv hỏi Hs có tập khơng thể giải

- Hs nêu câu hỏi

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

- Hs ý lắng nghe

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

- Hs đọc đề

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

- Hs làm

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

- Hs: lằng nghe, ghi nhớ

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

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

2. Các tên hợp lệ: a, Tamgiac, beginprogram, b1, abc, tên không hợp lệ: 8a (bắt đầu sè), Tamgiac (cã dÊu c¸ch), end (trïng víi tõ khãa)

3. a) Chơng trình chơng trình Pascal đầy đủ hoàn toàn hợp lệ, chơng trình chẳng thực điều Phần thiết phải có chơng trình phần thân chơng trình đợc đảm bảo hai từ

begin end. (có dấu chấm)

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

(23)

Giáo án Tin học - Năm học 2009- 2010 - Hs đọc đề

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

- Hs làm

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

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

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

- Hs đọc đề

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

- Hs làm

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

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

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

- Hs đọc đề

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

- Hs làm

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

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

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

- Hs đọc đề

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

- Hs làm

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

xâu, phải viết dãy số cặp dấu nháy đơn (’)

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

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

Hai lệnh Writeln('100'); Writeln(100); không tơng đ-ơng với lệnh in hình xâu ký tự biểu diễn số 100 lệnh in hình số 100

6. Các biểu thøc Pascal:

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

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

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

2

(a b) x

y

 

2

b ac

2

(2 )

a b c

1 1

1

2 2.3 3.4 4.5

(24)

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

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

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

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

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

- Hs đọc đề

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

- HS làm

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

- Gv nhận xét - Hs lắng nghe Hoạt động 2

IV/ củng cố, dặn dò

- Gv ý với Hs điểm hay sai Hs - Hs: lắng nghe rút kinh nghiệm

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

Sự chuẩn bị Hs

- Gv dặn dò: Hs nhà xem trước phần 1, phần mềm Finger Break Out

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

TiÕt 16: kiÓm tra tiết I Mục tiêu học.

1.Kiến thức

- Biết số chơng trình mô tả thuật toán cách liệt kê lệnh Biết sơ bé vÒ NNLT Pascal

- Biết cấu trúc chơng trình, thành phần sở NNLT pascal - Biết lệnh vao/ra đơn giản

(25)

Giáo án Tin học - Năm học 2009- 2010 - Hiểu đợc lệnh gán

2 Kỹ

- Mụ t thut toỏn n gin liệt kê bớc - Viết lệnh chơng trình Pascal

II Mức độ

1.NhËn biết:

Nhận biết lỗi sai lập trình Thông hiểu

Hiểu cú pháp c©u lƯnh 3.VËn dơng

Viết chơng trình

(26)

Ngày soạn : 19/10/2008 Ngày dạy : 20/10/2008

Tuần

Tiết 17->18 : LUYỆN GÕ PHÍM NHANH VỚI FINGER BREAK OUT

I Mục tiêu:

 Giúp học sinh luyện gõ phím nhanh xác

 Bước đầu giúp hs biết cách khởi động phần mềm, biết thành phần hình phần mềm

II Chuẩn bị:

 Gv: giáo án, máy chiếu  Hs: sách giáo khoa III Tiến trình giảng dạy:

HOẠT ĐỘNG GV & HS Nội Dung

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

Gv giới thiệu mục đích sử dụng phầm mềm

Hs: lắng nghe

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

Mục đích trị chơi luyện gõ bàn phím nhanh, xác

HOẠT ĐỘNG Nội Dung

Hoạt động 2: hình của phần mềm

- Gv hỏi Hs cách để khởi động phần mềm nói chung

- Hs trả lời: nhắp đúp chuột lên biểu tượng phần mềm hình Desktop

- Gv gợi ý: cách khởi động phần mềm Finger Break Out giống phần mềm khác gọi Hs khởi động phần mềm

- Hs thực

- Gv giới thiệu thành phần phần mềm

- Hs ý lắng nghe ghi nhớ - Gv gọi Hs nhắc lại thành phần phần mềm

- Hs trả lời

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

Khởi động phần mềm:

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

2 Giới thiệu hình chính:

(27)

Giáo án Tin học - Năm häc 2009- 2010 - Gv gọi HS nhận xét

- Hs nhận xét - Gv nhắc lại

- Hs ý lắng nghe

- Gv thực mẫu thao tác để dừng trò chơi

- Hs: ý quan sát - Gv gọi Hs thực lại - Gv thực

- Gv gọi Hs khác nhận xét - Hs nhận xét

- Gv nhận xét

- Hs lắng nghe ghi nhớ

- Gv yêu cầu Hs nhắc lại cách để thoát khỏi phần mềm

- Gv gọi Hs thực lại cách để thoát khỏi phần mềm

- Hs: thực - Gv nhận xét - Hs: lng nghe

Các thành phần hình cđa phÇn mỊm gåm:

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

 Khung trèng phÝa hình bàn phím khu vực chơi Khung bên phải chứa lệnh thông tin lợt

chơi Ví dụ, ô Level chọn mức khó khác trò chơi: Bắt đầu (Beginner), Trung bình (Intermediate) Nâng cao (Advanced)

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

- Nếu muốn dừng chơi, hÃy nháy chuột lên nút Stop khung bên phải

- Muốn thoát khỏi phần mềm, nháy nút nhÊn tỉ hỵp phÝm Alt+F4.

 Ngày soạn :

Ngày dạy :

Tiết 19->20: LUYỆN GÕ PHÍM NHANH VỚI FINGER BREAK OUT

I Mục tiêu:

 Giúp học sinh luyện gõ phím nhanh xác

 Bước đầu giúp hs biết cách khởi động phần mềm, biết thành phần hình phần mềm

II Chuẩn bị:

(28)

III Tiến trình giảng dạy:

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

Hoạt động GV & HS Nội Dung

GV hướng dẫn HS cách ngồi cách chơi

HS quan sát hình thao tác GV thực

GV lưu ý HS:Trên hình cịn có cầu lớn Nếu cầu chạm đất, em lượt chơi Nếu chơi điểm cao người chơi thưởng thêm cầu lớn

HS tiến hành chơi máy cá nhân Mỗi nhóm HS/máy

Điểm khuyến khích chơi đạt điểm cao: 10 đ: 6000đ (tối đa lượt chơi) 9đ: 5000đ (tối đa lượt chơi) 8đ: 4000đ (tối đa lượt chơi) 7đ: 3000đ (tối đa lượt chơi) 6đ: 2000đ (tối đa lượt chơi) 5đ: 1000đ (tối đa lượt chơi)

Dưới 5: không đạt yêu cầu

HĐ 4:

IV/ Củng cố - Gv nêu câu hỏi củng cố:

 Mục đích sử dụng phần mềm  Các thành phần phần mềm  Cách để ngừng trò chơi



Ngày soạn : Ngày dạy :

Tiết 21 – 24 : TÌM HIỂU THỜI GIAN VỚI PHẦN MỀM SUNTIME I/ Mục tiêu :

- Kiến thức :

+ Học sinh biết cách khởi động thoát khỏi phần mềm suntime + Hiẻu chức phần mềm

+ Biết sử dụng phần mềm tìm hiẻu địa danh giới, tìm hiểu tượng kỳ thú thiên nhiên

+ Tìm hiểu sâu kiến thức địa lý - Kỷ :

+ Thực tốt cách khởi động thoát khỏi phần mềm

(29)

Gi¸o ¸n Tin học - Năm học 2009- 2010

II/ Chuẩn bị :

- Giáo viên : Máy tính Máy chiếu - Học sinh:

III/ Tiến trình dạy :

Nội dung H/Đ thầy trò

Hoạt động :

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

 Sun Times nhóm chuyên

gia thiên văn học thiết lập nhằm gây quĩ ủng hộ mơi trường chống nghèo đói trái đất

 Là phần mềm miễn phí

 Chức Sun Times

cho phép quan sát nhận biết khái niệm thời gian trái đất

 Quan sát nhận biết vị trí

màn hình

 Phóng to vùng đồ

 Nhận biết thời gian ngày đêm  Xem thông tin chi tiết vị trí  Đặt thời gian quan sát theo ý muốn  Tìm vị trí có thơng số thời gian

giống

 Tìm kiếm nhật thực

 Cho thời gian chuyển động tự động 2/ Màn hình phần mềm

a/ Khởi động :

 Start \ All programs \ Sun times \ Sun Times

v5.0

 Hoặc kích vô biểu tượng Sun times

nền Decktop

b/ Màn hình

- Màn hình đồ nước toàn giới

- Vùng sáng tối – ban ngày ban đêm

- Đường vạch liền : ranh giới ban ngày ban đêm gọi đường phân chia thời gian sáng tối

c/ Thoát khỏi phần mềm Lên File → Exit

HS : đọc SGK

GV : Ứng dụng phần mềm

GV Thao taùc máy tính mô tả hình

(30)

 Hoặc nhấn tổ hợp phím Alt+F4

Hoạt động :

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

a/ Phóng to quan sát vùng đồ chi tiết: Phĩng to quan sát vùng đồ chi tiết: dùng chuột phải kéo thả

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

- Vùng sáng : ban ngày - Vùng tối : Ban ñeâm

- Đường phân chia thời gian

c/ Quan sát xem thông tin chi tiết thành phố :

Nháy chuột lên vị trí đánh dấu đồ

d/ Quan sát vùng đệm ngày đêm:

- Vùng sáng tối: Thời gian thời chuyển đổi sáng – tối - Giữa vùng đệm có đường vạch

liền: đường thời gian mặt trời mọc mặt trời lặn taih đường chân trời

e/ Thay đổi thời gian quan sát: - Thay đổi thời gian : Nháy chuột

lên nút trạng thái thời gian

- Đêm trắng : Mặt trời chưa lặn hết mọc

- Ngày đen : Mặt trời chưa kịp mọc lặn

4/ Một số chức khác :

 a/ Hiện khơng hình ảnh bầu trời

theo thời gian:

Option → Maps hủy chọn mục Show sky color

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

Option → Maps hủy chọn mục Hover Update

 c/ Tìm địa điểm có thơng tin thời

gian ngày giống nhau:

Option → Anchor chọn mục Sunris

Tìm kiếm quan sát nhật thực:

- Chọn địa điểm muốn tìm Lên View → Eclipse

_ GV Cho HS tìm vị trí khác có thời gian với Hà nội

HS : thao tác tìm kiếm

GV : Hướng dẫn hs tìm kiếm nhật thực vị trí trái đất

(31)

Gi¸o ¸n Tin häc - Năm học 2009- 2010

- Tỡm kim tng lai - Tìm kiếm khứ Hoạt động :

Thực hành :

Bài : Phóng to quan sát vùng đồ chi tiết:

Baøi 2: Quan sát xem thông tin chi tiết thành phố

Bài : Đặt thời gian quan sát

Bài : Xem vị trí có thời gian ngày giống

Bài : Tìm kiếmvà quan sát vị trí nhật thực trái đất

Bài : Đặt chế độ quan sát thời gian chuyển động tự động

HS: Làm việc theo nhóm GV gọi thành viên trả lời



Ngày soạn : 16/11/2009 Ngày dạy : 17/11/2009

Tiết 25 – 26 : TỪ BÀI TỐN ĐẾN CHƯƠNG TRÌNH I/ Mục tiêu :

Khái niệm toán, thuật toán

- Các bớc giải toán máy tính - Mô tả thuật toán phơng pháp liệt kê Kĩ năng:

- Biết khái niệm toán, thuật toán

- Xác định đợc Input, Output toán đơn giản - Biết mơ tả thuật tốn phơng pháp liệt kê

II/ Chuẩn bị :

- Giáo viên : Giáo án

- Học sinh : Chuẩn bị nhà III/ Tiến trình dạy :

Nội dung H/Đ thầy trò

Hoạt động 1:

1/ Bài toán xác định tốn:

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

Ví dụ : Tính S hình tam giác

-ĐKCT : cạnh chiều cao tương ứng với cạnh

GV: Lấy ví dụ SGK - Tính tổng 10 số tự

(32)

-KQTĐ: S hình tam giác

- Để xác định toán cụ thể ta cần xác định rõ điều kiện cho trước kết thu 2/ Quá trình giải tốn máy tính :

- Giải tốn máy tính giao cho máy tính cách thực hoạt động cụ thể qua bước để từ đk cho trước ta nhận kết cần thiết

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

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ể

GV : cho ví dụ tính S tam giác yêu cầu HS xác định toán ?

HS : Xác định toán

GV : Hướng dẫn HS quy trình giải tốn máy tính?

 Q trình giải tốn máy tính

gịmm ba bước: + Xác định tốn + Mơ tả thuật tốn + Viết chương trình

Hoạt động 2:

3/ Thuật tốn mơ tả thuật toán:

VD1 : Thuật toán pha trà

VD2: thuật tốn chuẩn bị trứng tráng

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

Ví dụ : 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 bán kính a hình vẽ :

HS : nắm bát khái niệm GV : Quy trình giải tốn máy tính gồm bước?

HS : trả lời

(33)

Gi¸o án Tin học - Năm học 2009- 2010

- Xác định toán :

- Input : Số a ½ chiều rộng HCN bán kính hình bán nguyệt, b chiều dài HCN

- Output: Diện tích hình A - Thuật toán:

+ B1 : S1<- 2ab ( S HCN )

+ B2 : S2 <-

2

2

a

+ B3 : S <- S1 + S2

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

 Xác định toán :

+ ĐKCT : dãy số tự nhiên ( 1-100) +Kqtđ : giá trị Sum = 1+2+… 100

+ B1 : Sum <- +B2: Sum<-Sum+1 ………

+ B101 : Sum <- Sum + 100

GV : Cho HS thảo luận

HS : chia hình to thành hình nhỏ để tính S

Xác định tốn

Nhắc lại cơng thức tính S HCN, S Htròn

GV : Lưu ý cách làm khác cuối thu kết

GV : Cho HS xác định tốn tính tổng

HS : Xác định tốn

IV / Củng cố :

- Đọc hiểu mục ghi nhớ

- Làm hỏi tập SGK : 1, 2,

Tiết 27 – 28 : BÀI TẬP I/ Mục tiêu :

- Giúp học sinh đọc hiểu đề

- Giúp học sinh giải tập sách giáo khoa

(34)

II/ Chuẩn bị :

- Giáo viên : tập

- Học sinh : chuẩn bị trước nhà III/ Tiến trình dạy :

Nội dung H/Đ thầy trò

Hoạt động :

Bài tập 1: Tìm chỗ sai lệnh khai báo sau sửa lại :

a/ Var Star, Begin : real; b/ Const x:= 3.14; y:= 1000; c/ Var a:= 5;

d/ Coùnt ten lop = ‘ 81 ‘;

e/ Var xep_loai, diem : integer, real;

Bài tập 2: Em viết chương trình Pascal để tính chu vi diện tích hình trịn với bán kính nhập từ bàn phím

Bài tập 3 : Em liệt kê lỗi ( có) chương trình Pascal sửa lại cho

Const Pi := 3.14; 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

Hoạt động :

Bài tập : Em xếp lại cho thứ tự công việc em thực buổi sáng ngày tuần : a/ Chào bố mẹ;

b/ Đánh rửa mặt; c/ Thức dậy;

d/ Aên saùng;

GV : cho tập yêu cầu HS tìm chỗ sai sửa lại ?

HS : Làm tập GV : Nhận xét

GV : yêu cầu viết chương trình Pascal theo đề bên ?

HS : viết chương trình

GV : Cho HS quan sát đoạn chương trình liệt kê lỗi có?

HS : Quan sát tìm lỗi sai sửa lại

GV : Cho HS quan sát thuật toán sau yêu cầu HS xếp lại ?

(35)

Gi¸o ¸n Tin häc - Năm học 2009- 2010

e/ i n trng;

Bài tập : Em xác định mô tả thuật tốn tìm số lớn ba số a, b, c ?

Bài tập : Giả sử điểm kiểm tra môn tin học lớp n học sinh cho n biến số thực a1,a2, …, an,

ai điểm kiểm tra học sinh thứ I,

với I = 1, 2, … , n Hãy tính điểm trung bình mơn tin học lớp

a/ Xác định thuật tốn b/ Mơ tả thuật tốn

GV : yêu cầu HS xác định mô tả thuật tốn tìm số lớn ba số? HS : Làm

GV : Yêu cầu HS xác định mơ tả thuật tốn toấn bên

HS : làm

GV : cho HS nhận xét

IV/ Củng cố :

- Qua hai tiết tập yêu cầu HS nắm vững kiến thức - Về nhà làm tập lại SGK

- Chuẩn bị truớc



Tiết 29- 30 : CÂU LỆNH ĐIỀU KIỆN I/ Mục tiêu :

- Học sinh biết hoạt động phụ thuộc vào điều kiện

- Nắm tính sai điều kiện thơng qua ví dụ

- Rèn luyện kỹ phân biệt hoạt động phụ thuộc vào điều kiện sống

II/ Chuẩn bị :

Chuẩn bị giáo viên: Giáo án, ví dụ

Chuẩn bị học sinh: Vở, bút, thước dài, phấn

III/ Tiến trình dạy :

NỘI DUNG HOẠT ĐỘNG CỦA GV&HS

Hoạt động 1: Kiểm tra cũ (4’)

GV: Em mô tả thuật tốn tím giá trị lớn hai số?

HS: Bước : Max:= a (hoặc Max:=b);

(36)

GV: Nhận xét câu trả lời bạn? GV: Nhận xét ghi điểm

Hoạt động 2: Hoạt động phụ thuộc vào điều kiện (16’)

GV: Lấy ví dụ sống mà có phụ thuộc vào điều kiện phân tích cho hs hiểu

GV: Lấy ví dụ hoạt động có phụ thuộc vào điều kiện?

GV: Các hoạt động có liên quan đến từ gì?

Kết luận:

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

Hoạt động Tính sai điều kiện (20’)

GV: Cho hs quan sát lên b ng ph n k t qu sai vào ả ụ ề ế ả

c t k t qu ? Ho t đ ng nhóm phútộ ế ả ộ Điều

kiện Kiểm tra

Kết

Hoạt động Trời

khơng mưa?

Buổi chiều nhìn ngồi trời thấy

trời khơng mưa

? ?

Đi chơi bóng Ở nhà Em bị

ốm?

Cảm thấy khoẻ mạnh

? ?

Ở nhà Đi học

GV: Đại diện nhóm trả lời, nhóm khác nhận xét? GV: Nhận xét bổ sung

Kết luận:

- Khi kết kiểm tra đúng, ta nói điều kiện thỏa mãn, kết kiểm tra sai, ta nói điều kiện không thỏa mãn

GV: Yêu cầu hs lấy ví dụ tính đung sai điều kiện tin hoc?

GV: Nhận xét ví dụ hs

GV: Lấy thêm số ví dụ cao tin học có phụ thuộc vào điều kiện cho hs

Hoạt động 1: Kiểm tra cũ (3’)

GV: Em nêu ví dụ hoạt động hàng ngày em có phụ thuộc vào điều kiện? Phân tích? GV: Yêu cầu hs nhận xét câu trả lời bạn? GV: Nhận xét ghi điểm

Hoạt động 2: Điều kiện phép so sánh (10’)

GV: Em nêu trường hợp xảy

HS: Nhận xét

HS: Lắng nghe HS: Lấy ví dụ

HS: Bắt đầu từ “nếu”

HS: Hoạt động nhóm

HS: Đại diện nhóm trả lời, nhóm khác nhận xét

HS: Lấy ví dụ HS: Lắng nghe

HS: Trả lời

HS: Nhận xét

(37)

Gi¸o ¸n Tin häc - Năm học 2009- 2010

thc hin phộp so sỏnh toán học?

GV: Khi thực phép so sánh kết gì? GV: Lấy ví dụ minh họa

GV: Mô tả điều kiện phép so sánh tốn in hình lớn giá trị biến?

GV: Nhận xét bổ sung

Kết luận:

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

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

Hoạt động 3: Cấu trúc rẽ nhánh (27’)

GV: Trình bày cho hs cấu trúc rẽ nhánh? GV: Lấy ví dụ cấu trúc rẽ nhánh mà em biết?

Ví dụ 1: Một cửa hàng bán bia thực đợt khuyến mãi, mua bia với số tiền từ triệu đồng trở lên khách hàng giảm 30% tổng số tiền tốn Mơ tả hoạt động tính tiền cho khách

GV: Hoạt động theo nhóm phút làm ví dụ GV: Đại diện nhóm trả lời, nhóm khác nhận xét Gv nhận xét bổ sung

Ví dụ 2: Một cửa hàng bán bia thực đợt khuyến mãi, mua bia với số tiền từ triệu đồng trở lên khách hàng giảm 30% tổng số tiền toán giảm 5% cho khách hàng mua với số tiền không đến triệu đồng Mô tả hoạt động tính tiền cho khách

GV: Yêu cầu hs hoạt động theo nhóm phút làm ví dụ

GV: Đại diện nhóm trình bày, nhóm khác nhận xét GV: Nhận xét bổ sung

GV: Từ ví dụ rút kết luận gì?

GV: Từ kết luận em vẽ sơ đồ cấu trúc rẽ nhánh?

Kết luận:

- Sơ đồ cấu trúc rẽ nhánh

- Cấu trúc rẽ nhánh giúp cho việc lập trình đơn giản hơn, ngơn ngữ lập trình có câu lệnh để thực cấu rẽ nhánh

HS: Đúng sai HS: Lắng nghe HS: Mô tả

HS: Lắng nghe HS: Lấy ví dụ

HS: Hoạt động theo nhóm HS: Đại diện nhóm trả lời

HS: Hoạt động theo nhóm HS: Đại diện nhóm trả lời HS: Rút kết luận

(38)

IV/ Củng cố :

- Nêu phép so sánh Pascal mà em biết? Kết phép so sánh gì? Cho ví dụ cụ thể?

- Có dạng cấu trúc rẽ nhánh? Nêu dạng? Cho ví dụ cấu trúc rẽ nhánh dạng đủ?

- Làm tập 3, sgk trang 51.Biểu dương số nhóm làm tốt Nhận xét đánh giá tiết học



Tiết 31- 32 : SỬ DỤNG LỆNH ĐIỀU KIỆN IF … THEN I/ Mục tiêu :

- Viết đợc câu lệnh điều kiện if… then chơng trình

- Rèn kỹ ban đầu đọc chơng trình đơn giản hiểu đợc ý nghĩa thuật tốn sử dụng chơng trình

II/ Chuẩn bị :

GV: Bài soạn, SGK, Phịng máy tính, đồ dùng dạy học HS: Vở ghi, SGK, phiếu học tập, đồ dùng học tập

III/ Tiến trình dạy :

Nội dung H/Đ thầy trò

Hoạt động :

1 Mục đích, yêu cầu

2.Néi dung

Câu lệnh điều kiện dạng thiếu: Nếu <điều kiện> < câu lệnh>; If <điều kiện> then < câu lệnh>; Câu lệnh điều kiện dạng đủ:

Nếu < điều kiện) < câu lệnh 1> không

< câu lệnh 2>;

If < điều kiện) then < câu lệnh 1> Else

< câu lệnh 2>;

Bài 1

a)Mô tả thuật toán b)Gõ chơng trình

c)Tìm hiểu ý nghĩa cÇu lƯnh

GV :Nêu mục đích u cầu HS : Chú ý.

GV: Đa bảng câu lệnh rẽ nhánh dạng thiếu đủ.

Câu lệnh điều kiện dạng thiếu: Nếu <điều kiện> < câu lệnh>; If <điều kiện> then < câu lệnh>; Câu lệnh iu kin dng :

Nếu < điều kiện) < câu lệnh 1> không

< câu lệnh 2>;

If < điều kiện) then < câu lƯnh 1> Else

< c©u lƯnh 2>; HS: Chó ý ghi bai HS: Đọc tập 1

(39)

Gi¸o ¸n Tin häc - Năm học 2009- 2010

Bài 2

a) Khi động gõ chơng trình b)Lu tên chơng trình aicaohon.pas c)Chạy chơng trình với liệu. d)Sửa chơng trình

Bµi SGK

Write(‘Nhap ba so a,b va c); {hiện thị thông báo}

Readln(a,b,c) {nhập vào sè}

If (a+b>c) and (b+c>a) and (a+c>b) then {nếu bt1 bt2 bt3 thì} Writeln(‘a,b,c la canh cua tam giac’) {hiển thị thông báo}

Else

{nếu bt1 bt2 bt3 sai thì}

Writeln(‘a,b,c khong phair la canh cua tam giac)

{hiển thị thông báo}

HS: Làm ý a mô tả thuật toán GV:Nhận xét bæ sung

KÕt luËn

Tổ chức thực hành máy Hoạt động nhóm thực ý b, 3. GV: Quan sát, hớng dẫn

NhËn xÐt, kÕt luËn

GV: 02 HS đọc toán. GV: Gợi ý yêu cầu

a)Khởi động gõ chơng trình b)Lu tên chơng trình aicaohon.pas c)Chạy chơng trình với b d liu.

d)Sửa chơng trình

Tổ chức HS thực hành máy tập

Thực hành

Quan sát, hớng dẫn

Nhn xột nhóm làm, cho điểm HS:02 em đọc

GV: Yêu cầu HS thực gõ ch-ơng trình SGK vµ híng dÉn

Tỉ chøc HS thùc hµnh máy tập

HS: Thực hành

GV: Quan sát, hớng dẫn

Tìm hiểu ý nghĩa câu lệnh

HS tr li ỏp cỏc câu hỏi

IV/ Củng cố :

GV: Tóm tắt kiến thức trọng tâm làm GV: Nêu phần tổng kết thực hành HS: Chú ý ghi



Tiết 33 : KIỂM TRA TIẾT THỰC HAØNH I/ Mục tiêu :

- Kiến thức : Biết cách xác định toán mơ tả thuạt tốn

I - Mơc tiªu

Kiến thức: Kiểm tra chất lơng thao tác từ bi n bi

2 Kỹ Năng: Các thao tác ban đầu làm việc với trang tÝnh

II - ChuÈn bÞ

1 Giáo viên: Giáo trình, đề bài, phịng máy

2 Häc sinh: Học chuẩn bị nhà

III - Phơng pháp

(40)

IV - Tiến trình dạy Đề Cho chơng trình Program Kiem tra;

Var a,b,max:real BEGIN

Writeln('TIM SO LON NHAT TRONG HAI SO A, B'); Writeln(' -'); Write('Nhap a='); Readln(a);

Write('Nhap b='); Readln(b); max:=a;

If b< max then max =b;

Writeln('So lon nhat la:',max:4:2); Readln;

End

Yêu cầu:

1 Hãy nhập lại chương trình Và chữa lại lỗi có? (4 điểm) Hãy dựa vào chương trình để sữa lại chương trình tìm số lớn

trong số A, B, C(5 điểm)

3 Lưu chương trình với tên em VD (TrangA) (1 điểm) D - Cđng cè

- Ơn lại kiến thức học, thực hành máy có điều kiện



Tiết 34- 35 : ƠN TẬP

I - Mơc tiªu

KiÕn thøc

- KiĨm tra viƯc n¾m b¾t kiÕn thøc cđa học sinh từ đầu năm học - Chuẩn bị kiểm tra häc kú I

- §iỊu chØnh viƯc häc học sinh nh việc dạy giáo viên Kỹ Năng

- Hình thành cho học sinh kỹ quan sát, phân tích, t tổng hợp II - Chuẩn bị

(41)

Giáo án Tin học - Năm học 2009- 2010

Hoạt động thầy & trò Nội dung dạy

Giáo viên đa chủ đề kiến thức lý thuyết học chơng trình học kỳ I

- Yêu cầu học sinh theo cá nhân lần lợt giải đáp chủ đề lý thuyt ú

GV: Ra tập (treo bảng phụ) vµ híng dÉn häc sinh lµm bµi

- Để học sinh làm GV: Đa đáp án

GV: Đa tập (phat phiếu học tập cho häc sinh)

- Híng dÉn häc sinh lµm

HS: Quan sát ghi chép - Nhớ lại trả lời

HS: Quan sát, nghe hớng dẫn làm - So sánh với máy xung quanh - Chữa sai

HS: Quan sát bµi tËp

- Nghe hìng dÉn vµ thùc hµnh lµm bµi

Hoạt động 1: 1 Lý thuyết

- Máy tính chơng trình máy tính - Các kiểu liệu TP

- Các phép toán kiểu liệu - Cách sữ dụng biến chơng trình - Cú pháp câu lệnh diều kiƯn 2 Bµi tËp

a) Bµi 1: Nhập vào cạnh hình

chữ nhật In hình diện tích chu vi 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

Hoạt động :

a. Bµi tËp 2.Tìm số lớn hai số nguyên A, B

Program Kiem tra; Var a,b,min:real BEGIN

Writeln('TIM SO BE TRONG HAI SO A, B');

Writeln(' -'); Write('Nhap a='); Readln(a); Write('Nhap b='); Readln(b); min:=a; If b< then min: =b;

(42)

IV - Cñng cè

- Nhắc lại bớc sử dụng hàm để tính tốn - Nhận xét làm học sinh

Tiết 36- 37 : THI KIỂM TRA HỌC KỲ I

I - Mơc tiªu

Kiến thức: - Các thành phần trang tính. - Các khái niệm đơn giản ban đầu trang tính

Kỹ Năng:- Các thao tác ban đầu làm việc với trang tính. II - Chuẩn bị

1 Giáo viên: Giáo trình, đề bài.

2 Häc sinh: Học chuẩn bị nhà.

III- Tiến trình dạy

Đề bài

I TRAẫC NGHIỆM:(4,0 điểm)

Chọn đáp án cách bôi đen phương án phiếu trả lời đây:

Caâu 1 2 3 4 5 6 7 8

Đáp án

A A A A A A A A

B B B B B B B B

C C C C C C C C

D D D D D D D D

Câu 1: Cấu trúc chung chương trình gồm phần nào.

A Phần khai báo; B Phần khai báo Phần thân chương trình;

C Phần thân chương trình; D Bắt đầu BEGIN kết thúc END

Câu 2: Từ khơng phải “từ khố” chương trình.

A Tinhoc; B Uses; C Begin; D

Program;

Câu 3: Câu lệnh Uses Crt; đặt phần chương trình. A Phần thân chương trình; B In lên hình; C Lau hình; D Phần khai báo;

Câu 4: Khai báo biến số học sinh (Hs) THCS lớp ta nên dùng lệnh:

(43)

Gi¸o ¸n Tin häc - Năm học 2009- 2010

Caõu 5: Caõu lệnh Const Tinhoc = 8; có tác dụng:

A Khai báo Tinhoc lớp 8; B Khai báo biến Tinhoc lớp 8; C Khai báo Tinhoc = 8; D Khai báo biến Tinhoc = 8; Câu 6: Muốn in lên hình dịng chữ “Chao cac ban” ta dùng lệnh:

A Chao cac ban := integer; B Read(‘Chao cac ban’); C Var Chao cac ban:String; D Writeln (‘Chao cac ban’); Câu 7: Lệnh nhập liệu cho biến x viết là:

A Readln(x); B Write(x); C Writeln(x) D

ClrScr(x);

Câu 8: Cho x số thực; muốn in số thực x với độ rộng có chữ số thập phân ta dùng lệnh:

A Write(x:4:8); B Write(x:8:2); C Write(‘x:8:2’); D Write(‘x:4:8’);

II TỰ LUẬN (6,0 điểm) Bài 1.(1,0 điểm)

Viết phần thân chương trình tìm in số nhỏ số x,y,z nhập từ bàn phím

Bài 2.(3,0 điểm)

Viết chương trình tính tuổi thọ trung bình (TTB) bạn Dũng(D); Tuấn(T); Vinh(V) Biết rằng: tuổi ba bạn Dũng, Tuấn, Vinh nhập từ bàn phím; Cơng thức tính tuổi thọ trung bình là: TTB= (D + T + V)/ Sau in kết TTB hình

Bài 3.(2,0 điểm) Viết biểu thức toán học sang dạng biểu diễn Pascal: a)

2

(7 )

6

x x y

y

   

 b) (a2 + b)(1 + c)3

ĐáP áN P N 01: I Trắc nghiệm:

Caâu 1 2 3 4 5 6 7 8 9 10 11 12

Đáp

(44)

C C C C C C C C C C C C

D D D D D D D D D D D D

Baøi 1:

Begin Min:= x;

If Min > y Then Min: = y; If Min > z Then Min: = z;

Write (‘ Vay so nho nhat la:’, Min); Readln

End

Baøi 2:

Program Tuoi_tho_TB; Uses Crt;

Var D; T; V: integer; TTB: real;

BEGIN ClrScr;

Writeln(‘***Chuong trinh tinh tuoi tho trung binh***’); Write(‘ Nhap tuoi cua Dung:’); Readln(D);

Write(‘ Nhap tuoi cua Tuan:’); Readln(T); Write(‘ Nhap tuoi cua Vinh:’); Readln(V); TTB:= (D + T + V)/3;

Writeln(‘ Vay tuoi tho trung binh cua ba ban Dung, Tuan, Vinh la:’, TTB:4:1);

Readln END



(45)

Gi¸o ¸n Tin häc - Năm học 2009- 2010

Tit 39 : CÂC LỆNH LẶP I/ MỤC TIÊU:

Biết nhu cầu cần có cấu trúc lặp ngơn ngữ lập trình

Biết ngơn ngữ lập trình dùng cấu trúc lặp để dẫn máy tính thực lặp

lặp lại cơng việc số lần

Thái độ nghiêm túc cẩn thận

II/ CHUẨN BỊ:

Gv: Soạn giáo án, SGK, SBT

HS: Vở ghi, SGK, SBT, đọc trước nội dung học

III/ Nội dung mới:

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

Hoạt động :

1/ Các công việc phải thực nhiều lần

Trong sống ngày, nhiều hoạt động thực lặp lặp lại nhiều lần ví dụ:

- Các ngày tuần em lặp lặp lại hoạt động buổi sáng đến trường buổi trưa trở nhà

- Các em học phải đọc đọc lại nhiều lần thuộc

Hãy cho thêm vài ví dụ thực tế đời sống ngày mà ta phải thực thao tác lặp lặp nhiều lần?

Gv: Khi viết chương trình máy tính vậy, nhiều trường hợp ta phải viết lặp lại nhiều câu lệnh để thực phép tính định

Hs lắng nghe

Hs cho ví dụ

Hoạt động 2:

2/ Câu lệnh lặp – lệnh thay cho nhiều lệnh

Các thao tác giống

Vd1: Thuật tốn mơ tả bước để vẽ hình vuông Bước 1: k ← (k số đoạn thẳng vẽ được) Bước 2: k ← k+1 Vẽ đoạn thẳng đơn vị độ dài quay thước 900 sang phải.

Bước 3: Nếu k<4 quay lại bước 2; ngược lại kết thúc

k biến đếm

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

Gv: Gọi hs lên bảng vẽ hình vng cạnh đơn vị độ dài (20cm) yêu cầu lớp theo dõi bạn thực thao tác bảng Yêu cầu hs mô tả bước bạn vẽ bảng

Vậy bạn vẽ hình vng thực thao tác? (hs trả lời thao tác vẽ đoạn thẳng)

(46)

bước 2; ngược lại kết thúc

i biến đếm

Mơ tả thuật tốn gọi cấu trúc lặp

Mọi ngơn ngữ lập trình có cách thị cho máy tính thực cấu trúc lặp với câu lệnh Đó câu lệnh lặp

Cấu trúc mơ tả thuật tốn gọi cấu trúc lặp

Gv: Mô tả thuật tốn tính tổng số tự nhiên từ 1→ 100

1hs lên bảng vẽ, lớp theo dõi GV: Gợi ý thêm thao tác quay thước

Các thao tác nào? Gv: Như vẽ hình vng có thao tác lặp lặp lại Thuật tốn sau mơ tả bước để vẽ hình vng

III Củng cố luyện tập:

? Em cho vài ví dụ hoạt động thực lặp lại sống ngày

? Cho biết tác dụng câu lệnh lặp với số lần biết trước

HS: Thảo luận nhóm đại diện nhóm đưa ví dụ nhóm

Hoạt động cá nhân, đến ba học sinh đứng chỗ trả lời

IV Hướng dẫn nhà học làm bài: (2’) - Học làm tập 1, SGK trang 60

- Đọc trước nội dung bài, sau học tiếp



Tiết 40 : CÂC LỆNH LẶP ( TT ) I/ MỤC TIÊU:

Hiểu hoạt động câu lệnh với số lần biết trước for Pascal Viết lệnh for số tình đơn giản

Hiểu lệnh ghép Pascal Thái độ nghiêm túc cẩn thận

II/CHUẨN BỊ:

Gv: Soạn giáo án, SGK, SBT

HS: Vở ghi, SGK, SBT, đọc trước nội dung học

III/ NỘI DUNG BÀI DẠY

Hoạt động trò Nội dung dạy Gv: minh họa bẳng ngôn ngữ Pascal cú

pháp câu lệnh for … to …

Lưu ý cho hs:

- biến đếm biến đơn có kiểu nguyên;

- giá trị đầu giá trị cuối

biểu thức có kiểu với biến

3/ Ví dụ câu lệnh lặp

Cú Pháp câu lệnh lặp với số lần biết trước Pascal

for<biến đếm>:= <giá trị đầu> to <giá trị cuối> <câu lệnh>

trong đó: for, to, từ khóa

(47)

Gi¸o ¸n Tin häc - Năm học 2009- 2010 m v giỏ tr cui phải lớn

giá trị đầu;

- câu lệnh câu lệnh đơn giản hay câu lệnh ghép

Cho hs nhận xét so sánh khác câu lệnh lặp hai vd trên?

Gv: Giải thích cho học vd2 câu lệnh lặp có begin … end

lần lặp

var i:integer; begin

for i:= to 20 do

writeln(‘Day la lan lap thu’,i); readln;

end.

Vd2: chương trình ghi nhận vị trí 10 chữ O rơi từ xuống

ues crt; var i:integer; begin

clrscr;

for i:= to 20 do begin

writeln(‘O’); delay(200); end;

readln; end.

*Lưu ý: Câu lệnh có sử dụng câu lệnh ghép phải đặt hai từ khóa begin … end

Gv: trình bày đoạn chương trình tính tổng N số tự nhiên, với N số tự nhiên nhập từ bàn phím (Pascal)

Theo cơng thức tính tổng ta cần khai bao nhieu biến? kiểu biến?

Trong biến biến có giá trị nhập từ bàn phím?

Hoạt động 2:

4/ Tính tổng tích câu lệnh lặp

Vd 1: chương trình tính tổng N số tự nhiên đầu tiên, với N số tự nhiên nhập từ bàn phím

S = 1+2+3+ … + N

program Tinh_tong; var N,i:integer;

S:longint; begin

write(‘Nhap so N = ‘); readln(N);

S:= 0;

for i:= to N do S:= S+i;

writeln(‘Tong cua’, N, ‘so tư nhien dau tien S = ‘, S); readln;

(48)

Trong trường hợp liệu có kiểu nguyên lớn ta dùng longint

*Kiểu longint có phạm vi từ -231 đến 231

Vd 2: chương trình tính tích N số tự nhiên, với N số tự nhiên nhập từ bàn phím

N! = 1.2.3….N

program Tinh_Giai_Thua; var N,i:integer;

P:longint; begin

write(‘Nhap so N = ‘); readln(N);

P:= 1;

for i:= to N do P:= P*i;

writeln( N, ‘! = ‘, P); readln;

end.

III Củng cố:

1/ Cấu trúc lặp chương trình dùng để làm gì?

2/ Trong ngơn ngữ lập trình Pascal cấu trúc lặp với số lần lặp cho trước thể với câu lệnh nào?

IV Hướng dẫn nhà:

Học bài, làm tập SGK trang 60 – 61, xem lại ví dụ, tiết sau làm tập lớp

Tiết 41 : BÀI TẬP. I/ MỤC TIÊU:

Củng cố lại kiến thức thông qua việc làm tập lớp nhà

HS

Thái độ nghiêm túc cẩn thận

II/CHUẨN BỊ:

Gv: Soạn giáo án, SGK, SBT

HS: Vở ghi, tập, SGK, SBT

III/ TIẾN TRÌNH BÀI DẠY: Nội dung tập:

Bµi 1. (10’) Em cho vài ví dụ hoạt động thực lặp lại

cuộc sống ngày Trả lời:

(49)

Gi¸o án Tin học - Năm học 2009- 2010

a) Hàng ngày em đặt đồng hồ báo thức lúc để dậy sớm tập thể dục

b) Hàng ngày (hoặc hàng tuần) bác lái xe khách lái xe để chuyên chở hành khách xuất phát từ thời gian địa điểm định theo tuyến đờng đợc xác định trớc

c) Mỗi lần đợc khởi động, máy tính em thực hoạt động tự kiểm tra thành phần máy tính, sau khởi động hệ điều hành theo trình tự đợc quy định trớc

Bài 2. (17 ) : a) Có thể thấy, để vẽ đợc hình a), thao tác cần thực vẽ nửa đờng trịn theo hớng định Ta gọi thao tác vẽ nửa đờng tròn theo hớng A

là vẽ nửa đờng tròn có bán kính đơn vị điểm xác định, đờng kính nối điểm đầu điểm cuối nửa đờng trịn vng góc với hớng A và nửa đờng trịn "cong hớng A" (hình ) Ta xét A là hớng lên trên, xuống d-ới, sang trái, sang phải

Với hớng, ta định nghĩa phép toán sau: lên trên + = sang trái, sang trái +1 = xuống dới, xuống dới +1 = sang phải, sang phải +1 = lên trên Khi mơ tả bớc thuật tốn để vẽ hình 1a nh sau:

a) b)

H×nh 1

Có thể mơ tả bớc thuật tốn để vẽ hình a) nh sau:

Bớc 1 Xác định điểm bắt đầu vẽ X

Bớc 2 Đặt i = đặt hớng = lên trên

Bớc 3 Vẽ nửa đờng trịn theo hớng đặt

Bíc 4. i = i +

Bớc 5 Nếu i > 4, chuyển bớc 6; ngợc lại, đặt hớng = hớng + quay lại bớc

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

Lu ý Khi trình bày thuật tốn lần cho học sinh khơng nên định nghĩa phép toán với hớng mà nên liệt kê đủ bốn hớng thuật toán

b) Thuật tốn tơng tự nh Thao tác cần lặp lại vẽ hình vng Tại bớc, giữ ngun tâm hình vng thay đổi hớng vẽ góc 30o.

Bµi 3. (5’) Cho biết tác dụng câu lệnh lặp với số lần biết trước

Trả lời:

Câu lệnh lặp có tác dụng làm đơn giản giảm nhẹ công sức ngời viết ch-ơng trình

Bµi 4. (10’): Khi thực câu lệnh lặp, máy tính kiểm tra điều kiện Với

lệnh lặp

For <biến đếm>:=<giá trị đầu> to <giá trị cuối> do <câu lệnh>; Pascal, điều kiện cần phải kiểm tra gì?

Trả lời:

Chúng ta nói thực hoạt động lặp, chơng trình kiểm tra điều kiện Với lệnh lặp

(50)

của Pascal, điều kiện cần phải kiểm tra giá trị biến đếm lớn giá trị cuối Nếu điều kiện không đợc thoả mãn, câu lệnh đợc tiếp tục thực hiện; ng-ợc lại, chuyển sang câu lệnh chơng trình

III Củng cố - Hướng dẫn học làm nhà: (3’)

- Học làm lại tập

- Làm tiếp tập lại SGK, sau làm tiếp tập



Tiết 42 : BÀI TẬP ( TT ) I/ MỤC TIÊU:

Củng cố lại kiến thức thông qua việc làm tập lớp nhà

HS

Thái độ nghiêm túc cẩn thận II/ CHUẨN BỊ:

Gv: Soạn giáo án, SGK, SBT

HS: Vở ghi, tập, SGK, SBT III/ TIẾN TRÌNH BÀI DẠY:

II Nội dung tập: (42’)

Bµi 5. Sau thực đoạn chương trình sau, giá trị biến j bao

nhiêu? J:=0;

for i:=0 to j:=j+2;

Trả lời:

Sau thực đoạn chương chương giá trị j =12

Bµi 6.: Hãy mơ tả thuật tốn để tính tổng sau đây:

1 1

1.3 2.4 3.5 ( 2)

A

n n

     

Trả lời:

Tht to¸n tÝnh tỉng A = 1 31 +2 41 +3 51 + n(n1+1)

Bíc 1 G¸n A  0, i

Bíc 2 A

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

Bài 7.: 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=1 to 10 writeln(‘A’);

(51)

Giáo án Tin học - Năm học 2009- 2010

d) var x:real; begin for x:=1 to 10 writeln(‘A’); end Trả lời:

Trừ d), tất câu lệnh không hợp lệ:

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

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

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

d) Thừa dấu chấm phẩy thứ nhất, nh 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) Bin x ó c khai báo nh 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

Bài 8.: Thuật toán:

Bớc 1 Nhập sè n x

Bíc 2 A 1, i  (A lµ biÕn lu luü thõa bËc n cđa x)

Bíc 3 ii + 1, A A.x

Bíc 4 NÕu i < n, quay l¹i bớc

Bớc 5 Thông báo kết A lµ l thõa bËc n cđa x vµ kÕt thóc thuật toán Chơng trình Pascal nh sau:

var n,i,x: integer; a: longint;

begin

write('Nhap x='); readln(x); write('Nhap n='); readln(n); A:=1;

for i:=1 to n do A:=A*X; writeln(x,' mu ',n,' bang ',A);

end

Bài 9.Thuật toán:

Bớc 1 Nhập số n

Bíc 2 A32768 (g¸n sè nhá nhÊt cã thĨ số kiểu nguyên cho A), i

1

Bớc 3 Nhập số thứ i và gán giá trị vào biến A

Bíc 4 NÕu Max < A, Max A

Bíc 5 i i +

Bíc 6 NÕu i n, quay l¹i bớc

Bớc 7 Thông báo kết Max là số lớn kết thúc thuật toán Chơng tr×nh Pascal cã thĨ nh sau:

uses crt;

var n,i,Max,A: integer;

begin

clrscr;

write('Nhap N='); readln(n); Max:=-32768;

for i:=1 to n do

begin write('Nhap so thu ',i,':'); readln(A); if Max<A then Max:=A end;

writeln('So lon nhat: ',Max);

end

Lu ý. Trong chơng trình sử dụng hai biến A Max để giải toán Một cách tự nhiên, để nhập n số cần tới n biến Tuy nhiên, việc xử lí giá trị dãy số thực cách cần so sánh giá trị đợc nhập vào, cần biến để lu lần lợt giá trị nhập vào đủ Một cách giải khác sử dụng biến mảng (xem tập 6, 9)

(52)

uses crt;

var n,i,SoDuong,A: integer;

begin

clrscr;

write('Nhap N='); readln(n);

if n>0 then

begin

SoDuong:=0; for i:=1 to n do

begin write('Nhap so thu ',i,':'); readln(A);

if A>0 then SoDuong:=SoDuong+1 end;

writeln('So cac so duong = ',SoDuong) end

else writeln('n phai > 0!');

end

IV/ Củng cố - Hướng dẫn nhà học làm bài: (3’)

- Học

- Làm lại tập

- Xem trước nội dung thực hành 5, sau thực hành phòng máy



Tiết 43 : BÀI THỰC HÀNH SỐ : SỬ DỤNG LỆNH FOR … DO

I Mơc tiªu:

Kiến thức Vận dụng kiến thức vòng lặp for… do, câu lệnh ghép để viết ch-ơng trình

Kỹ Viết đợc chơng trình có sử dụng vịng lặp for … do; Sử dụng đợc câu lệnh ghép;

Rèn luyện kỹ đọc hiểu chơng trình có sử dụng vịng lặp for …

II chn bÞ cđa GV, HS

1 Chn bÞ cđa GV: - Giáo án, SGK, phòng máy, phần mềm pascal Chuẩn bÞ cđa HS: - SGK, vë ghi, bót

III Tiến trình dạy

Hoạt động thầy trũ Ni dung bi dy

- GV: yêu cầu dÃy gõ vào máy

- HS: gõ chơng trình, chạy thử chơng trình, báo cáo kết

- GV: hỗ trợ học sinh trình thực hành

Hot ng 1: Vit chng trình cho tập cho nhà

Bài 1: Tính tổng n số tự nhiên

Program tinh_tong;

Uses crt;

Var i, n: integer; tong: longin; Begin

Clrscr; Tong:=0;

Writeln(‘Nhap vao so n’); readln(n); For i:=1 to n

Tong: = Tong+i;

Writeln(‘Tong cña’, n,’so tu nhien dautien la’,tong);

Readln;

(53)

Gi¸o ¸n Tin học - Năm học 2009- 2010

- Sau kết chạy chơng trình đúng, gv yêu cầu học sinh chữa làm nhà cho theo chơng trình chy

2 Viết chơng trình tìm xem có số dơng n số nhập vào từ bàn phÝm Program tinh_so_cac_so_duong;

Uses crt;

Var i,A, dem, n: integer; Begin

Clrscr; Dem:=0;

Writeln(‘Nhap vao so n’); readln(n); For i:=1 to n

begin

writeln(‘nhap vao so thu’,i); readln(A); if A>0 then dem:=dem+1;

end;

Writeln(‘So cac so duong la’,dem); Readln;

End - GV: Đa nội dung toán

- HS: Nghiên cứu toán, tìm input output

- GV: Đa nội dung chơng trình lên hình, yêu cầu học sinh đọc hiểu chơng trình

- HS: đọc, phân tích câu lệnh tìm hiểu hoạt động chơng trình

- GV: yêu cầu học sinh đứng vị trí trình bày hoạt động chơng trình, nhóm khác tham gia phân tích

- HS: tham gia hoạt động giáo viên - GV: yêu cầu học sinh lập bảng hoạt

động chơng trình theo mẫu: Giả sử N=2:

Bíc i i<=10 Writeln(n,’.’,i,’=’,n*i)

1 2.1=2

- HS: nhóm lập bảng đại diện nhóm báo cáo kết

- GV: nhËn xÐt

- GV: cho chơng trình chạy máy, yêu cầu học sinh quan sát kết

Hot ng 2: Bảng cửu chơng

Bài 2: Viết chơng trình in hình bảng nhân số từ đến 9, dừng hình để quan sát kết Program Bang_cuu_chuong;

Uses crt;

Var i, n: integer; Begin

Clrscr;

Writeln(‘Nhap vao so n’); readln(n); Writeln(‘Bang nha’,n);

Writeln;

For i:=1 to 10

Writeln(n,’x’,i:2,’=’,n*i:3); Readln;

End

IV Cđng cè :NhËn xÐt, rót kinh nghiƯm tiÕt thùc hµnh

về nhà xem trớc thực hành SGK (T63) viết chơng trình in hình bảng cửu chơng từ đến



Tiết 44 : BÀI THỰC HÀNH SỐ : SỬ DỤNG LỆNH FOR … DO

I/Mơc tiªu:

Kiến thức Vận dụng kiến thức vòng lặp for… do, câu lệnh ghép để viết ch-ơng trình, tìm hiểu câu lệnh gotoxy(), where<>, lệnh for lồng for

Kỹ

Viết chơng trình có sử dụng vòng lặp for do; Sử dụng câu lệnh ghép chơng trình;

(54)

II/chuẩn bị

Chuẩn bị GV: - Giáo án, SGK, phòng máy, phần mềm pascal Chuẩn bị HS: - SGK, vë ghi, bót

III/ TiÕn Tr×nh b i d yà ạ :

Hoạt động thầy trò Ni dung bi dy

- Giáo viên cho chạy kết thực hành Bang_cuu_chuong

Yêu cầu học sinh quan sát kết nhận xét khoảng cách hàng, cột

- HS: quan sỏt đa nhận xét - ? Có cách để khoảng cách hàng cột tăng lờn?

- GV: Giới thiệu câu lệnh gotoxy where

- GV: yêu cầu học sinh mở chơng trình Bang_cuu_chơng sửa lại chơng trình theo hình giáo viên

- HS: gõ chơng trình vào máy, sửa lỗi tả, chạy chơng trình, quan sát kết

- GV: yêu cầu học sinh quan sát kết so sánh với kết chơng trinh cha dùng lệnh gotoxy(5, wherey)

- HS: quan sát nhận xét

Hot động 1: Làm đẹp hình kết lệnh gotoxy, where

Bµi sgk (T63)

a) Giíi thiƯu lƯnh gotoxy(), wherex - Gotoxy(a,b)

Trong đó: a số cột, b số hàng - ý nghĩa câu lệnh đa trỏ cột a hàng b

- Wherex: cho biÕt sè thø tù cña cét, wherey cho biÕt sè thø tù hàng

* Lu ý: Phải khai báo th viƯn crt tríc sư dơng hai lƯnh trªn

a) Chỉnh sửa chơng trình nh sau: Program Bang_cuu_chuong;

Uses crt;

Var i, n: integer; Begin

Clrscr;

Writeln(‘Nhap vao so n’); readln(n); Writeln(‘Bang nha’,n);

Writeln;

For i:=1 to 10 begin

gotoxy(5, wherey);

Writeln(n,’x’,i:2,’=’,n*i:3); Readln;

End - GV: giíi thiƯu cÊu tróc lƯnh for

lång, híng dÉn häc sinh c¸ch sư dơng lƯnh

- HS: ghi chÐp cÊu tróc lĩnh hội - GV: đa nội dung chơng trình bµi

thực hành lên hình, u cầu học sinh đọc chơng trình,

Hoạt động 2: Bài SGK (T64)

a) C©u lƯnh for lång for

- For<biến đếm1:= giá trị đầu>to<giátrị

cuèi>do

(55)

Gi¸o ¸n Tin häc - Năm học 2009- 2010

tỡm hiu hot động chơng trình

- HS: hoạt động theo nhóm, tìm hiểu hoạt động chơng trinh, đại diện nhóm báo cáo kết thảo luận

- GV: cho chạy chơng trình - HS : quan sát kết

hình

< câu lệnh>;

Program Tao_bang;

Uses crt;

Var i,j: byte; Begin

Clrscr;

For i:=1 to

Begin

For j:=0 to Writeln(10*i+j:4); Writeln;

End;

Readln;

End

IV/Củng cố :Nhận xét rút kinh nghiệm thực hành học sinh nhà sử dụng lệnh gotoxy để chỉnh sửa lại thực hành số cho kết in hình đẹp



Tiết 45- 49:häc vÏ hình với phần mềm geogebra

I/ Mục tiêu:

Học sinh biết đợc ý nghĩa hình học geogebra Làm quen với phần mềm nh khởi động, công cụ, nút lệnh

Nắm đợc cách vẽ hình sử dụng phần mềm geogebra Hứng thú u thích mơn học

II/ Chuẩn bị:

- Sách giáo khoa, giáo án, tài liệu tin học có liên quan - Đọc tài liệu nhà trớc

III Tiến trình BàI DạY:

Hot ng ca gv v HS Ni dung Bài dạy

Hoạt động 1: Giới thiệu phần mềm geogebra Cho học sinh đọc thông tin SGK

? Em biết phần mềm geogebra Nếu biết hÃy nêu vài ví dụ

? Phn mm geogebra có đặc điểm gì? Giáo viên giới thiệu lại cho học sinh nghe

1 Em biết GeoGebra?

- Phần mềm GeoGebra dùng để vẽ hình hình học đơn giản nh điểm, đoạn thẳng, đờng thẳng lớp em đợc học qua - - - Đặc điểm quan trọng phần mềm Geogebra khả tạo gắn kết đối tợng hình học, đ-ợc gọi quan hệ nh thuộc, vng góc, song song Đặc điểm giúp cho phần mềm vẽ đợc hình xác có khả tơng tác nh chuyển động nhng giữ đợc mối quan hệ đối tợng

Hoạt động2: Làm quen với phần mềm Geogebra

(56)

Hoạt động gv HS Nội dung Bài dạy thiệu bớc

Để khởi động ta làm nh nào?

Ngoµi cách có cách không?

Màm hình phần mềm GeoGebra tiếng Việt có phần nào?

Em hiểu Bảng chọn gì?

Giáo viªn chó ý cho HS

Thanh cơng cụ ? Hãy nêu lệnh (có thể cho HS lên bảng vẽ)

Gi¸o viên giới thiệu công cụ làm việc cho học sinh

Để chọn công cụ hÃy nháy chuột lên biểu tợng công cụ

Mỗi nút công cụ có nhiều công cụ nhóm Nháy chuột vào nút nhỏ hình tam giác phía dới biểu tợng làm xuất công cụ khác

Cỏc cụng c liờn quan đến đối tợng điểm

GeoGebra tiÕng ViÖt

a) Khởi động

Nháy chuột biểu tợng để ng chng trỡnh

b) Giới thiệu hình GeoGebra tiÕng ViƯt

Màn hình làm việc phần mềm bao gồm bảng chọn, công cụ khu vực thể đối tợng

B¶ng chọn hệ thống lệnh phần mềm Geogebra Víi phÇn mỊm Geogebra tiÕng ViƯt em sÏ thÊy c¸c lƯnh b»ng tiÕng ViƯt

Chú ý lệnh bảng chọn không dùng để vẽ đối tợng-hình Các lệnh tác động trực tiếp với đối tợng hình học đợc thực thơng qua cơng cụ công cụ phần mềm

Thanh công cụ phần mềm chứa công cụ làm việc Đây cơng cụ dùng để vẽ, điều chỉnh làm việc với đối tng

- Khi nháy chuột lên nút lệnh ta thấy xuất công cụ khác nhãm

- Mỗi cơng cụ có biểu tợng riêng tơng ứng Biểu tợng cho biết công dụng ca cụng c ú

c) Giới thiệu công lµm viƯc chÝnh

Cơng cụ di chuyển có ý nghĩa đặc biệt khơng dùng để vẽ khởi tạo hình mà dùng để di chuyển hình Với cơng cụ này, kéo thả chuột lên đối tợng (điểm, đoạn, đờng, ) để di chuyển hình Công cụ dùng để chọn đối tợng thực lệnh điều khiển thuộc tính đối tợng Có thể chọn nhiều đối tợng cách nhấn giữ phím Ctrl chọn

Chú ý: Khi sử dụng công cụ khác, nhấn phím ESC để chuyển cơng cụ di chuyển

Các công cụ liên quan đến đối tợng điểm

(57)

Gi¸o ¸n Tin häc - Năm học 2009- 2010

Hot ng gv HS Nội dung Bài dạy

Các công cụ liên quan đến đoạn, đờng thẳng

mới Điểm đợc tạo điểm tự mặt phẳng điểm thuộc đối tợng khác (ví dụ đờng thẳng, đoạn thẳng)

Cách tạo: chọn công cụ nháy chuột lên điểm trống hình nháy chuột lên đối tợng để tạo điểm thuộc đối tợng

Công cụ dùng để tạo điểm giao hai đối tợng có mặt phẳng

Cách tạo: chọn công cụ lần lợt nháy chuột chọn hai đối tợng có mặt phẳng

Cơng cụ dùng để tạo trung điểm (đoạn thẳng nối) hai điểm cho trớc: chọn công cụ nháy chuột hai điểm để tạo trung điểm

Các công cụ liên quan đến đoạn, đ-ờng thẳng

Các công cụ , , dùng để tạo đờng, đoạn, tia qua hai điểm cho trớc Thao tác nh sau: chọn cơng cụ, sau nháy chuột chọn lần lợt hai điểm hình

Cơng cụ tạo đoạn thẳng qua điểm cho trớc với độ dài nhập trực tiếp từ bàn phím

Thao tác: chọn cơng cụ, chọn điểm cho trớc, sau nhập giá trị số vào cửa sổ có dạng:

Nháy nút áp dụng sau nhập xong độ dài đoạn thẳng

Chó ý: Trong cưa sỉ trªn cã thể nhập chuỗi kí tự tên cho giá trị số

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 vuông góc với đờng đoạn thẳng cho trớc

(58)

Hoạt động gv HS Nội dung Bi dy

Các công cụ tạo mối quan hƯ h×nh häc

Các cơng cụ liên quan đến hình trịn

lại chọn đờng (đoạn, tia) chọn điểm - Công cụ tạo đờng thẳng song song với đờng (đoạn) cho trớc qua điểm cho trớc

Thao tác: chọn công cụ, sau lần lợt chọn điểm, đờng (đoạn, tia) ngợc lại chọn đờng (đoạn, tia) chọn điểm - Công cụ dùng để vẽ đờng trung trực đoạn thẳng hai điểm cho trớc

Thao tác: chọn cơng cụ, sau chọn đoạn thẳng chọn hai điểm cho trớc mặt phẳng

- Công cụ dùng để tạo đờng phân giác góc cho trớc Góc xác định ba điểm mặt phẳng

Thao tác: chọn cơng cụ sau lần lợt chọn ba điểm mặt phẳng Điểm chọn thứ hai đỉnh góc

Các cơng cụ liên quan đến hình trịn

- Cơng cụ tạo hình trịn cách xác định tâm điểm hình trịn 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

- Cơng cụ dùng để tạo hình trịn cách xác định tâm bán kính 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 sau:

- Cơng cụ dùng để vẽ hình trịn qua ba điểm cho trớc Thao tác: chọn công cụ, sau lần lợt chọn ba điểm - Cơng cụ dùng để tạo nửa hình trịn qua hai điểm đối xứng tâm

(59)

Giáo án Tin học - Năm học 2009- 2010

Hoạt động gv HS Nội dung Bài dạy

- Công cụ tạo cung trịn phần hình trịn xác định trớc tâm hình trịn hai điểm cung trịn

- Thao tác: Chọn cơng cụ, chọn tâm hình trịn lần lợt chọn hai điểm Cung tròn xuất phát từ điểm thứ đến điểm thứ hai theo chiều ngợc chiều kim đồng hồ

- Công cụ xác định cung tròn qua ba điểm cho trớc Thao tác: chọn cơng cụ sau lần lợt chọn ba điểm mặt phẳng

Các cơng cụ biến đổi hình học

- Công cụ dùng để tạo đối t-ợng đối xứng với đối tt-ợng cho trớc qua trục đờng đoạn thẳng

- Thao tác: Chọn công cụ, chọn đối tợng cần biến đổi (có thể chọn nhiều đối tợng cách kéo thả chuột tạo thành khung chữ nhật chứa đối tợng muốn chọn), sau nháy chuột lên đờng đoạn thẳng làm trục đối xứng

- Công cụ dùng để tạo đối t-ợng đối xứng với đối tt-ợng cho trớc qua điểm cho trớc (điểm gọi tâm đối xứng)

- Thao tác: Chọn công cụ, chọn đối tợng cần biến đổi (có thể chọn nhiều đối tợng cách kéo thả chuột tạo thành khung chữ nhật chứa đối tợng muốn chọn), sau nháy chuột lên điểm tâm đối xứng

d) C¸c thao t¸c víi tÖp

(60)

Hoạt động gv HS Nội dung Bài dạy e) Thoát khỏi phần mềm

Nháy chuột chọn Hồ sơ Đóng nhấn tổ hợp phím Alt+F4

IV/Củng cố:

- Giáo viên hệ thống lại toàn nội dung học

- Học theo sách giáo khoa ghi, Ơn lại kiến thức học luyện viết, làm làm lại nhiều lần

- Đọc để sau học



Tiết 50 – 51 : Bài 8: LẶP VỚI SỐ LẦN CHƯA BIẾT TRƯỚC

I

Mục tiêu:

- Biết nhu cầu cần có cấu trúc lặp với số lần chưa biết trước ngôn ngữ lập trình;

- Biết ngơn ngữ lập trình dùng cấu trúc lặp với số lần chưa biết trước để dẫn máy tính thực lặp lặp lại cơng việc đến điều kiện thoả mãn;

- Nhận biết đâu hoạt động lặp với số lần chưa biêt trước - Nghiêm túc trình nghiên cứu thực hành

II Chuẩn bị

GV: SGK, máy chiếu, phim ví dụ chương trình HS: Xem trước nhà

III Tiến trình giảng

Viết thuật tốn tính tổng 100 số tự nhiên 1,2,3,…,99,100 Trả lời

Bước SUM  0; iBước ii +

Bước 3. Nếu i ≤ 100, SUM  SUM + i quay lại bước Bước 4. Thông báo kết kết thúc thuật toán

Bài mới

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

+ G : y/c hs đọc ví dụ 1sgk/67 + Hs : 2-3 hs đọc ví dụ sgk + G : Phân tích ví dụ + Hs : Chú ý lắng nghe

+ G : y/c hs đọc ví dụ 1sgk/67 + Hs : 2-3 hs đọc ví dụ sgk + G : Phân tích ví dụ

1 Các hoạt động lặp với số lần chưa biết trước

a/ Ví dụ 1(sgk).

(61)

Gi¸o án Tin học - Năm học 2009- 2010

+ Hs : ý lắng nghe

+ G : Hướng dẫn hs xây dựng thuật toán

+ Hs : Nghe giáo viên hướng dẫn, sau tự xây dựng thuật tốn

+ G : Chạy tay cho học sinh xem ( Chỉ nên chạy tay thử từ đến 10 )

+ Hs : Chú ý nghe Hs ghi ví dụ

+ G : Giới thiệu sơ đồ khối

+ G : Nêu nhận xét

+ G : Có thể sử dụng lệnh lặp với số lần lặp chưa biết trước chương trình lập trình Sau ta xét câu lệnh ví dụ TP

+ G : Giới thiệu cú pháp lệnh

while …do ….;

+ hs : ý nghe ghi chép + Gv : Xét ví dụ

Chúng ta biết rằng, n càng lớn

1

n nhỏ, ln lớn Với giá trị n thì

1

n < 0.005

1

n < 0.003 ?

nhất lớn 1000?

Giải :

Kí hiệu S là 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 tốn

* Ta có sơ đồ khối :

* Nhận xét : Để viết chương trình dẫn máy tính thực hoạt động lặp ví dụ trên, ta sử dụng câu lệnh có dạng

lặp với số lần chưa biết trước

2 Ví dụ lệnh lặp với số lần chưa biết trước

Trong Pascal câu lệnh lặp với số lần chưa biết trước có dạng:

while <điều kiện> do <câu lệnh>;

trong đó:

- điều kiện thường phép so sánh; - câu lệnh câu lệnh đơn giản

hay câu lệnh ghép

Câu lệnh lặp thực sau: Bước : Kiểm tra điều kiện

Bước : Nếu điều kiện SAI, câu lệnh bị bỏ qua việc thực lệnh lặp kết thúc Nếu

điều kiện đúng, thực câu lệnh quay lại bước

Ví dụ

Với giá trị n ( n>o ) thì

1

n < 0.005

1

(62)

( Gv đưa phim ví dụ ) + Hs : Đọc ví dụ

+ G : giới thiệu chương trình mẫu sgk ( Giáo viên in chương trình mẫu trên) + Hs : quan sát

+ Gv : Chạy tay cho học sinh xem + Hs : ý nghe tự chạy tay lại + Gv : Yêu cầu học sinh mở máy tính mở chương trình ví dụ ( giáo viên chuẩn bị chương trình mẫu đưa lên máy )

+ Hs : thực

+ G : Cho học sinh chạy chương trình máy

+ Hs : thực

+ G : Yêu cầu hs thay điều kiện sai_so = 0.003 thành 0.002 ; 0.001 ;

0.005 ;

+ Hs : thực

số n nhỏ để

1

n nhỏ sai số cho trước :

uses crt;

var x: real; n: integer;

const sai_so=0.003;

begin

clrscr; x:=1; n:=1;

while x>=sai_so do begin n:=n+1; x:=1/n

end;

writeln('So n nho nhat de 1/n < ',sai_so:5:4, 'la ',n);

readln

end

IV/ Củng cố:

- Lấy ví dụ hoạt động phải lặp lại với số lần chưa biết trước

Hướng dẫn nhà:

- Học Nghiên cứu trước nội dung phần lại



Tiết 52 : BÀI THỰC HÀNH 6

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

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

- Vận dụng kiến thức vòng lặp while … do, câu lệnh ghép để viết chơng trình

* Kỹ năng

- Viết đợc chơng trình có sử dụng vịng lặp while … do; - Sử dụng đợc câu lệnh ghép;

- Rèn luyện kỹ đọc hiểu chơng trình có sử dụng vịng lặp while do

II/ CHUẨN BỊ

* Giáo viên

- Sách giáo khoa, giáo án, phòng máy

* Học sinh

(63)

Gi¸o ¸n Tin häc - Năm học 2009- 2010

III/ TI N TRÌNH GI D YẾ Ờ Ạ

HĐ CỦA GV& HS NỘI DUNG

Hoạt động

- GV: Yêu cầu HS đọc tập (Tr71 SGK), thảo luận theo nhóm làm tập - GV: yªu cầu dÃy gõ vào máy - GV: hỗ trợ học sinh trình thực hành

- GV hớng dẫn HS tìm hiểu câu lệnh - GV cho HS thay vòng lặp While vòng lặp xác định For

- Sau kết chạy chơng trình đúng, GV yêu cầu học sinh chữa làm nhà cho theo chơng trình chạy

Hoạt động

- Nếu nhóm làm xong trớc thời gian thực vÝ dô 3,4,5 trang 69,70 SGK

- HS: Đọc bài, suy nghĩ, thảo luận làm máy

- HS: gõ chơng trình, chạy thử chơng trình, báo cáo kết

- Thực theo yêu cầu GV - HS: Chữa tập ë bµi häc tríc

- HS: Thùc hµnh víi tập ví dụ

Bài 1

Viết chơng trình sử dụng lệnh While để tính trung bình n số thực x1,x2 ,xn Các số xi đợc nhập từ bàn phím

Program tinh_trung_binh; Uses crt;

Var dem, n: integer; x,tb: real; Begin

Clrscr;

Dem:=0;Tb:=0;

Writeln(‘Nhap vao so n’); readln(n); while dem<=n

begin dem: = dem+i;

Writeln(‘nhap so thu’,dem,’=’); readln(x);

Tb:=tb+x; End;

Write(‘TB cua’,n,’so la’,tb:10:2); Readln;

End

* C¸c vÝ dô

(64)

- GV nhận xét, rút kinh nghiệm thực hành

V/ HƯỚNG DẪN VỀ NHÀ (1’)

- Đọc chuẩn bị cho tiết thực hành



Tiết 53 :

BÀI THỰC HÀNH 6

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

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

- Vận dụng kiến thức vòng lặp while … do, câu lệnh ghép để viết chơng trình

* Kỹ năng

- Viết đợc chơng trình có sử dụng vịng lặp while … do; - Sử dụng đợc câu lệnh ghép;

- Rèn luyện sâu kỹ đọc hiểu chơng trình có sử dụng vịng lặp while do

II/ CHUẨN BỊ * Giáo viên

- Sách giáo khoa, giáo án, phòng máy

* Học sinh

- Vở ghi + Sách giáo khoa

III/ TI N TRÌNH GI D YẾ Ờ Ạ

HĐ CỦA GV & HS NỘI DUNG

Hoạt động

- GV: Đa nội dung toán, yêu cầu HS đọc tìm Input, Output

- GV: Đa nội dung chơng trình lên hình, yêu cầu học sinh đọc hiểu chơng trình

- GV: Yêu cầu học sinh đứng vị trí trình bày hoạt động chơng trình, nhóm khác tham gia phân tích

- GV: Yêu cầu học sinh lập bảng hoạt động chơng trình theo mẫu

Bµi 2

Viết chơng trình nhận biết số có phải số ngun tố hay khơng với n số nguyên đợc nhập từ bàn phím:

Program so_nguyen_to; Uses crt;

Var i, n: integer; Begin

Clrscr;

(65)

Gi¸o ¸n Tin häc - Năm học 2009- 2010

Hot ng

- GV: Yêu cầu HS đọc phần Đọc thêm 2: Tính gần số Pi với độ xác cho trớc - GV: Giải thích chơng trình có sử dụng hàm chuẩn Abs Pascal

- HS: Nghiên cứu toán, tìm Input Output

- HS: Đọc, phân tích câu lệnh tìm hiểu hoạt động chơng trình

- HS: Tham gia hoạt động giáo viên

- HS: Gâ, ch¹y chơng trình kiểm tra với số khác nhau; tìm hiểu câu lệnh chơng trình

- HS: Thực theo yêu cầu GV - HS: Chú ý lắng nghe ghi chép

ngto) else Begin i:=2;

while n mod i <>0 i:=i+1; if i=n then Writeln(n,’la so ngto’) else writeln(n,’ko la so ngto’); end;

Readln; End

* Đọc thêm 2

- Hm Abs cho kết giá trị tuyệt đối số, tức Abs (x) cho giá trị x, x>=0, ngợc lại Abs (x) cho kết -x

IV/ CỦNG CỐ

- GV nhận xét, rút kinh nghiệm thực hành

- Ôn lại tất kiến thức học câu lệnh lặp - Chuẩn bị tốt cho tiết tập



(66)

* Kiến thức

- Kiểm tra vận dụng 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 hoạt động câu lệnh lặp với số lần chưa biết trước While do… Pascal

* Kỹ năng

- Ứng dụng câu lệnh lặp việc giải toán

II/ CHUẨN BỊ * Giáo viên

- Sách giáo khoa, giáo án, máy chiếu

* Học sinh

- Vở ghi + Sách giáo khoa

III/ TI N TRÌNH GI D YẾ Ờ Ạ

HĐ CỦA GV & HS NỘI DUNG

Hoạt động

- GV: Nhắc lại cú pháp lệnh While

- GV: Lưu ý HS cách thực tránh lệnh lặp vô hạn lần

Hoạt động

- GV: Yêu cầu hs làm tập (Tr71 SGK) Phát biểu khác biệt câu lệnh lặp với

I/ Ôn tập lý thuyết

while <điều kiện> do <câu lệnh>;

trong đó:

- điều kiện thường phép so sánh;

- câu lệnh câu lệnh đơn giản hay câu lệnh ghép

Câu lệnh lặp thực hiện: Bước : Kiểm tra điều kiện

Bước : Nếu điều kiện SAI, câu lệnh

(67)

Giáo án Tin học - Năm học 2009- 2010

số lần lặp cho trớc câu lệnh lặp với số lần lặp cha biết trớc

- GV: Nhận xét, đánh giá

- GV: Yêu cầu HS đọc tập 3:

Tìm hiểu thuật toán sau cho biết thực thuật tốn, máy tính thực vịng lặp? Khi kết thúc, giá trị S bằng bao nhiêu? Viết chơng trình Pascal thể thuật tốn

a) Tht to¸n

Bíc 1 S  10, x  0.5

Bíc 2 NÕu S  5.2, chun 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) Tht to¸n

Bíc 1 S  10, n

Bíc 2 NÕu S ≥10, chun tíi bíc

Bíc 3 n n + 3, S Sn quay l¹i bíc

Bíc 4 Thông báo S và kết thúc thuật toán - HS: Chú ý quan sát

- HS: Lắng nghe ghi chép

II/ Bµi tËp Bµi 2

Sù khác biệt câu lệnh lặp với số lần lặp cho trớc câu lệnh lặp với số lần lặp cha biết trớc điểm sau đây:

a) Nh tên gọi nó, câu lệnh lặp với số lần lặp cho trớc thị cho máy tính thực lệnh nhóm lệnh với số lần đợc xác định từ trớc, với câu lệnh lặp với số lần lặp cha biết trớc số lần lặp cha đợc xác định trớc

b) Trong câu lệnh lặp với số lần cho tr-ớc, điều kiện giá trị biến đếm có giá trị nguyên đạt đợc giá trị lớn hay cha

Trong câu 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 Trong câu lệnh lặp với số lần cha xác định trớc, trớc hết điều kiện đợc kiểm tra Nếu điều kiện đợc thoả mãn, câu lệnh mới đợc thực Do có trờng hợp câu lệnh hồn tồn khơng đợc thực

Bµi

a) Thuật tốn 1: 10 vòng lặp đợc thực Khi kết thúc thuật tốn S = 5.0 Đoạn chơng trình Pascal tơng ứng:

S:=10; x:=0.5;

while S>5.2 S:=S-x; writeln(S);

b) Thuật tốn 2: Khơng vịng lặp đợc thực từ đầu điều kiện khơng đợc thỏa mãn nên bớc bị bỏ qua

(68)

- HS: Đọc trả lời

- HS: Ghi chép

- HS: đọc yêu cầu tập trả lời câu hỏi - HS viết chương trình theo yêu cầu

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

IV/ CỦNG CỐ (3’)

- HS nhắc lại kiến thức câu lệnh lặp While - GV củng cố lại kiến thức

V/ HƯỚNG DẪN VỀ NHÀ (1’)

- Đọc nghiên cứu lại tập - Chuẩn bị cho tiết tập



Tiết 55: BÀI TẬP

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

- Nắm vững cấu trúc lặp với số lần chưa biết trước ngôn ngữ lập trình; - Củng cố kiến thức hoạt động câu lệnh lặp với số lần chưa biết trước While do… Pascal

* Kỹ năng

- Ứng dụng thành thạo câu lệnh lặp việc giải toán

II/ CHUẨN BỊ * Giáo viên

- Sách giáo khoa, giáo án, máy chiếu

* Học sinh

- Vở ghi, sách giáo khoa

III/ TIẾN TRÌNH GIỜ DẠY

(69)

Gi¸o ¸n Tin học - Năm học 2009- 2010

HĐ CỦA GV & HS NỘI DUNG

Hoạt động

- GV: yờu cầu HS đọc ( Tr71 SGK) Hãy tìm hiểu cụm câu lệnh sau cho biết với câu lệnh chơng trình thực vịng lặp? Hãy rút nhận xét em!

a) S:=0; n:=0; while S<=10

begin n:=n+1; S:=S+n end; b) S:=0; n:=0;

while S<=10 n:=n+1; S:=S+n;

Hoạt động

- GV: Yeu cầu HS đọc bi (Tr71 SGK) HÃy lỗi câu lệnh sau đây: a)X:=10; while X:=10 X:=X+5;

b)X:=10; while X=10 X=X+5;

c)S:=0; n:=0; while S<=10 n:=n+1; S:=S+n;

- HS: Đọc làm tập

- Chữa ghi chép đầy đủ

- HS: Đọc làm tập - Chữa ghi chép đầy đủ

Bµi 4

a) Chơng trình thực vòng lặp

b) Vịng lặp chơng trình đợc thực vơ tận sau câu lệnh n:=n+1; câu lệnh lặp kết thúc nên điều kiện S=0 luôn đợc thỏa mãn

Nhận xét: Trong câu lệnh thực hiện, điều kiện cần phải đợc thay đổi để sớm hay muộn chuyển sang trạng thái khơng thỏa mãn Khi vịng lặp đợc kết thúc sau hữu hạn bớc Để làm đợc điều này, câu lệnh câu lệnh lặp while thờng câu lệnh ghép

Bµi 5

a) Thõa dÊu hai chÊm ®iỊu kiƯn;

b) ThiÕu dấu hai chấm câu lệnh gán;

(70)

IV/ CỦNG CỐ

- GV củng cố lại kiến thức với loại vòng lặp học - Ơn tập kiến thức lí thuyết từ đầu HK2

- Tự làm lại tập

- Chuẩn bị tốt cho kiểm tra tiết



Tiết 56: KIỂM TRA MỘT TIẾT

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

- Kiểm tra kiến thức từ đầu học kỳ II học sinh

* Kĩ năng

- Có kỹ làm kiểm tra

II/ CHUẨN BỊ * Giáo viên

- Đề

* Học sinh

- Ôn tập trước tới lớp

III/ TIẾN TRÌNH BÀI GIẢNG

ĐỀ BÀI

I/ TRẮC NGHIỆM (3Đ) (Khoanh tròn vào đáp án đúng) Câu 1: Cú pháp c a câu l nh For … là:ủ ệ

a for<biến đếm>:=<Giá trị đầu> to<giá trị cuối> do<câu lệnh>; b for<biến đếm>:=<Giá trị cuối> to<giá trị đầu> do<câu lệnh>; c for<biến đếm>=<Giá trị đầu> to<giá trị cuối> do<câu lệnh>; d for<biến đếm>=<Giá trị đầu> to;<giá trị cuối> do<câu lệnh>; Câu 2: Cho đoạn chương trình:

S:=0;

For i:=1 to do S:=S+i;

Sau thực đoạn chương trình S có kết :

a 20 b 15 c 10 d

Câu 3: Câu lệnh viết cú pháp ngôn ngữ lập trình Pascal là: a. While <điều kiện> to <câu lệnh>;

b. While <điều kiện> do <câu lệnh>;

c. While <điều kiện> to <câu lệnh1> do <câu lệnh 2>; d. While <điều kiện>; do <câu lệnh>;

(71)

Gi¸o ¸n Tin häc - Năm học 2009- 2010 b. For i: = 1 to 10 do writeln(‘A’);

c. For i= 1 to 10 do writeln(‘A’); d. For i: = 1.5 to 9.5 do writeln(‘A’);

Câu 5: Cú pháp c a câu l nh u ki n ngôn ng l p trình Pascal là:ủ ệ ề ệ ữ ậ a. If <điều kiện>; then <câu lệnh>;

b. If <điều kiện> for <câu lệnh>;

c. If<điều kiện> then<câu lệnh1>else<câu lệnh2>; d. If<điều kiện> then<câu lệnh1>;else<câu lệnh2>;

Câu 6: Cú pháp câu lệnh lặp ngơn ngữ lập trình Pascal là: a. For <biến đếm> = <giá trị đầu> ; to <giá trị cuối> do <câu lệnh>;

b. For <biến đếm> := <giá trị đầu> to <giá trị cuối> do <câu lệnh>;

c. For <biến đếm> := <giá trị đầu> : <giá trị cuối> do <câu lệnh>;

d. For <biến đếm> := <giá trị đầu> to <giá trị cuối>; do <câu lệnh>; II/ TỰ LUẬN (6Đ)

Bài 1: (3Đ) - Điền vào chỗ trống để câu đúng:

a) Cấu trúc rẽ nhánh có hai dạng:

b) Câu lệnh lặp với số lần cho trước Pascal là:

c) Câu lệnh lặp với số lần chưa biết trước Pascal là:

Bài 2:(3Đ) - 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.

IV/ CỦNG CỐ

- GV nhận xét KT ý thức làm HS



Tiết 57 : BÀI 9: LÀM VIỆC VỚI DÃY SỐ

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

- Biết khái niệm mảng chiều

- Biết cách khai báo mảng, nhập, in, truy cập phần tử mảng

* Kỹ năng

- Hiểu ứng dụng cách khai báo mảng lập trình

(72)

- Sách giáo khoa, giáo án, máy chiếu

* Học sinh

- Vở ghi, sách giáo khoa

III/ TI N TRÌNH GI D YẾ Ờ Ạ

HĐ CỦA GV & HS NỘI DUNG

Hoạt động (12')

- GV: Giới thiệu ví dụ (SGK Tr 75)

- Như biết bất tiện sử dụng cách khai báo biến biết (khai báo biến đơn) Vì Pascal cung cấp cơng cụ hiệu để hỗ trợ người lập trình kiểu mảng

- GV: Giới thiệu biến mảng

Hoạt động (28')

- GV: Giới thiệu cách khai báo biến mảng

- Cách khai báo trực tiếp biến mảng chiều

Khai báo gián tiếp biến mảng qua kiểu mảng chiều

- GV: Giải thích thành phần cách khai báo biến mảng

1 Dãy số mảng

Các câu lệnh khai báo nhập liệu:

Var Diem_1, Diem_2, Diem_3, .: real;

Read (Diem_1); Read (Diem_2); Read (Diem_3);

- Khi số HS lớp nhiều đoạn khai báo đọc đọc liệu chương trình dài

- Để giải vấn đề Pascal cung cấp kiểu liệu gọi

kiểu mảng

- Khi khai báo biến có kiểu liệu kiểu mảng biến dó gọi

biến mảng

2 Ví dụ biến mảng

Có hai cách khai báo biến mảng

Cách 1: Khai báo trực tiếp biến mảng chiều:

var <tên biến mảng> : array [kiểu chỉ số]of[kiểu phần tử];

Cách 2: Khai báo gián tiếp biến mảng qua kiểu mảng chiều:

type <tên kiểu mảng> = array [kiểu chỉ số]of<kiểu phần tử>;

(73)

Giáo án Tin học - Năm häc 2009- 2010

- GV: sử dụng số ví dụ để luyện tập khai báo mảng chiều giải thích số lượng phần tử, kiểu phần tử biến mảng tương ứng với ví dụ - GV: Gọi HS rút cách khai báo mảng Pascal - GV: Yêu cầu HS đọc VD (Tr76 SGK) Đưa cách khai báo sử dụng biến mảng ? Cách khai báo sử dụng biến mảng có lợi gì?

- GV: Giới thiệu câu lệnh lặp sử dụng biến mảng để so sánh điểm HS so với giá trị

- GV: Giới thiệu cách khai báo nhiều điểm theo môn học

- GV: Giới thiệu câu lệnh gán giá trị mảng câu lệnh gán

- HS: Chú ý lắng nghe suy nghĩ

- HS: Chú ý lắng nghe ghi chép - HS: Nghe ghi chép

- HS: Chú ý quan sát - HS: Ghi chép

trong đó:

- kiểu số dãy số nguyên liên tục n1 n2 với n1, n2 (hoặc

biểu thức cho kết số nguyên) xác định số số cuối (n1n2)

- kiểu phần tử kiểu phần tử mảng

Ví dụ:

Var Chieucao: array[1 50] of real; Var Tuoi: array [21 80] of integer;

Tên mảng: array [<chỉ số đầu> <chỉ số cuối>] of <kiểu sữ liệu>

Var Diem: array [1 50] of real;

- Có thể thay nhiều câu lệnh nhập in liệu hình câu lệnh lặp

For i: = to 50

If Diem[i] > 8.0 then writeln ('Gioi');

Var DiemToan, DiemVăn, DiemLi: array [1 50] of real;

A[1] := 5; A[2] := 8;

(74)

- HS: Ghi chép

- HS: Chú ý quan sát ghi chép

- HS: Chú ý quan sát, luyện tập với ví dụ GV đưa

- HS: Suy nghĩ trả lời câu hỏi - HS: Đọc ví dụ ghi chép

- HS: Trả lời câu hỏi GV

- HS: Chú ý quan sát ghi chép - HS: Chú ý quan sát ghi chép - HS: Chú ý quan sát

For i := to readln (a[i]);

IV/ CỦNG CỐ

- HS nhắc lại kiến thức kiểu mảng, biến mảng, cách khai báo biến mảng - GV củng cố lại kiến thức

- Ôn tập kiến học

- Đọc trước phần 3: Tìm giá trị lớn nhát nhỏ dãy số

(75)

Gi¸o ¸n Tin học - Năm học 2009- 2010

Tiết 58:

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

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

- Biết sâu cách khai báo mảng, nhập, in, truy cập phần tử mảng

* Kỹ năng

- Hiểu ứng dụng thuật tốn tìm số lớn nhất, số nhỏ dãy số

II/ CHUẨN BỊ * Giáo viên

- Sách giáo khoa, giáo án, máy chiếu

* Học sinh

- Vở ghi, sách giáo khoa

III/ TI N TRÌNH GI D YẾ Ờ Ạ

HĐ CỦA GV & HS GHI BẢNG

Hoạt động

- GV: Yêu cầu HS đọc ví dụ (SGK Tr 78) - GV: Giới thiệu thuật toán tìm MAX (số lớn dãy số nguyên nhập từ bàn phím)

- Sau giới thiệu xong thuật tốn tìm Max giáo viên hướng dẫn HS xác định biến, kiểu biến viết khai báo biến; viết câu lệnh thực bước nhập N, nhập phần tử mảng, tìm Max, in Max hình - GV: Từ hướng dẫn giúp HS hiểu đoạn cương trình GV đưa chương trình đầy đủ

3 Tìm giá trị lớn nhỏ của dãy số

Thuật tốn tìm Max dãy số ngun nhập từ bàn phím sau:

Bước Nhập N dãy A1, , An

Bước Max  A1

Bước Lần lượt gán giá trị từ đến

N cho i Với giá trị i thực hiện: Nếu Max <Ai MaxAi Bước Đưa hình giá trị Max kết thúc

(76)

Hoạt động

- GV: Yêu cầu HS nhập lại chương trình vừa học, dịch, chạy chương trình nhận xét kết

- HS: Đọc ví dụ SGK

- HS: Chú ý quan sát ghi chép

- HS: Theo hướng dẫn thực yêu cầu GV

- HS: Hình thành đoạn chương trình quan sát, ghi chép lại chương trình đầy đủ GV đưa

- HS: Khởi động máy tính thực hành

Var

i, N, Max : integer;

A: array[1 100] of integer;

Begin

{Nhap N}

write('Hay nhap dai cua day so, N = '); readln(N);

{Nhap day so}

writeln('Nhap cac phan tu cua day so:');

For i:=1 to N do

Begin

write('a[',i,']='); readln(a[i]); End;

{Tim Max} Max:=a[1];

for i:=2 to n doif Max<a[i] then

Max:=a[i];

{Hien thi Max man hinh}

write('So lon nhat la Max = ',Max); readln;

End

Thực hành

IV/ CỦNG CỐ

- GV củng cố lại kiến thức vừa học

- Tự làm lại tập chuẩn bị tốt cho tiết Bài tập

(77)

Gi¸o ¸n Tin häc - Năm học 2009- 2010 Bi Tp

Câu lệnh Lặp Với Số Lần Chưa Biết Trước

I Mơc tiªu:

1 KiÕn thøc:

Củng cố kiến thức vòng lặp với số lần cha biết trớc 2 Kỹ năng:

Vn dng vũng lặp while câu lệnh ghép viết số toán đơn giản

II/ Chuẩn bị:

Giáo viên: Giáo án, máy tính, sgk Hc sinh: Kiến thức cũ, sgk

III:Tiến trình dạy :

HĐ Thầy & Trò Nội Dung Hoạt động :

-Dựa phần kiểm tra cũ HS, GV nhắc lại lần cấu trúc câu lệnh lặp cấu trúc

-Cùng HS tiến hành giải câu hỏi SGK Đối với câu1, 2, liên quan đến phần lí thuyết GV cần gọi HS trả lời củng cố lại

-Riêng 4, GV cần hướng dẫn cho HS thực GV đặt câu hỏi gợi mở cho HS: 1.Theo em chng trỡnh trờn cú thực vòng lặp hay không?

2 Theo cỏc em chương trỡnh trờn thực yờu cầu gỡ? Hoạt động

GV giải thích lại cho HS -GV cho HS đọc đề

Gọi số HS đứng lên trả lời theo yêu cầu

Phần cho điểm em có câu trả lời

-GV giải thích lại cho HS hiĨu

Hoạt động

-Kết thúc phần tập SGK GV cho HS làm thêm vài toán liên quan đến câu lệnh lặp

-GV gọi số HS đứng lên nêu hướng giải cho tốn Gọi HS lên bảng trình bày

-GV cho Hs nhận xét giải thích củng cố lại

-HS giải 1, 2, 3.Nếu có thắc mắc hỏi GV

Bµi

Hãy tìm hiểu cụm câu lệnh sau cho biết với câu lệnh chơng trình thực vịng lặp? Hãy rút nhận xét em!

a) S:=0; n:=0; while S<=10 do

begin n:=n+1; S:=S+n end;

b) S:=0; n:=0; while S<=10 do n:=n+1;S:=S+n;

a) Chơng trình thực vòng lặp

b) Vũng lp chng trỡnh đ-ợc thực vơ tận sau câu lệnh n:=n+1; câu lệnh lặp kết thúc nên điều kiện S=0 luôn đợc thỏa mãn

Nhận xét: Trong câu lệnh thực hiện, điều kiện cần phải đợc thay đổi để sớm hay muộn chuyển sang trạng thái không thỏa mãn Khi vịng lặp đợc kết thúc sau hữu hạn bớc Để làm đợc điều này, câu lệnh câu lệnh lặp while thờng câu lệnh ghộp

Bài

HÃy lỗi câu lệnh sau đây:

a) X:=10; while X:=10 do X:=X+5;

b) X:=10; while X=10 do X=X+5;

c) S:=0; n:=0; while S<=10 do n:=n+1; S:=S+n;

a) Thõa dÊu hai chÊm ®iỊu kiƯn;

(78)

-HS quan sát tập SGK phát biểu -Một số HS nêu ý kiến

HS đọc đề bài5

-HS trả lời em có giải thích

HS đọc nội dung tập Suy nghĩ thực HS ghi vào

-HS lên bảng trình bày

lƯnh g¸n;

c) ThiÕu c¸c tõ khãa begin

end trớc sau lệnh n:=n+1; S:=S+n, vịng lặp trở thành vơ tận

Bµi

Viết thuật tốn chơng trình Pascal có câu lệnh lặp với số lần khơng xác định để tính lũy thừa bậc n của x (tức xn), với n số tự

nhiên x số thực đợc nhập vào từ bàn phím

ThuËt toán:

Bớc 1 Đọc giá trị x n Bíc 2 A  1, k 

Bíc 3 NÕu k > n, chun xng bíc

Bíc 4 A = A.x, k k + quay lại bớc

Bớc 5 Thông báo kết A và kết thúc thuật toán

Chơng trình Pascal:

Var n,k: integer; A, LT: real; begin

write(‘Nhap so A= ‘); readln(A);

write(‘Nhap so n= ‘); readln(n);

LT:=1; k:=1;

while k<=n begin LT:=LT*A, k:=k+1 end end.

IV Củng cố

- Củng cố lại nhắc vòng lặp vô hạn cần tránh - Củng cố kiến thức baì tập viết chơng tr×nh - Chuẩn bị cho tiết sau

- Cần học tốt xem lại tập



bµi thùc hµnh 7

xư lý dÃy số chơng trình (T1) I Mục tiêu :

 Thực hành khai báo sử dụng biến mảng ;  Ôn luyện cách sử dụng câu lệnh lặp if then, for do;  Củng cố kĩ đọc, hiểu chỉnh sửa chương trình

 Hiểu viết chương trình với thuật tốn tìm giá trị lớn nhất, nhỏ

(79)

Gi¸o ¸n Tin häc - Năm học 2009- 2010 II Chuẩn bị :

Giáo viên :

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

- Đồ dùng dạy học nh máy tính kÕt nèi projector,

Häc sinh :

- Đọc trớc

III : Tin trỡnh gi d yờ

H/Đ CỦA THẦY & TRÒ NỘI DUNG

Chương trình tìm giá trị nhỏ dãy số nguyên P_Min ?

HS chia nhãm lµm thùc hµnh

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: dới 5.0

HS chia nhóm làm thực hành GV gợi ý:

- Dùng câu lệnh ifthen

Bài 1:

Program P_Min;

Var

i, n, Min : integer;

A: array[1 100] of integer;

Begin

write('Hay nhap dai cua day so, N = '); readln(n);

writeln('Nhap cac phan tu cua day so:'); For i:=1 to n do

Begin

write('a[',i,']='); readln(a[i]); End;

Min:=a[1];

for i:=2 to n do if Min>a[i] then

Min:=a[i];

write('So nho nhat la Min = ',Min); readln;

End

Bµi 2:

Program Phan_loai; uses crt;

Var

i, n, G, Kh, TB, K: integer; A: array[1 100] of real;

Begin clrscr;

write('nhap so HS lop, n= '); readln(n);

writeln('Nhap diem :'); For i:=1 to n do

Begin

(80)

End;

G:=0; Kh:= 0; TB:= 0; K:= 0; for i:=1 to n do

Begin

if a[i] >= 8.0 then G:= G + 1;

if a[i] <5.0 then K:= K + 1;

if (a[i] <8.0 ) and (a[i] >=6.5) then Kh:= Kh + 1;

if (a[i] >= ) and (a[i] < 6.5) then TB:= TB + 1;

end;

writeln(' Ket qua hoc tap: '); writeln(G, ' ban hoc gioi '); writeln(Kh, ' ban hoc kha ');

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

readln;

End

IV/Cñng cè

- NhËn xÐt rót kinh nghiƯm giê học



bµi thùc hµnh 7

xử lý dÃy số chơng trình (T2) I Mục tiªu :

 Thực hành khai báo sử dụng biến mảng ;  Ôn luyện cách sử dụng câu lệnh lặp if then, for do;  Củng cố kĩ đọc, hiểu chỉnh sửa chương trình

 Hiểu viết chương trình với thuật tốn tìm giá trị lớn nhất, nhỏ

của dãy số, tính tổng dãy số

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

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

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

Học sinh :

- Đọc trớc

III Ti n trình gi d yế ờ ạ :

H/Đ THẦY & TRỊ NỘI DUNG

Chương trình tính tổng dãy số, in hình dãy số vừa nhập

Bµi 1:

Program P_Sum;

Var

i, n, Sum : integer;

(81)

Giáo án Tin học - Năm häc 2009- 2010

HS chia nhãm lµm thùc hµnh

Bổ sung chỉnh sửa chơng trình BT2 (tiết 59 ) để nhập loại điểm Toán Ngữ văn bạn Sau in hỡnh :

a/ điểm TB bạn lớp theo công thức:

Điểm TB = (Điểm toán + điểm văn)/2 b/ Điểm TB lớp theo môn Toán Ngữ văn

HS chia nhóm lµm thùc hµnh

Begin

write('Hay nhap dai cua day so, N = '); readln(n);

writeln('Nhap cac phan tu cua day so:'); For i:=1 to n do

Begin

write('a[',i,']='); readln(a[i]); End;

Sum:=0;

for i:=1 to n do Sum:= Sum + a[i]; write('Day so vua nhap la: '); for i:=1 to n do write(a[i], ' '); writeln;

write('Tong day so la = ',Sum); readln;

End

Bµi 2:

Program Xep_loai; uses crt;

Var

i, n: integer;

TBtoan, TBvan: real;

diemT, diemV: array[1 100] of real;

Begin clrscr;

writeln('Diem TB : '); For i:=1 to n do

write(i,' ',(diemT[i] + diemV[i])/2:3:1); TBtoan: =0; TBvan: =0;

For i:=1 to n do

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;

(82)

IV.Cđng cè - NhËn xÐt rót kinh nghiƯm giê học VỊ nhµ - Häc sinh vỊ nhµ ụn bi

- Đọc trớc bài: Quan sát hình không gianvới phần mềm yenka

Tit 61 : QUAN SÁT HÌNH KHƠNG GIAN VỚI PHẦN MỀM YENKA I mục tiêu :

- HS biêt khám phá, hình khơng gian : Thay đổi, di chuyển, thay đổi kích thước, thay đổi màu cho hình

- HS thực kỹ thay đổi, di chuyển, thay đổi kích thước, thay đổi màu cho hình

II Chuẩn bị :

Giáo viên : tài liệu, giáo án Học sinh :

III/ Tiến trình tiết daïy :

H/Đ THÂY & HS NỘI DUNG

Hoạt động 1:

- GV giới thiệu phần mềm chức phần mềm

- HS : Ghi nhớ

- GV Giới thiệu hình làm việc

+ Khởi động HS : Nắm bắt

+ Màn hình làm việc

1 Giới thiệu

- Yenka phần mềm nhánh công ty phần mềm Crocodile tiếng

- Chức phần mềm giúp học sinh thiết kế mơ hình hình khối kiến trúc khơng gian dựa hình khơng gian c/ nhu hình trụ, lăng trụ, hình chóp, hình hộp

2/ Giới thiệu hình làm việc

a/ khởi động :

(83)

Gi¸o ¸n Tin học - Năm học 2009- 2010

+ Thoát khỏi phần mềm

c/Thoát khỏi phần mềm : - Alt + F4

IV/ Củng cố :

- Nắm vững chức phần mềm - Các thao tác xử dụng phần mềm



Tiết 62: QUAN SÁT HÌNH KHÔNG GIAN VỚI PHẦN MỀM YENKA (tt) I mục tiêu :

- HS biêt khám phá, hình không gian : Thay đổi, di chuyển, thay đổi kích thước, thay đổi màu cho hình

- HS thực kỹ thay đổi, di chuyển, thay đổi kích thước, thay đổi màu cho hình

II Chuẩn bị :

Giáo viên : tài liệu, giáo án Học sinh :

III/ Tiến trình tiết dạy :

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

Hoạt động

GV : Hướng dẫn HS tạo hình khơng gian tạo mơ hình HS : Nắm vững thao tác

3/ Tạo hình không gian : a/ Tạo mô hình :

(84)

GV : Hướng dẫn HS thao tác xoay hình khơng gian 3D-Thao tác phóng to thu nhỏ

HS : Nắm bắt

GV: Hướng dẫn thao tác tạo mới, lưu, mở tệp mơ hình cách xóa đối tượng

Hs : nắm vững thao tác

Chọn hình kéo thả đối tượng vào khu vực tạo đối tượng

 Xoay mô hình không gian 3D :

- Nháy vào biểu tượng xoay - Đưa trỏ chuột lên mơ hình

 Phóng to , thu nhỏ :

 di chuyển khung mô hình :

b/ lệnh tạo mới, lưu, mở tệp mơ hình :

c/ Xóa đối tượng :

- Nhấp chuột vào mô hình cần xóa

Hình trụ

hình chóp Hình lăng

trụ

(85)

Gi¸o ¸n Tin học - Năm học 2009- 2010

- Ctrl + A Delete

IV/ Củng cố:

- Yêu cầu HS nắm vững thao tác phân mềm

Ngày đăng: 20/04/2021, 10:15

TỪ KHÓA LIÊN QUAN

w