- Thái độ học tập nghiêm túc, yêu thích viết chương trình để thực hiện một số công việc.. CHUẨN BỊ:I[r]
(1)Tiết 45
Bài 8: LẶP VỚI SỐ LẦN CHƯA BIẾT TRƯỚC I MỤC TIÊU:
1 Kiến thức:
- Hiểu nhu cầu cần có cấu trúc lặp với số lần chưa biết trước ngơn ngữ lập trình;
- Hiểu ngơn ngữ lập trình dùng cấu trúc lặp với số lần chưa biết trước để dẫn máy tính thực lặp lặp lại công việc đến điều kiện thoả mãn;
2 Kĩ năng:
- Rèn luyện kĩ sử dụng câu lệnh Pascal Thái độ:
- Thái độ học tập nghiêm túc, u thích mơn học II CHUẨN BỊ:
GV: Sách giáo khoa, máy tính điện tử HS: Sách, ,đọc nhà
III PHƯƠNG PHÁP - Giải đáp, hướng dẫn
IV HOẠT ĐỘNG DẠY HỌC:
HOẠT ĐỘNG CỦA THẦY HOẠT ĐỘNG CỦA TRỊ NỘI DUNG
Hoạt động 1: Tìm hiểu ví dụ 1.
- Một ngày chủ nhật Long gọi điện cho Trang Khơng có nhấc máy Long định gọi lại thêm lần Như Long biết trước lặp lại gọi điện thêm lần
GV: Chiếu ví dụ lên máy chiếu ? Lần Long lặp lại việc gọi điện lần
? Điều kiện để kết thúc hoạt động lặp gì?
+ Học sinh ý lắng nghe => ghi nhớ kiến thức
+ Chưa thể biết trước được, lần, hai lần nhiều
+ Điều kiện để kết thúc hoạt động lặp có người nhấc máy
(2)? Tìm hiểu bước thuật tốn ví dụ
- Ta có sơ đồ khối
Nhận xét?
+ Đọc kĩ đề
+ Kí hiệu S tổng cần tìm ta có thuật toá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
là số tự nhiên nhỏ cho S > 1000 Kết thúc thuật toán
* Nhận xét : Để viết chương trình dẫn máy tính thực hoạt động lặp ví dụ trên, ta sử dụng câu lệnh có dạng lặp với số lần chưa biết trước
V DẶN DÒ
(3)Tiết 46
Bài 8: LẶP VỚI SỐ LẦN CHƯA BIẾT TRƯỚC (tt) I MỤC TIÊU:
1 Kiến thức:
- Biết cú pháp hoạt động câu lệnh lặp với số lần trước - Biết số lỗi lập trình cần tránh
2 Kĩ năng:
- Rèn luyện kĩ sử dụng câu lệnh lặp không xác định Pascal Thái độ:
- Thái độ học tập nghiêm túc, u thích mơn học II CHUẨN BỊ:
GV: Sách giáo khoa, máy tính điện tử, phần mềm Geogebra HS: Sách, ,đọc nhà
III PHƯƠNG PHÁP - Giải đáp, hướng dẫn
IV HOẠT ĐỘNG DẠY HỌC:
HOẠT ĐỘNG CỦA THẦY HOẠT ĐỘNG CỦA TRÒ NỘI DUNG
Hoạt động 1: Tìm hiểu ví dụ lệnh lặp với số lần trước.
- Câu lệnh lặp trước Pascal có dạng:
* Cú pháp:
While <điều kiện> do <câu lênh>;
- Trong đó: Điều kiện? Câu lệnh?
? Yêu cầu học sinh nghiên cứu SGK => hoạt động câu lệnh
+ Học sinh ý lắng nghe => ghi nhớ kiến thức
+ Điều kiện: thường phép so sánh
+ Câu lệnh: câu lệnh đơn giản hay câu lệnh ghép
+ Học sinh nghiên cứu SGK => hoạt động:
- B1 Kiểm tra điều kiện
- B2 Nếu điều kiện sai, câu lệnh bị bỏ qua việc thực câu lệnh
(4)+ Nghiên cứu chương trình SGK
theo yêu cầu giáo viên
+ Kết nhận sau chạy chương trình n = 45 tổng tiên lớn 1000 1034
- Đưa số ví dụ lên máy chiếu - Yêu cầu học sinh tìm hiểu chương trình SGK
? Hãy cho biết kết nhận sau chạy chương trình
Hoạt động 2:Tìm hiểu lặp vơ hạn lỗi lập trình cần tránh.
- Khi viết chương trình sử dụng cấu trúc lặp cần ý tránh tạo nên vịng lặp khơng bao kết thúc
- GV chiếu chương trình lên máy chiếu phân tích
+ Học sinh ý lắng nghe => ghi nhớ kiến thức
V DẶN DÒ
(5)Tiết 47
Bài thực hành số 6
SỬ DỤNG LỆNH LẶP WHILE DO
I MỤC TIÊU: Kiến thức:
- Viết chương trình Pascal sử dụng câu lệnh lặp với số lần chưa biết trước Kĩ năng:
- Rèn luyện kĩ đọc chương trình, tìm hiểu tác dụng câu lệnh Thái độ:
- Thái độ học tập nghiêm túc, u thích viết chương trình để thực số công việc II CHUẨN BỊ:
GV: Sách giáo khoa, máy tính điện tử, phần mềm Geogebra HS: Sách, ,đọc nhà
III PHƯƠNG PHÁP - Giải đáp, hướng dẫn
IV HOẠT ĐỘNG DẠY HỌC:
HOẠT ĐỘNG CỦA
THẦY HOẠT ĐỘNG CỦA TRÒ NỘI DUNG
Hoạt động 1: Làm tập
1 Viết chương trình sử dụng lệnh lặp While … để tính n số thực x1,x2,x3…xn Các số n x1,x2,x3…, xn nhập từ bàn phím
- Ý tưởng?
- Mơ tả thuật tốn chương trình, biến dự định sử dụng kiểu chúng
+ Sử dụng biến đếm lệnh lặp While…do để nhập cộng dần số vào biến kiểu số thực nhập đủ n số + Chú ý lắng nghe => ghi nhớ kiến thức
1 Viết chương trình sử dụng lệnh lặp While … để tính n số thực x1,x2,x3…xn Các số n x1,x2,x3…, xn nhập từ bàn phím
Gõ chương trình sau đây: Program tinh_trung_binh; Var n, dem: integer; X, tb: real; Begin
Dem:=0; tb:=0;
Writeln(‘nhap cac so can tinh n =’);
- Gõ chương trình sau đây: Program tinh_trung_binh; Var n, dem: integer; X, tb: real; Begin
Dem:=0; tb:=0;
Writeln(‘nhap cac so can tinh n =’);
Readln(n);
+ Học sinh độc lập gõ chương
trình vào máy Readln(n);While dem < n Begin
Dem:= dem + 1;
Writeln(‘nha so thu’, dem,’=’); Readln(x);
Tb:= tb + x; End;
(6)While dem < n Begin
Dem:= dem + 1;
Writeln(‘nha so thu’, dem,’=’); Readln(x);
Tb:= tb + x; End;
Tb:=tb/n;
Witeln(‘Trung binh của’,n,’so =’, tb:10:3);
Readln; End
- Lưu chương trình với tên tinh_tb
- Đọc hiểu tìm hiểu ý nghĩa câu lệnh Dịch chương trình sửa lỗi, có Chạy chương trình với liệu gõ từ bàn phím kiểm tra kết nhận
+ Học sinh lưu chương trình theo yêu cầu giáo viên
+ Học sinh thực theo yêu cầu giáo viên
Witeln(‘Trung binh của’,n,’so =’, tb:10:3);
Readln; End
V DẶN DÒ:
(7)Tiết 48
Bài thực hành số 6
SỬ DỤNG LỆNH LẶP WHILE DO (tt)
I MỤC TIÊU: Kiến thức:
- Viết chương trình Pascal sử dụng câu lệnh lặp với số lần chưa biết trước Kĩ năng:
- Rèn luyện kĩ đọc chương trình, tìm hiểu tác dụng câu lệnh Thái độ:
- Thái độ học tập nghiêm túc, yêu thích viết chương trình để thực số cơng việc II CHUẨN BỊ:
GV: Sách giáo khoa, máy tính điện tử, phần mềm Geogebra HS: Sách, ,đọc nhà
III PHƯƠNG PHÁP - Giải đáp, hướng dẫn
IV HOẠT ĐỘNG DẠY HỌC:
HOẠT ĐỘNG CỦA THẦY HOẠT ĐỘNG CỦA TRÒ NỘI DUNG
Hoạt động 1: Làm tập SGK
- Gọi học sinh đọc đề sách giáo khoa
- Ý tưởng?
- Giáo viên đưa ý tưởng để học sinh tìm hiều
Ý tưởng: Kiểm tra N có chia hết cho số tự nhiên ≤ i
≤ N hay khơng Kiểm tra tính chia hết phép chia lấy phần dư (mod)
? Đọc tìm hiểu ý nghĩa câu lệnh chương trình sau đây:
Uses Crt;
Var n,i:integer;
Begin Clrscr;
Bài 2. Tìm hiểu chương trình nhận biết số tự nhiên N nhập vào từ bàn phím có phải số ngun tố hay khơng
- Học sinh tìm hiểu ý tưởng theo hướng dẫn giáo viên
+ Học sinh đọc chương trình tìm hiểu ý nghĩa câu lệnh theo hướng dẫn giáo viên
Bài 2. Tìm hiểu chương trình nhận biết số tự nhiên N nhập vào từ bàn phím có phải số nguyên tố hay không
Uses Crt;
Var n,i:integer;
Begin
Clrscr;
write('Nhap vao mot so nguyen:
');readln(n); If n<=1 then
writeln('N khong la so nguyen to')
else
(8)write('Nhap vao mot so nguyen:
');readln(n); If n<=1 then
writeln('N khong la so nguyen to')
else
begin
i:=2;
while (n mod
i<>0) i:=i+1;
if i=n then
writeln(n,' la so nguyen to!')
else
writeln(n,' khong phai la so nguyen to!');
end;
readln
end
+ Gõ chương trình vào máy, chạy
chương trình kiểm tra kết + Học sinh độc lập gõ chươngtrình vào máy. + Nhấn Ctrl + F9 để chạy kiểm tra chương trình
i:=2;
while (n mod
i<>0) i:=i+1;
if i=n then
writeln(n,' la so nguyen to!')
else
writeln(n,' khong phai la so nguyen to!');
end;
readln
end
V DẶN DÒ: - Tiết sau tập
(9)Thực hành: HỌC VẼ HÌNH VỚI PHẦN MỀM GEOGEBRA
I MỤC TIÊU: Kiến thức:
- Biết cơng cụ làm việc phần mềm: công cụ di chuyển, công cụ liên quan đến đối tượng điểm…
2 Kĩ năng:
- Rèn luyện kĩ sử dụng công cụ làm việc phần mềm Thái độ:
- Thái độ học tập nghiêm túc, u thích mơn học II CHUẨN BỊ:
GV: Sách giáo khoa, máy tính điện tử, phần mềm Geogebra HS: Sách, ,đọc nhà
III PHƯƠNG PHÁP - Giải đáp, hướng dẫn IV HOẠT ĐỘNG DẠY HỌC
HOẠT ĐỘNG CỦA THẦY HOẠT ĐỘNG CỦA TRÒ NỘI DUNG
Hoạt động 1: Khởi động phần mềm Geogebra
- Khởi động phần mềm Geogebra máy tính
- Yêu cầu học sinh kết thúc phần mềm
- Yêu cầu học sinh khởi động phần mềm theo cách khác
+ Kích đúp vào biểu tượng hình để khởi động phần mềm theo yêu cầu giáo viên + Học sinh kết thúc phần mềm theo yêu cầu giáo viên
+ Nháy chuột vào menu Start \ All Programs\ GeoGebra \ GeoGebra để khởi động phần mềm
1 Khởi động phần mềm
Hoạt động 2: Nhận biết hình làm việc phần mềm Geogebra.
Yêu cầu học sinh nhận biết thành phần hình làm việc phần mềm máy tính
+ Học sinh thực theo hướng dẫn giáo viên
2 Nhận biết hình làm việc phần mềm.
V DẶN DÒ:
- Xem trước tập
Ngày soạn:06/03/2016 Ngày dạy:10/03/2016
(10)Thực hành: HỌC VẼ HÌNH VỚI PHẦN MỀM GEOGEBRA (tt)
I MỤC TIÊU: Kiến thức:
- Biết công cụ làm việc phần mềm: cơng cụ di chuyển, công cụ liên quan đến đối tượng điểm…
2 Kĩ năng:
- Rèn luyện kĩ sử dụng cơng cụ làm việc phần mềm Thái độ:
- Thái độ học tập nghiêm túc, u thích mơn học II CHUẨN BỊ:
GV: Sách giáo khoa, máy tính điện tử, phần mềm Geogebra HS: Sách, ,đọc nhà
III PHƯƠNG PHÁP - Giải đáp, hướng dẫn IV HOẠT ĐỘNG DẠY HỌC
HOẠT ĐỘNG CỦA THẦY HOẠT ĐỘNG CỦA TRÒ NỘI DUNG
Hoạt động : Khởi động phần mềm.
Yêu cầu học sinh khởi động phần mềm Geogebra
+ Kích đúp vào biểu tượng hình để khởi động phần mềm theo yêu cầu giáo viên
1 Khởi động phần mềm:
Hoạt động 2: Sử dụng phần mềm để làm số tập
Sử dụng phần mềm để vẽ số hình sau:
+ Dùng công cụ vẽ đoạn thẳng để vẽ cạnh tam giác
+ Cho trước đỉnh A, B, C Dựng đỉnh D hình than ABCD dựa công cụ đoạn thẳng đường song song
2 Sử dụng phần mềm để vẽ số hình hình học:
- Vẽ hình tam giác
(11)dựa công cụ đoạn thẳng, đường thẳng, đường trung trực phép biến đổi đối xứng qua trục Cho trước tam giác A, B, C Dùng cơng cụ đường trịn vẽ đường trịn qua điểm A,B,C
+ Cho trước tam giác A, B, C Dùng công cụ đường phân giác, đường vng góc đường trịn vẽ đường trịn nội tiếp tam giác ABC
- Vẽ hình thang cân
- Vẽ đường tròn ngoại tiếp tam giác,
- Vẽ đường tròn nội tiếp tam giác
Sử dụng phần mềm để vẽ số
hình sau: Cho trước cạnh AB đườngthẳng qua A Hãy vẽ hình thoi ABCD lấy đường thẳng cho đường chéo Sử dụng cơng cụ thích hợp học để dựng đỉnh C, D hình thoi
2 Sử dụng phần mềm để vẽ số hình hình học:
(12)Sử dụng cơng cụ thích hợp để vẽ hình vng biết trước cạnh
Cho trước cạnh BC, vẽ tam giác ABC
Cho hình đường thẳng mặt phẳng Hãy dựng hình đối xứng hình cho qua trục đường thẳng Sử dụng công cụ đối xứng trục để vẽ hình
- Vẽ hình vng
Vẽ hình tam giác
- Vẽ hình đối xứng trục đối tượng cho trước hình
V - DẶN DÒ:
- Xem lai :LẶP VỚI SỐ LẦN CHƯA BIẾT TRƯỚC để tiết sau làm tập
Ngày soạn: 13/03/2016 Ngày dạy:17/03/2016
(13)I MỤC TIÊU: Kiến thức:
- Viết chương trình Pascal sử dụng câu lệnh lặp với số lần biết trước Kĩ năng:
- Rèn luyện khả đọc chương trình, tìm hiểu tác dụng kết hợp câu lệnh Thái độ:
- Thái độ học tập nghiêm túc, u thích mơn học II CHUẨN BỊ:
GV: Sách giáo khoa, máy tính điện tử HS: Sách, ,đọc nhà
III PHƯƠNG PHÁP - Giải đáp, hướng dẫn
IV HOẠT ĐỘNG DẠY HỌC:
HOẠT ĐỘNG CỦA THẦY HOẠT ĐỘNG CỦA TRỊ NỘI DUNG
Hoạt động 1: Ơn tập câu lệnh lặp xác định For do.
? Nêu cú pháp vòng lặp xác định
? Nêu hoạt động vòng lặp
+ Cú pháp: For <biến đếm>:= <giá trị đầu> to <giá trị cuối> <câu lệnh>;
+ Hoạt động vòng lặp: - B1: biến đếm nhận giá trị đầu - B2: Chương trình kiểm tra biểu thức điều kiện, biểu thức điều kiện thực câu lệnh - B3: Biến đếm tự động tăng lên đơn vị quay lại B2
- B4: Nếu biểu thức điều kiện nhận giá trị sai khỏi vịng lặp
? Nêu cú pháp vòng lặp xác định
? Nêu hoạt động vòng lặp
Hoạt động 2:Bài tập.
1 Các câu lệnh Pascal sau có hợp lệ khơng, sao?
a) for i:=100 to
+ Trừ câu d), tất câu lệnh không hợp lệ:
a) Giá trị đầu phải nhỏ giá trị cuối;
1 Các câu lệnh Pascal sau có hợp lệ khơng, sao?
(14)1 do writeln('A');
b) for i:=1.5 to
10.5 do writeln('A');
c) for i=1 to 10
do writeln('A');
d) for i:=1 to
10 do; writeln('A');
e) var x: real;
begin for x:=1 to 10
do writeln('A'); end.
2 Hãy mơ tả thuật tốn để tính tổng sau đây:
i A =
1 1
1.32.43.5 n n( 1).
b) Các giá trị đầu giá trị cuối phải số nguyên;
c) Thiếu dấu hai chấm gán giá trị đầu;
d) Thừa dấu chấm phẩy thứ nhất, ta muốn lặp lại câu lệnh
writeln('A') mười lần, ngược lại câu lệnh hợp lệ;
e) Biến x đã khai báo biến có liệu kiểu số thực dùng để xác định giá trị đầu giá trị cuối câu lệnh lặp
* Thuật tốn tính tổng:
A =
1 3+
1 4+
1
3 5+
n(n+1)
Bước 1 Gán A 0, i
Bước 2 A
( 2)
i i .
Bước 3 i i +
Bước 4 Nếu i n, quay lại bước
2
Bước 5 Ghi kết A và kết thúc thuật toán
to do
writeln('A');
g) for i:=1.5
to 10.5 do
writeln('A');
h) for i=1 to
10 do writeln('A');
i) for i:=1 to
10 do; writeln('A');
j) var x:
real; begin for x:=1
to 10 do
writeln('A'); end.
V DẶN DÒ: