ngay giáo án tin học 8 năm học 2009 2010 ngày soạn ngày giảng 8a 8b 8c 8d 8e tiết 37 bài 7 câu lệnh lặp 1 mục tiêu a kiến thức biết nhu cầu cần có câu lệnh lặp trong ngôn ngữ lập trình biết ngôn ngữ l

100 19 0
ngay giáo án tin học 8 năm học 2009 2010 ngày soạn ngày giảng 8a 8b 8c 8d 8e tiết 37 bài 7 câu lệnh lặp 1 mục tiêu a kiến thức biết nhu cầu cần có câu lệnh lặp trong ngôn ngữ lập trình biết ngôn ngữ l

Đ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

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

(1)

Ngày soạn: Ngày giảng: 8A:

8B: 8C: 8D: 8E: Tiết 37:

BÀI 7: CÂU LỆNH LẶP 1 Mục tiêu:

a Kiến thức:

- Biết nhu cầu cần có câu lệnh lặp ngơn ngữ lập trình

- Biết ngơn ngữ lập trình dùng cấu trúc lặp để dẫn máy tính thực lặp lặp lại cơng việc số lần

- Hiểu hoạt động câu lệnh lặp với số lần biết trước for ….do pascal b Kỹ năng:

- Viết lệnh for ……… số tình đơn giản c.Thái độ:

- Thái độ học tập nghiêm túc, tích cực làm dạng tập ứng dụng 2 Chuẩn bị giáo viên học sinh:

a Chuẩn bị GV:

- Giáo án, SGK, phòng máy, phần mềm pascal b Chuẩn bị HS:

- SGK, ghi, bút 3 Tiến trình dạy:

a Kiểm tra cũ: Khơng KT b Dạy nội dung mới:

HOẠT ĐỘNG CỦA GV HOẠT ĐỘNG CỦA HS

Hoạt động 1: Các công việc phải thực nhiều lần (5’) ? Hàng ngày thường phải làm

số việc lặp lặp lại số lần, em lấy ví dụ số việc hàng ngày em phải làm - GV: Ghi ví dụ học sinh lên bảng

? Qua ví dụ bạn vừa lấy bảng cơng việc

1 Các công việc phải thực hiền nhiều lần - HS: em lấy số ví dụ

(2)

biết trước số lần lặp lặp lại công việc chưa biết số lần lặp lại nó? - GV: Nhận xét chốt lại

- HS: Tách ví dụ thành hai loại (một loại biết trước số lần lặp loại chưa biêt số lần lặp )

- Công việc trước: số lần lặp lại: học thuộc hết bài, - Công việc biết trước số lần lặp: học sáng tiết, ngày tập thể dục buổi sáng, đánh ngày lần,

=> Để cho máy tính thực công việc, nhiều trường hợp viết một chương trình máy tính phải viết lặp lại nhiều câu lệnh thực một phép tính định.

VD: Để tính số tự nhiên ta viết sau:

begin

I=0; Tong:=0;

I:=i+1; Tong:=Tong+i; I:=i+1; Tong:=Tong+i; I:=i+1; Tong:=Tong+i; I:=i+1; Tong:=Tong+i; I:=i+1; Tong:=Tong+i; Readln; end

Hoạt động 2: Câu lệnh lặp - lệnh thay cho nhiều lệnh (15’)

- GV: phân tích ví dụ - HS: Nghe, nghi chép

2 Câu lện lặp - lệnh thay cho nhiều lệnh

HS: nghiên cứu ví dụ SGK - 56,57 - HS: Nghe, nghi chép

VD1:

- HS: Mơ tả lại thuật tốn, phân tích thuật tốn

Vẽ hình vng giống - thuật tốn (SGK T56,57)

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

(3)

Qua hai ví dụ trên, em công việc lặp lặp lại?

- GV: Kết luận

-HS: Chỉ công việc lặp lại vd1 vd2 => Kết luận:

- Cách mô tả hoạt động lặp thuật toán ví dụ gọi là cấu trúc lặp.

- Mọi ngơn ngữ lập trình có “cách” để chỉ thị cho máy tính thực cấu trúc lặp với câu lệnh Đó câu lệnh lặp.

Hoạt động 3: Ví dụ câu lệnh lặp (15’) - GV: Trình bày cấu trúc vòng lặp For

…… to…… …………

GV: Giải thích thành phần cấu trúc lệnh

GV: vận dụng câu lệnh viết vịng lặp cho ví dụ phần

Var i, tong: integer; Begin

Tong:=0;

For i: = to Tong:= tong + i; Write(‘tong=’,tong); Readln;

End

3 Ví dụ câu lệnh lặp

- HS: Ghi cấu trúc vòng lặp vào - Trong pascal câu lệnh lặp có dạng: +Câu lệnh lặp dạng tiến:

For <biến đếm>:= <giá trị đầu> to <giá trị cuối> <câu lệnh>;

-HS: Nghe, ghi chép

Trong đó: for, to, từ khố, Biến đếm biến đơn có kiểu nguyên (có thể là kiểu kí tự kiểu đoạn con)

Giá trị đầu, giá trị cuối số cụ thể hoặc là biểu thức có kiểu kiểu với biến đếm, giá trị cuối phải lớn giá trị đầu. Câu lệnh câu lệnh đơn câu lệnh kép.

- Câu lệnh thực nhiều lần, mỗi lần thực câu lệnh lần lặp và sau lần lặp biến đếm tự động tăng lên đơn vị, tăng giá trị của biến đếm lớn giá trị cuối vịng lặp dừng lại.

c Củng cố, luyện tập:2’

Giáo viên hệ thống lại toàn nội dung học d Hướng dẫn học sinh tự học nhà: 1’

(4)

Ngày soạn: Ngày giảng: 8A:

8B: 8C: 8D: 8E: Tiết 38:

BÀI 7:

CÂU LỆNH LẶP (TT) 1 Mục tiêu:

a Kiến thức:

- Hiểu cấu trúc câu lệnh ghép b Kỹ năng:

- Biết kết hợp câu lệnh ghép câu lệnh lặp for ………do vào giải số toán

c Thái độ:

- Thái độ học tập nghiêm túc, tích cực làm dạng tập ứng dụng 2 Chuẩn bị giáo viên học sinh:

a Chuẩn bị GV:

- Giáo án, SGK, phòng máy, phần mềm pascal b Chuẩn bị HS:

- SGK, ghi, bút 3 Tiến trình dạy: a Kiểm tra cũ: 7’

? Trình bày cầu trúc câu lệnh lặp pascal, nêu ý nghĩa thành phần cấu trúc?

- cấu trúc câu lệnh lặp:

For <biến đếm>:= <giá trị đầu> to <giá trị cuối> <câu lệnh>;

Trong đó: for, to, từ khố, Biến đếm biến đơn có kiểu ngun (có thể kiểu kí tự kiểu đoạn con)

Giá trị đầu, giá trị cuối số cụ thể biểu thức có kiểu kiểu với biến đếm, giá trị cuối phải lớn giá trị đầu.

Câu lệnh câu lệnh đơn câu lệnh kép. b Dạy nội dung mới:

(5)

Hoạt động 1: Ví dụ câu lệnh lặp (13’) -GV: Trình bày cấu trúc câu lệnh lặp

lùi pascal

For …… downto……….do

GV: Giải thích hoạt động câu lệnH - GV: cho chạy chương trình mẫu gõ trước máy, yêu cầu học sinh quan sát kết

- GV: Giải thích kết chương trình

- GV: Trình bày cấu trúc câu lệnh ghép - GV: cho chạy chương trình mẫu gõ trước máy, yêu cầu học sinh quan sát kết

- GV: Giải thích kết chương trình

3 Ví dụ câu lệnh lặp (tiếp) HS: Ghi chép cấu trúc vào - Cấu trúc câu lệnh lặp lùi:

For <biến đếm>:= <giá trị cuối> downto <giá trị đầu> <câu lệnh>;

- HS: Đọc tìm hiểu chương trình

- HS: em đứng chỗ phân tích hoạt động ví dụ

- HS: Các em khác thảo luận cho ý kiến - Câu lệnh thực nhiều lần, lần thực câu lệnh lần lặp sau mỗi lần lặp biến đếm tự động giảm đi1 đơn vị, giảm giá trị biến đếm nhỏ giá trị đầu vịng lặp dừng lại.

-số lần lặp = giá trị cuối-giá trị đầu+1 => for …do cấu trúc lặp với số lần lặp biết trước.

- Ví dụ (SGK-58) in hình thứ tự lần lặp

Program lap; Var i: integer; Begin

For i:=1 to 10

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

End

- VD4 (SGK-58) Viết chương trình đưa hình chữ “0” theo hình trứng rơi Program trung_roi;

(6)

Clrscr;

For i:=1 to 10 begin

Writeln(‘0’); delay(100); end;

Readln; End

- Tập hợp câu lệnh đặt cặp từ khoá begin end; gọi câu lệnh ghép

Hoạt động 2: Tính tổng tích câu lệnh lặp (20’)

- GV: Đưa đề lên bảng

-GV: Giúp HS sửa lại thuật toán GV: Giúp học sinh sửa chương trình cho chạy chương trình máy

4 Tính tổng tích câu lệnh lặp Ví dụ Tính tổng N số tự nhiên (Chương trình SGK)

Ví dụ Tính day thưa N số tự nhiên

(Chương trình SGK)

- HS: em lên bảng làm vd5, em lên làm vd6.(mơ tả thuật tốn)

ở lớp cá cem làm theo nhóm, dãy làm bài, dãy làm vd5

- HS: Đại diện dãy nhận xét thuật toán bảng

- HS: Quan sát kết

c Củng cố, luyện tập: 4’

HS đọc ghi nhớ SGK, giáo viên tổng kết đánh giá buổi học. d Hướng dẫn học sinh tự học nhà: 1’

(7)

Ngày soạn: Ngày giảng: 8A:

8B: 8C: 8D: 8E: Tiết 39:

BÀI TẬP 1 Mục tiêu:

a Kiến thức :

- Nắm lại kiến thức cấu trúc lặp: cấu trúc lặp sử dụng để làm gì? Cú pháp cấu trúc lặp với số lần lặp biết trước Pascal?

b Kĩ năng:

- Sử dụng cấu trúc lặp với số lần lặp biết trước để mơ tả thuật tốn số toán đơn giản

- Viết cú pháp cấu trúc lặp với số lần lặp biết trước Pascal c Thái độ:

- Rèn luyện tư khoa học, tư logic, ý thức học tập, ham thích tìm hiểu 2 Chuẩn bị giáo viên học sinh:

a Chuẩn bị giáo viên: Giáo án, SGK b Chuẩn bị học sinh:

SGK, vở, Xem lại kiến thức 3 Tiến trình dạy:

a Kiểm tra cũ: 7’

Em cho vài ví dụ hoạt động thực lặp lại sống ngày?

Nêu cú pháp câu lệnh lặp với số lần lặp biết trước Pascal? b Dạy nội dung mới: 33’

HOẠT ĐỘNG CỦA GIÁO VIÊN HOẠT ĐỘNG CỦA GIÁO VIÊN

HS: đọc đề sgk

- GV: nhận xét kết luận: với câu lệnh lặp với số lần lặp biết trước Pascal điều kiện cần kiểm tra là: giá trị biến đếm

Bài 3: (sgk)

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> <câu lệnh>;

(8)

lớn giá trị cuối Nếu điều kiện không thoả mãn, câu lệnh tiếp tục thực hiện; ngược lại, chuyển sang câu lệnh chương trình

- GV: đoạn chương trình sau, sử dụng cấu trúc gì?

- GV: đoạn chương trình sử dụng cấu trúc lặp với số lần lặp biết trước bao nhiêu?

Câu lệnh 1: j có giá trị

Khi gặp vòng lặp for i : = to Câu l nh ệ th c hi n nh sau:ự ệ

Lần lặp thứ i Giá trị của

j

1

2

3

4

5 10

6 12

? nhắc lại cú pháp câu lặp với số lần lặp biết trước Pascal

- HS: đưa đáp án giải thích

Tất câu lệnh không hợp lệ Câu a: giá trị đầu biến đếm phải nhỏ giá trị cuối

Câu b: giá trị đầu cuối biến đếm phải số nguyên

Câu c: thiếu dấu “: ” gán giá trị đầu Câu d: thừa dấu “; ” 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ệ

Câu e: biến x khai báo kiểu thực khơng thể dùng để xác định giá trị đầu gía trị cuối câu lệnh lặp (biến đếm số nguyên)

Bài 4: (sgk)

HS: đọc đề SGK

HS: cấu trúc lặp với số lần lặp biết trước Sau thực đoạn chương trình sau, giá trị biến j bao nhiêu?

HS: lần

HS: đưa đáp án giải thích câu lệnh vịng lặp for

J : = 0;

For i: = to j : = j + ; => sau bước lặp giá trị biến j = 12

Bài - sgk: Các câu lệnh Pascal sau có hợp lệ khơng, sao?

a) For i: = 100 to writeln(‘A’); b) For i: = 1.5 to 10.5 writeln(‘A’); c) For i = to 10 writeln(‘A’); d) For i : = to 10 do; writeln(‘A’); e) Var x: real;

begin

(9)

- HS: đọc đề nêu thuật toán toán - GV: nhận xét đưa thuật toán:

Bước 1: gán A <- 0, i <- Bước 2: A < - i(i+2)1 Bước 3: i < - i +

Bước 4: i≤ n quay lại bước Bước 5: ghi kết A kết thúc thuật toán

- HS: đọc đề

- HS: nêu thuật toán - HS: viết chương trình

- GV: nhận xét đưa đoạn chương trình

Program chao;

Var i:integer; ten: string; Begin

For i: = to

begin Writeln (‘nhap ten:’); readln(ten);

writeln(‘Hello’, ten, ‘!’); end;

readln; end

writeln(‘A’); end

Bài 6- sgk:

Hãy mô tả thuật tốn để tính tổng sau đây:

A= 1 3+

1 4+

1

3 5+ + n(n+2)

Bài 7: Viết chương trình nhập vào tên và hiển thị hình dòng chào hỏi: “Hello, tên!” bạn học sinh tổ em (tổ có bạn)

c Củng cố, luyện tập: 4’

- Xem lại cú pháp câu lệnh lặp với số lần lặp biết trước Pascal - Xem lại số chương trình có sử dụng câu lệnh lặp for

(10)

Ngày soạn: Ngày giảng: 8A:

8B: 8C: 8D: 8E: Tiết 40:

BÀI TẬP (TT) 1 Mục tiêu:

a Kiến thức :

- Nắm lại kiến thức cấu trúc lặp: cấu trúc lặp sử dụng để làm gì? Cú pháp cấu trúc lặp với số lần lặp biết trước Pascal?

b Kĩ năng:

- Sử dụng cấu trúc lặp với số lần lặp biết trước để mơ tả thuật tốn số toán đơn giản

- Viết cú pháp cấu trúc lặp với số lần lặp biết trước Pascal c Thái độ:

- Rèn luyện tư khoa học, tư logic, ý thức học tập, ham thích tìm hiểu 2 Chuẩn bị giáo viên học sinh:

a Chuẩn bị giáo viên: Giáo án, SGK b Chuẩn bị học sinh:

SGK, vở, Xem lại kiến thức 3 Tiến trình dạy:

a Kiểm tra cũ: 7’

Em cho vài ví dụ hoạt động thực lặp lại sống ngày?

Nêu cú pháp câu lệnh lặp với số lần lặp biết trước Pascal? b Dạy nội dung mới: 33’

HOẠT ĐỘNG CỦA GIÁO VIÊN HOẠT ĐỘNG CỦA GIÁO VIÊN

? nhắc lại cú pháp câu lặp với số lần lặp biết trước Pascal

Bài - sgk: Các câu lệnh Pascal sau có hợp lệ khơng, sao?

HS đứng chỗ trả lời

(11)

GV yêu cầu HS hoạt động nhóm trả lời

- GV: nhận xét đưa thuật toán: Bước 1: gán A <- 0, i <-

Bước 2: A < - i(i+2)1 Bước 3: i < - i +

Bước 4: i≤ n quay lại bước Bước 5: ghi kết A kết thúc thuật toán

- GV: nhận xét đưa đoạn chương trình

Program chao;

Var i:integer; ten: string; Begin

begin

for x : = to 10 writeln(‘A’); end

HS: đưa đáp án giải thích

Tất câu lệnh khơng hợp lệ vì Câu a: giá trị đầu biến đếm phải nhỏ hơn giá trị cuối.

Câu b: giá trị đầu cuối biến đếm phải số nguyên.

Câu c: thiếu dấu “: ” gán giá trị đầu Câu d: thừa dấu “; ” 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ệ

Câu e: biến x khai báo kiểu thực thế khơng thể dùng để xác định giá trị đầu và gía trị cuối câu lệnh lặp (biến đếm là số nguyên)

Bài 6- sgk:

Hãy mơ tả thuật tốn để tính tổng sau đây:

A= 1 3+

1 4+

1

3 5+ + n(n+2)

- HS: đọc đề nêu thuật toán toán

Bài 7: Viết chương trình nhập vào tên và hiển thị hình dịng chào hỏi: “Hello, tên!” bạn học sinh tổ em (tổ có bạn)

- HS: đọc đề

(12)

For i: = to

begin Writeln (‘nhap ten:’); readln(ten);

writeln(‘Hello’, ten, ‘!’); end;

readln; end

c Củng cố, luyện tập: 4’

- Xem lại cú pháp câu lệnh lặp với số lần lặp biết trước Pascal - Xem lại số chương trình có sử dụng câu lệnh lặp for

d Hướng dẫn học sinh tự học nhà: 1’ - Xem lại nội dung tập chữa - Tiết sau chữa Bài thực hành

Ngày soạn: Ngày giảng:

8A: 8B: 8C: 8D: 8E: Tiết 41:

BÀI THỰC HÀNH 5:

SỬ DỤNG LỆNH LẶP FOR DO 1 Mục tiêu:

a 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. b Kỹ năng:

- Viết chương trình có sử dụng vòng lặp for … do; - Sử dụng câu lệnh ghép;

- Rèn luyện kỹ đọc hiểu chương trình có sử dụng vịng lặp for … c Thái độ:

(13)

a Chuẩn bị GV:

- Giáo án, SGK, phòng máy, phần mềm pascal b Chuẩn bị HS:

- SGK, ghi, bút 3 Tiến trình dạy: 2 Kiểm tra cũ: 5’

- Kiểm tra tập cho nhà b Dạy nội dung mới:

HOẠT ĐỘNG CỦA GV HOẠT ĐỘNG CỦA HS

Hoạt động 1: Viết chương trình cho tập cho nhà (18’)

GV: yêu cầu dãy gõ vào máy

GV: hỗ trợ học sinh trình thực hành

Sau kết chạy chương trình đúng, gv yêu cầu học sinh chữa làm nhà cho theo chương trình chạy

Bài 1: Tính tổng n số tự nhiên đầu tiên

- HS: gõ chương trình, chạy thử chương trình, báo cáo kết

Program tinh_tong; Uses crt;

Var i, n: integer; tong: longin; Begin

Clrscr; Tong:=0;

Writeln(‘Nhap vao so n’); readln(n); For i:=1 to n

Tong: = Tong+i;

Writeln(‘Tong của’, n,’so tu nhien dautien la’,tong);

Readln; End

2 Viết chương trình tìm xem có số dương n số nhập vào từ bàn phím Program tinh_so_cac_so_duong;

Uses crt;

(14)

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

Hoạt động 2: Bảng cửu chương.(16’) GV: Đưa nội dung tốn

GV: Đưa nội dung chương trình lên hình, yêu cầu học sinh đọc hiểu chương trình

GV: yêu cầu học sinh đứng vị trí trình bày hoạt động chương trình, nhóm khác tham gia phân tích

GV: yêu cầu học sinh lập bảng hoạt động chương trình theo mẫu:

Giả sử N=2: Bướ

c

i i<=10 Writeln(n,’.’,i,’=’,n*i)

1 2.1=2

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

HS: Nghiên cứu tốn, tìm input output

HS: đọc, phân tích câu lệnh tìm hiểu hoạt động chương trình

HS: tham gia hoạt động giáo viên 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

(15)

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

End

HS: nhóm lập bảng đại diện nhóm báo cáo kết

c Cuảng cố, luyện tập: 5’

Nhận xét, rút kinh nghiệm tiết thực hành d Hướng dẫn học sinh tự học nhà: 1’

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

Ngày soạn: Ngày giảng:

8A: 8B: 8C: 8D: 8E: Tiết 42:

BÀI THỰC HÀNH 5:

SỬ DỤNG LỆNH LẶP FOR DO (TT) 1 Mục tiêu:

a 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

b Kỹ năng:

Viết chương trình có sử dụng vịng lặp for … do; Sử dụng câu lệnh ghép chương trình;

Rèn luyện kỹ đọc hiểu chương trình có sử dụng vịng lặp for … c Thái độ:

Thái độ học tập nghiêm túc, tích cực làm thực hành 2 Chuẩn bị giáo viên học sinh:

(16)

- Giáo án, SGK, phòng máy, phần mềm pascal b Chuẩn bị HS:

- SGK, ghi, bút 3 Tiến trình dạy:

a Kiểm tra cũ: Kiểm tra xen thực hành b Dạy nội dung mới:

HOẠT ĐỘNG CỦA GV HOẠT ĐỘNG CỦA HS

Hoạt động 1: Làm đẹp hình kết lệnh gotoxy, where (20’) 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

? 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 GV: yêu cầu học sinh quan sát kết so sánh với kết chương trinh chưa dùng lệnh gotoxy(5, wherey)

Bài sgk (T63)

a) Giới thiệu lệnh gotoxy(), wherex - HS: quan sát đưa nhận xét

- 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ột, wherey cho biết số thứ tự hàng.

* Lưu ý: Phải khai báo thư viện crt trước khi sử dụng hai lệnh trên

b) Chỉnh sửa chương trình sau:

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 HS: quan sát nhận xét

Program Bang_cuu_chuong; Uses crt;

Var i, n: integer; Begin

(17)

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

Hoạt động 2: sử dụng lệnh For lồng for (17’)

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 GV: đưa nội dung chương trình thực hành lên hình, yêu cầu học sinh đọc chương trình, tìm hiểu hoạt động chương trình

Bài SGK (T64).

a) Câu lệnh for lồng for

HS: ghi chép cấu trúc lĩnh hội

- For <biến đếm1:= giá trị đầu> to <giá trị cuối> do

For <biến đếm 2:=giá trị đầu> to <giá trị cuố> do

< câu lệnh>; Program Tao_bang; Uses crt;

Var i,j: byte; Begin

Clrscr;

For i:=1 to Begin

(18)

GV: cho chạy chương trình

Writeln; End; Readln; End

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

HS : quan sát kết hình Hoạt động 3: kết thúc (2’)

HS: tắt chương trình ứng dụng, tắt máy, tắt nguồn

c Củng cố, luyện tập: 5’

Nhận xét rút kinh nghiệm thực hành d Hướng dẫn học sinh tự học nhà: 1’

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

Ngày soạn: Ngày giảng:

8A: 8B: 8C: 8D: 8E: Tiết 43:

HỌC VẼ HÌNH VỚI PHẦN MỀN GEOGEBRA (T1) 1 Mục tiêu:

a Kiến thức:

(19)

Thông qua phần mềm học sinh biết hiểu ứng dụng phần mềm toán học, thiết lập quan hệ toán học đối tượng

Biết cách sử dụng phần mềm để vẽ hình học chương trình lớp c Thái độ:

Hs ý thức việc ứng dụng phần mềm học tập 2 Chuẩn bị giáo viên học sinh:

a Chuẩn bị giáo viên:

- Sách giáo khoa, giáo án, tài liệu tin học có liên quan, phịng máy b Chuẩn bị học sinh:

- Đọc tài liệu nhà trước đến lớp 3 Tiến trình dạy:

a Kiểm tra cũ: Không KT b Dạy nội dung mới:

HOẠT ĐỘNG CỦA GIÁO VIÊN HOẠT ĐỘNG CỦA HỌC SINH

Gv yêu cầu Hs nghiên cứu SGK

?Nêu cách khởi động chương trình?

Giới thiệu hình

? cho biết thành phần màm hình chính?

? Cho biết công cụ làm việc chương trình?

?có thể chọn nhiều đối tượng cách nào?

Khi sử dụng công cụ khác chuyển công cụ di chuyển cách ?

1 Em biết Geogebra? Hs đọc sgk

2 Làm quen với phần mềm Geogebra tiếng Việt

a) Khởi động

Nhấp đúp vào biểu tượng

Hoặc vào menu Start \ All Programs\ GeoGebra \ GeoGebra

b) Giới thiệu hình Geogebra tiếng Việt Hs thực quan sát

- Bảng chọn - Thanh công cụ

c) Giới thiệu công cụ làm việc - Công cụ di chuyển

- Các công cụ liên quan đến đối tượng điểm. Thao tác : Chọn công cụ sau chọn đối tượng

(20)

Thao tác : Chọn cơng cụ sau chọn đối tượng

Các công cụ tạo mối quan hệ hình học

Thao tác : Chọn cơng cụ sau chọn đối tượng

Chú ý : Thay đổi tên điểm , đường thẳng , chọn công cụ di chuyển ,lick dúp vào đối tượng cần thay đổi

- Các cơng cụ liên quan đến hình trịn

Thao tác : Chọn cơng cụ sau chọn đối tượng

- Các công cụ biến đổi hình học

(21)

GV : lưu có cách

Nhấn Ctrl + S chọn Hồ sơ - > lưu Mở?

Nhấn Ctrl + O chọn Hồ sơ - > mở Thoát khỏi phần mềm?

Hồ sơ - > mở Alt + F4

- Lưu - Mờ

e) Thoát khởi phần mềm

c.Củng cố, luyện tập: 5’

- Giáo viên hệ thống lại toàn nội dung học d Hướng dẫn học sinh tự học nhà:

- 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

Ngày soạn: Ngày giảng:

8A: 8B: 8C: 8D: 8E: Tiết 44:

HỌC VẼ HÌNH VỚI PHẦN MỀN GEOGEBRA (T2) 1 Mục tiêu:

a Kiến thức:

- Học vẽ hình với phần mềm - Các lệnh phần mềm b Kỹ Năng:

- Các thao tác để thực phần mềm - Vẽ nhanh, xác với phần mềm c Thái độ:

- Nghiêm túc thực hành

2 Chuẩn bị giáo viên học sinh: a Chuẩn bị giáo viên:

(22)

b Chuẩn bị học sinh:

- Kiến thức cũ, sách, ghi. 3 Tiến trình dạy:

a Kkiểm tra cũ: (3’)

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

Nhấp đúp vào biểu tượng

Hoặc vào menu Start \ All Programs\ GeoGebra \ GeoGebra b Dạy nội dung mới:

HOẠT ĐỘNG CỦA GV HOẠT ĐỘNG CỦA HS

GV: Giới thiệu công cụ làm việc

GV: Giới thiệu cơng cụ liên quan đến đối tượng điểm

- Công cụ tạo điểm - Công cụ tạo giao điểm - Công cụ tạo trung điểm

c Giới thiệu cơng cụ làm việc chính: 32’

HS: Chú ý quan sát tìm hiểu

Để chọn công cụ nháy chuột lên biểu tượng công cụ này.

Cơng cụ di chuyển có ý nghĩa đặc biệt là không dùng để vẽ khởi tạo hình mà dùng để di chuyển hình Có thể chọn nhiều đối tượng cách nhấn giữ phím Ctrl trong 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 HS: Chú ý cách thực

Công cụ dùng để tạo điểm Điểm 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)

(23)

GV: Giới thiệu công cụ liên quan đến đoạn, đường thẳng

- Các công cụ tạo đoạn - Tạo tia

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

HS: Chú ý quan sát cách thực công cụ

Các công cụ , , dùng để tạo đường, đoạn, tia qua hai điểm cho trước Thao tác sau: chọn cơng cụ, sau nháy chuột chọn 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

c Củng cố, luyện tập: 5’

Nhắc lại cách khởi động khỏi phần mềm, sau thực thoát khỏi phần mềm tắt máy

d Hướng dẫn học sinh tự học nhà: 1’

(24)

Ngày soạn: Ngày giảng: 8A:

8B: 8C: 8D: 8E:

Tiết 45:

HỌC VẼ HÌNH VỚI PHẦN MỀM GEOGEBRA (T3) 1 Mục tiêu:

a Kiến thức:

- Học vẽ hình với phần mềm - Các lệnh phần mềm b Kỹ Năng:

- Các thao tác để thực phần mềm - Vẽ nhanh, xác với phần mềm c Thái độ:

- Nghiêm túc thực hành

2 Chuẩn bị giáo viên học sinh: a Chuẩn bị giáo viên:

- Giáo án, máy chiếu, phần mềm GeoGebra b Chuẩn bị học sinh:

- Kiến thức cũ, sách, 3 Tiến trình dạy:

a Kiểm tra cũ: 7’

? Hãy nêu công cụ liên quan đến đối tượng điểm?

Công cụ dùng để tạo điểm Điểm 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 này.

(25)

b Dạy nội dung mới: 34’

HOẠT ĐỘNG CỦA GV HOẠT ĐỘNG CỦA GV

GV: Hướng dẫn cách thực công cụ tạo mối quan hệ hình học

GV: Yêu cầu học sinh thực hành

GV: Hướng dẫn cách thực công cụ liên quan đến hình trịn

GV: u cầu học sinh thực hành

HS: Chú ý thao tác thực

HS: Thực hành máy, Ghi

* 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 một điểm vng góc với đường hoặc đoạn thẳng cho trước.

Thao tác: chọn công cụ, sau chọn điểm, đường (đoạn, tia) ngược lại chọn đường (đoạn, tia) chọn điểm

Công cụ tạo đường thẳng song song với đường (đoạn) cho trước qua một điểm cho trước.

Thao tác: chọn cơng cụ, sau chọn điểm, đường (đoạn, tia) ngược lại chọn đường (đoạn, tia) chọn điểm

Công cụ dùng để vẽ đường trung trực của một đ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 của một 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 này.

(26)

máy thao tác

GV: Hướng dẫn cách thực cơng cụ biến đổi hình học

GV: Yêu cầu học sinh thực hành máy thao tác

HS: Thực hành máy

* 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 bằng 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 đó chọn ba điểm.

Công cụ dùng để tạo nửa hình trịn đi qua hai điểm đối xứng tâm.

Thao tác: chọn công cụ, chọn hai điểm Nửa hình trịn tạo phần hình trịn theo chiều ngược kim đồng hồ từ điểm thứ nhất đến điểm thứ hai.

Công cụ tạo cung tròn một 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 và 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 đó chọn ba điểm mặt phẳng.

(27)

HS: Thực hành máy

*Các công cụ biến đổi hình học

Cơng cụ dùng để tạo đối tượng đối xứng với đối tượng cho trước qua trục là đườ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 bằ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 tượng cho trước qua một đ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 bằ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.

c Củng cố, luyện tập: 3’

- Các công cụ tạo mối quan hệ hình học - Các cơng cụ biến đổi hình học

d Hướng dẫn học sinh tự học nhà:1’

- Về nhà xem lại phần mềm, tiết sau tiếp tục tìm hiểu phần mềm

Ngày soạn: Ngày giảng:

8A: 8B: 8C: 8D: 8E: Tiết 46:

(28)

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

- Học vẽ hình với phần mềm - Các lệnh phần mềm b Kỹ Năng:

- Các thao tác để thực phần mềm - Vẽ nhanh, xác với phần mềm c Thái độ:

- Nghiêm túc thực hành 2 Chuẩn bị giáo viên học sinh: a Chuẩn bị giáo viên:

- Giáo án, máy chiếu, phần mềm GeoGebra b Chuẩn bị học sinh:

- Kiến thức cũ, sách, ghi 3 Tiến trình dạy:

a Kiểm tra cũ: 6’

? Hãy nêu công cụ liên quan đến hình trịn? * 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 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.

Thao tác: chọn cơng cụ, chọn hai điểm Nửa hình trịn tạo phần hình trịn theo chiều ngược kim đồng hồ từ điểm thứ đến điểm thứ hai.

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

(29)

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 chọn ba điểm mặt phẳng.

b Dạy nội dung mới:

HOẠT ĐỘNG CỦA GV HOẠT ĐỘNG CỦA GV

GV: Nêu thao tác với tệp

GV: Hướng dẫn cách lưu tệp, cách mở tệp

GV: Hướng dẫn học sinh thoát khỏi phần mềm

GV: Nêu khái niệm đối tượng hình học GV: Nêu khái niệm đối tượng tự đối tượng phụ thuộc

- Điểm thuộc đoạn thẳng ta thấy: đối tượng điểm có quan hệ thuộc đối tượng đường thẳng

- Đường thẳng qua điểm ta thấy: đường thẳng có quan hệ phụ thuộc vào hai điểm cho trước

d) Các thao tác với tệp: 7’

Mỗi trang hình vẽ lưu lại tệp có phần mở rộng ggb

HS: Thực

Để lưu hình nhấn tổ hợp phím Ctrl+S hoặc thực lệnh Hồ sơ  Lưu lại từ bảng chọn. Nếu lần lưu tệp, phần mềm yêu cầu nhập tên tệp Gõ tên tệp vị trí File name nháy chuột vào nút Save.

Để mở tệp có, nhấn tổ hợp phím Ctrl+O hoặc thực lệnh Hồ sơ  Mở Chọn tệp cần mở gõ tên ô File name, sau đó nháy chuột vào nút Open.

e) Thoát khỏi phần mềm: 3’ HS: Thực

Nháy chuột chọn Hồ sơ  Đóng nhấn tổ hợp phím Alt+F4.

3 Đối tượng hình học: 25’

a) Khái niệm đối tượng hình học

Một hình hình học bao gồm nhiều đối tượng cơ Các đối tượng hình học bao gồm: điểm, đoạn thẳng, đường thẳng, tia, hình trịn, cung tròn.

b) Đối tượng tự đối tượng phụ thuộc Em làm quen với khái niệm quan hệ đối tượng

Sau vài ví dụ: * Điểm thuộc đường thẳng

(30)

- Giao đối tượng hình học Ta thấy: có quan hệ "giao nhau"

GV: Hướng dẫn học sinh cách hiển thị danh sách hình

GV: Hướng dẫn học sinh thay đổi thuộc tính đối tượng

- Hiện đối tượng - Ẩn đối tượng

GV: Theo dõi hướng dẫn thêm

thẳng

* Đường thẳng qua hai điểm

Cho trước hai điểm Vẽ đường thẳng qua hai điểm Chúng ta có quan hệ "đi qua" Trong trường hợp đường thẳng có quan hệ phụ thuộc vào hai điểm cho trước * Giao hai đối tượng hình học

Cho trước hình trịn đường thẳng Dùng cơng cụ để xác định giao đường thẳng đường trịn Chúng ta có quan hệ "giao nhau" Giao điểm, có, thuộc hai đối tượng ban đầu đường tròn đường thẳng

Một đối tượng khơng phụ thuộc vào đối tượng khác gọi đối tượng tự Các đối tượng lại gọi đối tượng phụ thuộc Như đối tượng hình học phần mềm Geogebra chia thành hai loại tự hay phụ thuộc

c) Danh sách đối tượng hình Phần mềm Geogebra cho phép hiển thị danh sách tất đối tượng hình học có trang hình

Dùng lệnh Hiển thị  Hiển thị danh sách đối tượng để hiện/ẩn khung thơng tin màn hình

HS: Ghi thao tác

d) Thay đổi thuộc tính đối tượng: HS: Quan sát thực hành

(31)

GV: Nêu cách thay đổi tên đối tượng tên (nhãn) đối tượng, cách thể kiểu đường, màu sắc,

Sau vài thao tác thường dùng để thay đổi tính chất đối tượng

ẩn đối tượng: Để ẩn đối tượng, thực thao tác sau:

1. Nháy nút phải chuột lên đối tượng;

2. Huỷ chọn Hiển thị đối tượng trong bảng chọn:

HS: Thực

ẩn/hiện tên (nhãn) đối tượng: Để làm ẩn hay tên đối tượng, thực thao tác sau:

1 Nháy nút phải chuột lên đối tượng trên hình;

2 Huỷ chọn Hiển thị tên bảng chọn

Thay đổi tên đối tượng: Muốn thay đổi tên đối tượng, thực thao tác sau:

1 Nháy nút phải chuột lên đối tượng trên hình;

2 Chọn lệnh Đổi tên bảng chọn:

Sau nhập tên hộp thoại:

(32)

GV: Hướng dẫn cách đặt/huỷ vết chuyển động đối tượng

GV: Hướng dẫn cách xoá đối tượng

bỏ không muốn đổi tên.

Đặt/huỷ vết chuyển động đối tượng: Để đặt/huỷ vết chuyển động cho đối tượng hình thực thao tác sau:

1 Nháy nút phải chuột lên đối tượng; 2 Chọn Mở dấu vết di chuyển Để xoá vết vẽ, nhấn tổ hợp phím Ctrl+F.

Xố đối tượng: Muốn xố hẳn đối tượng, ta thực thao tác sau:

1 Dùng công cụ chọn đối tượng nhấn phím Delete

2 Nháy nút phải chuột lên đối tượng và thực lệnh Xố

3 Chọn cơng cụ công cụ nháy chuột lên đối tượng muốn xoá c Củng cố, luyện tập: 3’

- Cách khởi động thoát khỏi phần mềm d Hướng dẫn học sinh tự học nhà:

- Về nhà xem lại phần mềm, tiết sau tiếp tục tìm hiểu phần mềm

Ngày soạn: Ngày giảng:

8A: 8B: 8C: 8D: 8E: Tiết 47:

HỌC VẼ HÌNH VỚI PHẦN MỀN GEOGEBRA (T5) 1 Mục tiêu:

(33)

- Học vẽ hình với phần mềm - Các lệnh phần mềm b Kỹ Năng:

- Các thao tác để thực phần mềm - Vẽ nhanh, xác với phần mềm c Thái độ:

- Nghiêm túc thực hành

2 Chuẩn bị giáo viên học sinh: a Chuẩn bị giáo viên:

- Giáo án, máy chiếu, phần mềm GeoGebra b Chuẩn bị học sinh:

- Kiến thức cũ, sách, 3 Tiến trình dạy:

a Kiểm tra cũ: Đan xen thực hành. b Dạy nội dung mới: 40’

GV: đưa đề lên chiếu yêu cầu học sinh thực máy HS: Thực hành tập máy

* Bài tập thực hành: 1. Vẽ tam giác, tứ giác

Dùng công cụ đoạn thẳng vẽ cạnh tam giác

Dùng công cụ đoạn thẳng vẽ cạnh tứ giác

(34)

Cho trước ba đỉnh A, B, C Dựng đỉnh D hình thang ABCD dựa công cụ đoạn thẳng đường song song

3. V hình thang cân.ẽ

Cho trước ba đỉnh A, B, C Dựng đỉnh D hình thang cân ABCD dựa cơng cụ đoạn thẳng, đường trung trực phép biến đổi đối xứng qua trục

4. V ẽ đường tròn ngo i ti p tam giácạ ế

Cho trước tam giác ABC Dùng cơng cụ đường trịn vẽ đường trịn qua ba điểm A, B, C

c Củng cố, luyện tập: 4’

- GV nhận xét kết thực hành học sinh máy - Các thao tác vẽ đối tượng

d Hướng dẫn học sinh tự học nhà: 1’

(35)

Ngày soạn: Ngày giảng: 8A:

8B: 8C: 8D: 8E: Tiết 48:

HỌC VẼ HÌNH VỚI PHẦN MỀN GEOGEBRA (T6) 1 Mục tiêu:

a Kiến thức:

- Học vẽ hình với phần mềm - Các lệnh phần mềm b Kỹ Năng:

- Các thao tác để thực phần mềm - Vẽ nhanh, xác với phần mềm c Thái độ:

- Nghiêm túc thực hành

2 Chuẩn bị giáo viên học sinh: a Chuẩn bị giáo viên:

- Giáo án, máy chiếu, phần mềm GeoGebra b Chuẩn bị học sinh:

- Kiến thức cũ, sách, 3 Tiến trình dạy:

a Kiểm tra cũ: Đan xen thực hành. b Dạy nội dung mới: 40’

GV: đưa đề lên chiếu yêu cầu học sinh thực máy HS: Thực hành tập máy

* Bài tập thực hành:

5 Vẽ đường tròn nội tiếp tam giác:

Cho trước tam giác ABC 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

(36)

Cho trước cạnh AB đường thẳng qua A Hãy vẽ hình thoi ABCD lấy đường thẳng cho đường chéo Sử dụng cơng cụ thích hợp học để dựng đỉnh C, D hình thoi

7 V hình vng.ẽ

Sử dụng cơng cụ thích hợp để vẽ hình vng biết trước cạnh

8 V tam giác ẽ

Cho trước cạnh BC, vẽ tam giác ABC

9 V m t hình l ẽ ộ đố ứi x ng tr c c a m t ụ ủ ộ đố ượi t ng cho trước m n hình.à

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

(37)

Cho trước hình điểm O Hãy dựng hình đối xứng qua tâm O hình cho Sử dụng cơng cụ đối xứng tâm để vẽ hình

c Củng cố, luyện tập: 4’

- Củng cố lại nội dung thực hành - Các thao tác vẽ đối tượng

d Hướng dẫn học sinh tự học nhà: 1’

- Về nhà xem lại phần mềm, đọc trước nội dung

Ngày soạn: Ngày giảng:

8A: 8B: 8C: 8D: 8E: Tiết 49:

BÀI 8:

LẶP VỚI SỐ LẦN LẶP CHƯA BIẾT TRƯỚC 1 Mục tiêu:

a Kiến thức:

- Biết nhu cầu cần có cấu trúc lặp với số lần chưa biết trước ngơn ngữ lập trình;

- Biết ngơn ngữ lập trình dùng cấu trúc lặp với số lần chưa biết trước để dẫn máy tính thực lặp lặp lại cơng việc đến điều kiện thoả mãn; b Kĩ năng:

- Nhận biết đâu hoạt động lặp với số lần chưa biêt trước. c Thái độ:

(38)

2 Chuẩn bị giáo viên học sinh: a Chuẩn bị giáo viên:

- SGK, máy chiếu, phịng máy, ví dụ chương trình b Chuẩn bị học sinh:

- Xem trước nhà 3 Tiến trình dạy:

a Kiểm tra cũ: 8’

? Viết thuật tốn tính tổng 100 số tự nhiên 1,2,3,…,99,100 Trả lời:

Bước SUM  0; i  0. Bước i  i + 1.

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

b Dạy nội dung mới:

HOẠT ĐỘNG CỦA GV HOẠT ĐỘNG CỦA HS

Gv : y/c hs đọc ví dụ 1sgk/67 Gv : Phân tích ví dụ

Gv : Hướng dẫn hs xây dựng thuật toán Gv : Chạy tay cho học sinh xem ( Chỉ nên chạy tay thử từ đến 10 )

1 Các hoạt động lặp với số lần chưa biết trước:13’

a/ Ví dụ 1(sgk).

Hs : 2-3 hs đọc ví dụ sgk Hs : Chú ý lắng nghe

b/ Ví dụ : Nếu cộng n số tự nhiên đầu tiên (n = 1, 2, 3, ), Cần cộng số tự nhiên để ta nhận tổng Tn nhỏ

nhất lớn 1000?

Hs : Nghe giáo viên hướng dẫn, sau tự xây dựng thuật toán

Hs : Chú ý nghe Hs ghi ví dụ Giải :

Kí hiệu S tổng cần tìm ta có thuật tốn như sau:

+ Bước S  0, n  0.

(39)

Gv : Giới thiệu sơ đồ khối

Gv: Nêu nhận xét

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

Gv : Giới thiệu cú pháp lệnh while … ….;

Gv : Xét ví dụ

lại chuyển tới bước 4.

+ Bước S  S + n quay lại bước 2. + Bước In kết : S n số tự nhiên nhỏ cho S > 1000 Kết thúc thuật tốn.

* Ta có sơ đồ khối :

* Nhận xét : Để viết chương trình dẫn máy tính thực hoạt động lặp các 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: 18’

Hs : ý nghe ghi chép

Trong Pascal câu lệnh lặp với số lần chưa biết trước có dạng:

while <điều kiện> <câu lệnh>; 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 1.

Ví dụ

(40)

Chúng ta biết rằng, n lớn

1 n

càng nhỏ, ln lớn Với giá trị n

1

n < 0.005 n <

0.003 ?

Gv : giới thiệu chương trình mẫu sgk Gv : Chạy tay cho học sinh xem

G : Yêu cầu học sinh mở máy tính mở chương trình ví dụ ( giáo viên chuẩn bị chương trình mẫu đưa lên máy ) G : Cho học sinh chạy chương trình máy

G : Yêu cầu hs thay điều kiện sai_so = 0.003 thành 0.002 ; 0.001 ; 0.005 ;

Với giá trị n ( n>o )

1

n < 0.005

hoặc

1

n < 0.003? Chương trình tính

số n nhỏ để

1

n nhỏ sai số cho

trước :

Hs : quan sát

Hs : thực Hs : thực uses crt; var x: real; n: integer;

const sai_so=0.003; begin

clrscr; x:=1; n:=1;

while x>=sai_so begin n:=n+1; x:=1/n end;

writeln('So n nho nhat de 1/n < ',sai_so:5:4, 'la ',n);

readln end. c Củng cố, luyện tập: 5’

? Lấy ví dụ hoạt động phải lặp lại với số lần chưa biết trước? d Hướng dẫn học sinh tự học nhà: 1’

- Học

(41)

Ngày soạn: Ngày giảng: 8A:

8B: 8C: 8D: 8E: Tiết 50:

BÀI 8:

LẶP VỚI SỐ LẦN LẶP CHƯA BIẾT TRƯỚC

I.Mục tiêu: c Kiến thức:

Biết câu lệnh lặp với số lần chưa biết trước while do… Pascal b Kĩ năng:

Lấy vị cụ cụ thể câu lệnh lặp với số lần chưa biết trước c Thái độ:

Học sinh thích thú nghiêm túc học tập 2 Chuẩn bị giáo viên học sinh:

a Chuẩn bị giáo viên:

- SGK, máy chiếu, phịng máy, ví dụ chương trình b Chuẩn bị học sinh:

- Học cũ, xem trước nhà 3 Tiến trình dạy:

a Kiểm tra cũ: Đan xen tiết học. b Dạy nội dung mới:

HOẠT ĐỘNG CỦA GV HOẠT ĐỘNG CỦA HS

Gv : ta tiếp tục xét ví dụ mà chương trình có câu lệnh với số lần lặp chưa biết trước

Xét ví dụ

Gv : Cho học sinh quan sát chương trình

Ví dụ 4: 7’

Chương trình Pascal thể thuật tốn tính số n ví dụ 2:

(42)

Gv : Chạy tay cho học sinh xem

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 ) Gv : Cho học sinh chạy chương trình máy

Gv : chạy chương trình này, ta nhận giá trị ntn?

Gv : giới thiệu ví dụ sgk

Viết chương trình tính tổng

1 1

1

2 100

T     

Gv : Cho học sinh quan sát chương trình

Gv : Chạy tay ( hai chương trình ) cho học sinh xem

Hs : ý nghe tự chạy tay lại Hs : thực

Hs : thực var S,n: integer; begin

S:=0; n:=1;

while S<=1000 do

begin n:=n+1; S:=S+n end;

writeln('So n nho nhat de tong > 1000 la ',n);

writeln('Tong dau tien > 1000 la ',S); end.

Hs : Nếu chạy chương trình ta nhận được n = 45 tổng lớn 1000 1034

Ví dụ 5: 10’

Viết chương trình tính tổng:

1 1

1

2 100

T     

Hs : quan sát Giải :

Để viết chương trình tính tổng

1 1

1

2 100

T     

ta sử dụng lệnh lặp với số lần lặp biết trước for…do:

T:=0;

for i:=1 to 100 T:=T+1/i; writeln(T);

Hs : ý nghe tự chạy tay lại

Nếu sử dụng lệnh lặp while…do, đoạn chương trình cho kết quả:

(43)

? So sánh kết chạy hai chương trình?

Gv : Ví dụ cho thấy có thể sử dụng câu lệnh while…do thay cho câu lệnh for…do.

Gv : Giới thiệu phần 3

Gv : Khi viết chương trình sử dụng cấu trúc lặp cần ý tránh tạo nên vịng lặp khơng kết thúc

Gv : Chẳng hạn, chương trình lặp lại vô tận:

var a:integer; begin

a:=5;

while a<6 writeln('A'); end.

Gv : Trong chương trình trên, giá trị của biến a luôn 5, điều kiện a<6 luôn luôn nên lệnh writeln('A') được thực

i:=1;

while i<=100 begin T:=T+1/i; i:=i+1 end;

writeln(T);

Hs : Kết

* Nhận xét : Ví dụ cho thấy chúng ta sử dụng câu lệnh while…do thay cho câu lệnh for…do.

3 Lặp vơ hạn lần – Lỗi lập trình cần tránh: 20’

Khi viết chương trình sử dụng cấu trúc lặp cần ý tránh tạo nên vịng lặp khơng kết thúc

Hs : Chú ý nghe Hs : Quan sát

Do vậy, thực vòng lặp, điều kiện trong câu lệnh phải thay đổi để sớm hay muộn giá trị điều kiện chuyển từ sang sai Chỉ chương trình mới khơng "rơi" vào "vịng lặp vơ tận". c Củng cố, luyện tập: 7’

- Đọc ghi nhớ sgk

- Làm tập 2,3a,bài SGK/71 d Hướng dẫn học sinh tự học nhà: 1’

(44)

Ngày soạn: Ngày giảng: 8A:

8B: 8C: 8D: 8E: Tiết 51:

BÀI THỰC HÀNH 6:

SỬ DỤNG LỆNH LẶP WHILE DO 1 Mục tiêu

a 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 b 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 c Thái độ:

Nghiêm túc thực hành 2 Chuẩn bị giáo viên học sinh a Chuẩn bị giáo viên:

Giáo án, máy chiếu b Chuẩn bị học sinh:

Kiến thức cũ, sách, 3 Tiến trình dạy:

a Kiểm tra cũ:5’

? Hãy cho số ví dụ lặp với số lần chưa biết trước b Dạy nội dung mới: 35’

HOẠT ĐỘNG CỦA GV HOẠT ĐỘNG CỦA HS

GV: Đưa tập SGK

? Gọi học sinh nêu ý tưởng

- GV hướng dẫn

Bài Viết chương trình sử dụng lệnh lặp While…do để tính trung bình n số thực x1, x2, x3, , xn Các số n x1, x2, x3, ,

xn nhập vào từ bàn phím.

(45)

GV: Kiểm tra chạy chương trình

HS: Làm tập

a) Mơ tả thuật tốn chương trình, biến dự định sử dụng kiểu chúng

b) Gõ chương trình sau lưu chương trình với tên Tinh_TB:

Program Tinh_Trung_binh; uses crt;

Var

n, dem: Integer; x, TB: real; begin

clrscr;

dem:=0 ; TB:=0 ;

write('Nhap so cac so can tinh n = '); readln(n);

while dem<n do begin

dem:=dem+1;

write('Nhap so thu ',dem,'= '); readln(x);

TB:=TB+x; end;

TB:=TB/n;

writeln('Trung binh cua ',n,' so la = ',TB:10:3);

writeln('Nhan Enter de thoat '); readln

end.

Bài tập chép:

HS: Đánh máy tập vào máy tính

(46)

câu lệnh for…do thay cho câu lệnh while… do

c Củng cố, luyện tập: 4’

- Hiểu hoạt động lặp với số lần chưa biết trước - Biết sử dụng câu lệnh while

d Hướng dẫn học sinh tự học nhà: 1’

- Về nhà xem lại học tiết sau học tiếp

Ngày soạn: Ngày giảng:

8A: 8B: 8C: 8D: 8E: Tiết 52:

BÀI THỰC HÀNH 6:

SỬ DỤNG LỆNH LẶP WHILE DO 1 Mục tiêu

a 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 b 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 c Thái độ:

Nghiêm túc thực hành 2 Chuẩn bị giáo viên học sinh: a Chuẩn bị giáo viên:

Giáo án, máy chiếu b Chuẩn bị học sinh:

Kiến thức cũ, sách, ghi 3 Tiến trình dạy:

(47)

HOẠT ĐỘNG CỦA GV HOẠT ĐỘNG CỦA HS GV: Đưa tập SGK

? Gọi học sinh nêu ý tưởng

GV hướng dẫn

GV: kiểm tra đánh giá

Bài Tìm hiểu chương trình nhận biết số tự nhiên N nhập vào từ bàn phím có phải số nguyên tố hay không

Ý tưởng: Kiểm tra N có chia hết cho các 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).

HS: Làm tập

HS: Làm ý a, b, c vào máy

a) Đọ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;

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.

b) Gõ, dịch chạy thử chương trình với một vài độ xác khác

c Củng cố, luyện tập: 5’

- Hiểu hoạt động lặp với số lần chưa biết trước - Biết sử dụng câu lệnh while

(48)

- Về nhà xem lại học tiết sau học tiếp

Ngày soạn: Ngày giảng:

8A: 8B: 8C: 8D: 8E: Tiết 53:

BÀI TẬP

1 Mục tiêu: a 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 b 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 c Thái độ:

Nghiêm túc, ý học 2 Chuẩn bị giáo viên học sinh: a Chuẩn bị giáo viên:

Giáo án, máy chiếu b Chuẩn bị học sinh:

Kiến thức cũ, sách, ghi 3 Tiến trình dạy:

a Kiểm tra cũ: Không KT b Dạy nội dung mới: 38’

HOẠT ĐỘNG CỦA GV HOẠT ĐỘNG CỦA HS

GV: Đưa tập SGK gọi học sinh lên bảng trả lời

? Cho vài ví dụ hoạt động thực

(49)

? Hãy cho biết tác dụng câu lệnh lặp

Khi thực câu lệnh lặp, chương trình kiểm tra điều kiện Với lệnh lặp

for <biến đếm> := <giá trị đầu> to <giá trị cuối> <câu lệnh>;

của Pascal, điều kiện cần phải kiểm tra gì?

Chương trình Pascal sau thực gì? var i: integer;

begin

for i:=1 to 1000 do; end.

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

a, for i:=100 to writeln('A'); b, for i:=1.5 to 10.5 writeln('A'); c, for i=1 to 10 writeln('A'); d, for i:=1 to 10 do; writeln('A');

var x: real; begin for x:=1 to 10 do writeln('A'); end.

? Hãy mơ tả thuật tốn để tính tổng sau đây:

Câu lệnh lặp có tác dụng làm đơn giản và giảm nhẹ công sức người viết chương trình.

Chúng ta nói thực hoạt động lặp, chương trình kiểm tra điều kiện Với lệnh lặp

for <biến đếm> := <giá trị đầu> to <giá trị cuối> <câu lệnh>;

của Pascal, điều kiện cần phải kiểm tra chính giá trị biến đếm lớn giá trị cuối Nếu điều kiện không thoả mãn, câu lệnh tiếp tục thực hiện; ngược lại, chuyển sang câu lệnh tiếp theo chương trình.

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 là 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, nếu 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) 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

(50)

A =

1 1

1.32.43.5 n n( 1) . A =

1 3+

1 4+

1

3 5+ n (n+1)

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

Bước A 

1 ( 2) i i  .

Bước i  i +

Bước Nếu i  n, quay lại bước Bước Ghi kết A kết thúc thuật toán.

c Củng cố, luyện tập: 6’

Nắm hoạt động lặp với số lần biết trước d Hướng dẫn học sinh tự học nhà: 1’

Về nhà xem lại học, ôn lại nội dung học

Ngày soạn: Ngày giảng:

8A: 8B: 8C: 8D: 8E: Tiết 54:

(51)

1 Mục tiêu a 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 b 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 c Thái độ:

Nghiêm túc, ý học 2 Chuẩn bị giáo viên học sinh: a Chuẩn bị giáo viên:

Giáo án, máy chiếu b Chuẩn bị học sinh:

Kiến thức cũ, sách, 3 Tiến trình dạy:

a Kiểm tra cũ: Không KT b Dạy nội dung mới:40’

HOẠT ĐỘNG CỦA GV HOẠT ĐỘNG CỦA HS

GV: Đưa tập SGK gọi học sinh lên bảng trả lời

1) Nêu vài ví dụ hoạt động lặp với số lần chưa biết trước?

2) Hãy phát biểu khác biệt câu lệnh lặp với số lần lặp cho trước câu lệnh lặp với số lần lặp chưa biết trước?

HS: trả lời Bài 2: Sự khác biệt:

a) Câu lệnh lặp với số lần lặp cho trước chỉ thị cho máy tính thực lệnh hoặc 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 chưa biết trước số lần lặp chưa xác định trước

b)Lệnh lặp với số lần cho trước, điều kiện là giá trị biến đếm có giá trị nguyên đạt giá trị lớn hay chưa, câu lệnh lặp với số lần lặp chưa biết trước, điều kiện tổng quát hơn nhiều, kiểm tra giá trị của một số thực

(52)

3) Hãy tìm hiểu thuật tốn sau cho biết thực thuật tốn, máy tính thực vòng lặp? Khi kết thúc, giá trị S bao nhiêu? Viết chương trình Pascal thể thuật tốn

a) Thuật tốn 1

Bước S  10, x  0.5.

Bước Nếu S  5.2, chuyển tới bước 4. Bước S  S  x quay lại bước 2.

Bước Thông báo S kết thúc thuật toán.

b) Thuật toán 2

Bước S  10, n  0.

Bước Nếu S ≥ 10, chuyển tới bước 4. Bước n  n + 3, S  S  n quay lại bước

Bước Thông báo S kết thúc thuật toán.

4) Hãy tìm hiểu đoạn lệnh sau cho biết với đoạn lệnh chương trình thực vòng lặp? 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;

được thực lần, sau đó kiểm tra điều kiện Lệnh lặp với số lần chưa xác định trước, trước hết điều kiện được kiểm tra Nếu điều kiện thoả mãn, câu lệnh thực

Bài 3: 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:

Var s, x real; begin

S:=10; x:=0.5;

while S>5.2 begin s:=S-x; writeln(S);

end; end. KQ:5

Số lần lặp 10

b) Thuật tốn 2: Khơng vịng lặp được thực từ đầu điều kiện khơng thỏa mãn nên bước bị bỏ qua S = 10 kết thúc thuật toán Đoạn chương trình Pascal tương ứng:

S:=10; n:=0; while S<10 do

begin n:=n+3; S:=S-n end; writeln(S);

Bài 4:

a) Chương trình thực vòng lặp

(53)

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

lệnh lặp kết thúc nên điều kiện S=0 luôn luôn thỏa mãn.

- Vì sau (do) khơng có Begin end nên máy chỉ thực lệnh n:=n+1 không thực hiện lệnh gán s:=s+n nên s = 0

Bài 5: a) Thừa dấu hai chấm điều kiện; b) Thiếu dấu hai chấm câu lệnh gán; c) Thiếu từ khóa begin và end trước sau lệnh n:=n+1; S:=S+n, vịng lặp trở thành vơ tận. c Củng cố, luyện tập: 4’

- Hiểu hoạt động lặp với số lần chưa biết trước - Biết sử dụng câu lệnh while

Hướng dẫn học sinh tự học nhà: 1’

- Về nhà xem lại học tiết sau học tiếp

Ngày soạn: Ngày giảng:

8A: 8B: 8C: 8D: 8E: Tiết 55:

KIỂM TRA TIẾT

1 Mục tiêu kiểm tra:

(54)

- Nghiêm túc làm 2 Nội dung đề:

Ma tr n ậ đề Nội dung

Mức độ

Bài Câu lệnh lăp For …do

Bài 8: Lặp với số lần chưa biết trước

While …do

Tổng (điểm) Biết I1, I5, I8, I9, I10

1.25

I6, I11,II1

2.5 3,75 Hiểu I2, I3, I4, II2

2,75

I7, I12

0.5 3,25

Vận dụng II3

3 3 I Phần trắc nghiệm (3 điểm)

Câu 1:

chạy chương trình pascal ta dùng tổ hợp phím :

a/ Ctrl + F7 b/ Ctrl + F8 c/ Ctrl + F9 d/ Ctrl + F10 Câu 2:

Cho S i nguyên Khi chạy đoạn chương trình : s:=0;

for i:=1 to 10 s := s+i; writeln(s);

Kết in lên hình :

a/ s = 11 b/ s = 55 c/ s = 101 d/ s = 10

Câu 3:

Cho S i nguyên Khi chạy đoạn chương trình : s:=0;

for i:=1 to s := s+2*i; writeln(s);

Kết in lên hình :

a/ s = 72 b/ s = 100 c/ s = 101 d/ s = 55

Cậu 4:

Các câu lệnh Pascal sau hợp lệ :

a/ for i:=100 to writeln(‘A’) b/ for i:= 1.5 to 10.5 writeln(‘A’) c/ for i:= to 10 writeln(‘A’) d/ for i:=1 to 10 writeln(‘A’); Câu 5:

Cấu trúc vòng lặp FOR – DO :

a/ For <biến đếm>:= < giá trị đầu> to<giá trị cuối> do<câu lệnh> ; b/ For := < giá trị cuối> to <giá trị cuối> <câu lệnh>;

c/ For := < giá trị cuối> downto <giá trị đầu>do ; d/ For := < giá trị đầu> downto ;

Câu 6:

Cấu trúc vịng lặp WHILE - DO có dạng:

a/ While <điều kiện1> < điều kiện2>; b/ While <điều kiện> do<câu lệnh> ; c/ While <điều kiện>; d/ While ;

(55)

Trong Pascal kết phép toán : (7 Mod 2) bằng:

a/ b/ c/ d/

Câu 8:

Khi viết câu lệnh lặp dạng For…do.

a/ Giá trị đầu lớn giá trị cuối c/ Giá trị cuối lớn giá trị đầu c/ Giá trị đầu giá trị cuối d/ Tất sai

Câu 9:

Dữ liệu kiểu Longint là:

a/ Kiểu số nguyên nhận giá trị từ o đên 225 b/ Kiểu số thực

c/ Kiểu số nguyên nhận giá trị từ -231 đến 231-1

d/ Tất sai Câu 10:

Câu lệnh lặp dạng for …do biến đếm có kiểu

a/ Kiểu số thực b/ Kiểu số nguyên

c/ Kiểu ký tự d/ Tất sai

Câu 11:

Vòng lặp while vòng lặp:

a/ Biết trước số lần lặp b/ Chưa biết trước số lần lặp c/ Biết trước số lần lặp giới hạn <=100 d/ Biết trước số lần lặp giới Câu 12:

Cho đoạn chương trình sau: P:=0;

i:=1;

while <=n begin

p:=p*i i:=i+1; end;

Sau thực đoạn chương trình với n=4, giá trị p

a/ b/ 12 c/ 24 d/ Vịng lặp vơ tận

II Tự luận (7 điểm) Câu 1:

Khi xảy “lặp vơ hạn” viết đoạn chương trình (2 điểm) Câu 2:

Sau thực xong đoạn chương trình sau, chương trình thực vòng lặp với giá trị biến (2 điểm)

M:=0;

For i:=1 to M:=M+2; Câu 3:

Viết chương trình tính tổng S=1+1/2+1/3+ +1/n.(3điểm) (Lưu ý: Sử dụng lệnh lặp While……do)

3 Đáp án:

(56)

Câu Câu Câu Câu Câu Câu

c b a d a b

Câu Câu Câu Câu 10 Câu 11 Câu 12

d c c b b a

II Tự luận (7điểm) Câu (2điểm)

- Để xảy trường hợp “lặp vơ hạn” điều kiện ln không xảy điều kiện sai

- Đoạn chương trình Var a: integer;

Begin a:=5;

while a<6 writeln(‘a’); end

Câu 2:

Với đoạn chương trình máy tính thực vịng lặp, lần M tăng thêm đơn vị, kết thúc vịng lặp M có 10 giá trị

Câu 3:

Program Tinh_tong; Uses crt Var I,S: real;

N: integer; Begin

Write(‘nhap n=’); Readln(n); S:=0;

I:=1;

While I<=N Begin

S:=S+1/I; I:=I+1; End;

Writeln(‘Tong la’,S:6:2); Readln

End

4 Đánh giá, nhận xét sau chấm kiểm tra:

(57)

Ngày soạn: Ngày giảng: 8A:

8B: 8C: 8D: 8E: Tiết 56:

BÀI :

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

1 Mục tiêu: a 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 b Kỹ Năng:

- Hiểu thuật tốn tìm số lớn nhất, nhỏ dãy số c Thái độ:

- Nghiêm túc, ý học 2 Chuẩn bị giáo viên học sinh: a Chuẩn bị giáo viên:

(58)

Kiến thức cũ, đọc trước 3 Tiến trình dạy học:

a Kiểm tra cũ: Không KT b D y n i dung b i m i:ạ ộ

HOẠT ĐỘNG CỦA GV HOẠT ĐỘNG CỦA HS

GV: Đưa ví dụ SGK để giới thiệu cho học sinh cách sử dụng biến mảng

GV: Phân tích tốn để học sinh hiểu rõ vấn đề

GV: để giải vấn đề cần có liệu gì:

1 Dãy số biến mảng: 22’ HS: Chú ý lắng nghe

Ví dụ Trong Pascal ta cần nhiều câu lệnh khai báo nhập liệu dạng sau đây, câu lệnh tương ứng với điểm học sinh: Var Diem_1, Diem_2, Diem_3,… : real;

Read(Diem_1); Read(Diem_2), Read(Diem_3);

Nếu số học sinh lớp nhiều đoạn khai báo đọc liệu chương trình dài

Giả sử lưu nhiều liệu có liên quan với (như Diem_1, Diem_2, Diem_3, trên) biến và đánh "số thứ tự" cho giá trị đó, ta sử dụng quy luật tăng hay giảm "số thứ tự" vài câu lệnh lặp để xử lí liệu cách đơn giản hơn, chẳng hạn:

- Với i = đến 50: nhập Diem_i;

- Với i = đến 50: so sánh Max với

Diem_i;

Để giúp giải vấn đề trên, kiểu liệu gọi kiểu mảng

Dữ liệu kiểu mảng tập hợp hữu hạn phần tử có thứ tự, phần tử có kiểu liệu, gọi kiểu phần tử Việc thứ tự thực cách gán cho phần tử số:

Hình 40 HS: Biến mảng

(59)

GV: Việc xếp thứ tự nào? GV: Giá trị mảng nào?

GV: Đưa ví dụ biến mảng

GV: Đưa cách khai bái biến mảng Pascal

mảng, biến gọi biến mảng

HS: Bằng cách gán gán cho phần tử số

HS: Là biến nguyên

Giá trị biến mảng mảng, tức dãy số (số nguyên, số thực) có thứ tự, số giá trị biến thành phần tương ứng

2 Ví dụ biến mảng: 16’ HS: Chú ý ví dụ

Để làm việc với dãy số nguyên hay số thực, phải khai báo biến mảng

Ví dụ, cách khai báo đơn giản biến mảng ngôn ngữ Pascal sau:

var Chieucao: array[1 50] of real; var Tuoi: array[21 80] of integer;

Với câu lệnh thứ nhất, ta khai báo biến có tên Chieucao gồm 50 phần tử, phần tử biến có kiểu số thực Với câu lệnh khai báo thứ hai, ta có biến Tuoi gồm 60 phần tử (từ 21 đến 80) có kiểu số nguyên

HS: Chú ý ghi

Cách khai báo mảng Pascal sau: Tên mảng : array[<chỉ số đầu> <chỉ số cuối>] of <kiểu liệu>

trong số đầu số cuối hai số nguyên biểu thức nguyên thoả mãn số đầu ≤ số cuối kiểu liệu là integer real

c Củng cố, luyện tập: 5’

- Khái niệm mảng chiều

- Cách khai báo mảng, nhập, in, truy cập phần tử mảng d Hướng dẫn học sinh tự học nhà: 1’

- Học cũ

(60)

Ngày soạn: Ngày giảng: 8A:

8B: 8C: 8D: 8E: Tiết 57:

BÀI :

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

1 Mục tiêu: a 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 b Kỹ Năng:

- Hiểu thuật tốn tìm số lớn nhất, nhỏ dãy số c Thái độ:

- Nghiêm túc, ý học 2 Chuẩn bị giáo viên học sinh: a Chuẩn bị giáo viên:

Giáo án, máy chiếu b Chuẩn bị học sinh:

Kiến thức cũ, sách, 3 Tiến trình dạy:

(61)

? Em nêu cách khai báo biến mảng Pascal? Đáp án:

Tên mảng : array[<chỉ số đầu> <chỉ số cuối>] of <kiểu liệu>

trong số đầu số cuối hai số nguyên biểu thức nguyên thoả mãn số đầu ≤ số cuối kiểu liệu integer real.

b Dạy nội dung mới: HOẠT ĐỘNG CỦA

THẦY VÀ TRÒ

NỘI DUNG KIẾN THỨC

Hoạt động 1: GV: Đưa ví dụ HS: Đọc hiểu ví dụ

GV: Hướng dẫn học sinh cách sử dụng biến mảng HS: Chú ý

GV: Cách khai báo biến có ích lợi gì?

HS: Tiết kiệm thời gian cơng sức viết chương trình

Ví dụ Tiếp tục với ví dụ 1, thay khai báo biến Diem_1, Diem_2, Diem_3, để lưu điểm số học sinh, ta khai báo biến mảng Diem sau:

var Diem: array[1 50] of real;

Cách khai báo sử dụng biến mảng có lợi gì? Trước hết, thay nhiều câu lệnh nhập in liệu hình câu lệnh lặp Chẳng hạn, ta viết

For i:=1 to 50 readln(Diem[i]); để nhập điểm học sinh

Để so sánh điểm học sinh với giá trị đó, ta cần câu lệnh lặp, chẳng hạn

For i:=1 to 50

if Diem[i]>8.0 then writeln('Gioi');

Điều giúp tiết kiệm nhiều thời gian công sức viết chương trình

Hơn nữa, học sinh có nhiều điểm theo mơn học: điểm Tốn, điểm Văn, điểm Lí, Để xử lí đồng thời loại điểm này, ta khai báo nhiều biến mảng:

var DiemToan: array[1 50] of real; var DiemVan: array[1 50] of real; var DiemLi: array[1 50] of real; hay

(62)

Hoạt động 2:

GV: Đưa ví dụ HS: Đọc hiểu ví dụ

GV: Hướng dẫn học sinh cách sử dụng biến mảng HS: Chú ý

- Ghi thực chương trình

thể

Ví dụ cho thấy rằng, gán giá trị, đọc giá trị tính tốn với giá trị phần tử biến mảng thông qua số tương ứng phần tử Chẳng hạn, câu lệnh Diem[i] phần tử thứ i biến mảng Diem.

Ta gán giá trị cho phần tử mảng câu lệnh gán:

A[1]:=5; A[2]:=8;

hoặc nhập liệu từ bàn phím câu lệnh lặp: for i := to readln(a[i]);

3 Tìm giá trị lớn nhỏ dãy số

Ví dụ (SGK) Phần khai báo chương trình có thể sau:

program MaxMin; uses crt;

Var

i, n, Max, Min: integer; A: array[1 100] of integer;

Phần thân chương trình tương tự đây: Begin

clrscr;

write('Hay nhap dai cua day so, 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;

Max:=a[1]; Min:=a[1]; for i:=2 to n

(63)

end;

write('So lon nhat la Max = ',Max); write('; So nho nhat la Min = ',Min); readln

End. 4 - CỦNG CỐ

- Khái niệm mảng chiều

- Cách khai báo mảng, nhập, in, truy cập phần tử mảng 5 - HƯỚNG DẪN VỀ NHÀ

- Về nhà xem lại học tiết sau chúng thực hành

ày soạn: Ngày dạy: TIẾT 56, 57:

QUAN SÁT HÌNH KHƠNG GIAN VỚI PHẦN MỀM YENKA

I/ MỤC TIÊU:

Kiến thức: Hs hiểu đối tượng hình học phần mềm quan hệ chúng

Kỹ năng: Thông qua phần mềm học sinh biết hiểu ứng dụng phần mềm toán học, thiết lập quan hệ toán học đối tượng

- Biết cách sử dụng phần mềm để vẽ hình học khong gian chương trình lớp

Thái độ: Hs ý thức việc ứng dụng phần mềm học tập mình 1 Giới thiệu phần mềm Yenka

(64)

vài đối tượng hình khơng gian em sáng tạo khối hình hồn chỉnh, có ý nghĩa cơng trình xây dựng, kiến trúc theo ý muốn

Phần mềm giúp em hiểu rõ học hình khơng gian chương trình mơn Tốn bậc THCS

2 Giới thiệu hình làm việc phần mềm

Sau cài đặt em nhìn thấy biểu tượng phần mềm có dạng sau hình

Nháy đúp vào biểu tượng để chạy phần mềm Em thấy xuất cửa sổ thông tin sau đây:

Nháy nút Try Basic Version để vào hình làm việc phần mềm

Hộp công cụ đối tượng dùng để khởi tạo làm việc với hình khối Các hình khối sẽ

được thể khung hình vng hình Thanh cơng cụ chứa nút lệnh dùng để điều khiển khung nhìn làm việc với hệ thống tệp phần mềm

Muốn thoát khỏi phần mềm nháy nút Close công cụ. 3 Thiết lập đối tượng, hình khối 3D

3.1 Thiết lập mơ hình đầu tiên

(65)

Em ý đến đối tượng hình khơng gian hình trụ ( ), hình nón ( ), hình chóp ( ) hình lăng trụ ( ) Em dùng chuột kéo thả đối tượng vào khung hình, em nhận mơ hình có dạng sau:

Bây em sử dụng công cụ đặc biệt phần mềm để quan sát tốt mơ hình vừa tạo

Xoay mơ hình khơng gian chiều (3D)

- Nháy vào biểu tượng cơng cụ chức Khi trỏ trở thành dạng

(66)

Phóng to, thu nhỏ

- Nháy chuột vào biểu tượng cơng cụ chức Khi trỏ trở thành dạng

- Nhấn giữ kéo rê chuột hình em thấy khung mơ hình phóng to, thu nhỏ tùy thuộc vào hướng chuyển động chuột Lệnh hết tác dụng em thả tay chuột

Dịch chuyển khung mô hình

- Nháy chuột vào biểu tượng cơng cụ chức Khi trỏ trở thành dạng

3.2 Các lệnh tạo mới, ghi, mở tệp mơ hình

Các tệp lưu trữ mơ hình đối tươngj phần mềm có phần mở rộng mặc định yka Các thao tác với tệp thông qua biểu tượng Khi nháy chuột vào biểu tượng bảng chọn xuất có dạng sau:

3.3 Xóa đối tượng

(67)

khi chọn Hoặc gõ tổ hợp phím Ctrl-A để đánh dấu tất đối tượng có hình

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

TIẾT 58, 59, 60:

QUAN SÁT HÌNH KHƠNG GIAN VỚI PHẦN MỀM YENKA

I/ MỤC TIÊU:

Kiến thức: Hs thực h ành nhểu đối tượng hình học phần mềm quan hệ chúng

Kỹ năng: Thông qua phần mềm học sinh biết hiểu ứng dụng phần mềm toán học, thiết lập quan hệ toán học đối tượng

- Biết cách sử dụng phần mềm để vẽ hình học khong gian chương trình lớp

4 Khám phá, điều khiển hình khối

4.1 Thay đổi, dịch chuyển vị trí

(68)

sẽ thu hai hình khối nằm chồng lên Kỹ thuật giúp em xếp hình khối theo nhiều kiểu kiến trúc khác

4.2 Thay đổi kích thước

Để thay đổi kích thước đối tượng trước tiên cần nháy chọn hình Khi hình chọn em thấy xuất đường viền nút nhỏ cho phép thực tương tác để thay đổi kích thước đối tượng Tùy vào hình mà đường viền có hình dạng khác Sau ta quan sát kỹ hơn:

1 Hình trụ

2 Hình lăng trụ tam giác

(69)

4 Hình nón

4.3 Thay đổi màu sắc khối hình

Muốn tơ màu, thay đổi màu sắc khối hình em dùng cơng cụ Khi nháy chuột vào công cụ em thấy danh sách xuất cho phép chọn màu tơ khác

(70)

Ví dụ ta tơ màu mặt hình lăng trụ tam giác với màu sắc khác

4.4 Sử dụng hộp hội thoại tính chất hình khối

Các tính chất hình khối thay đổi thơng qua hộp hội thoại tính chất đối tượng Nháy đúp chuột lên đối tượng em thấy xuất hộp hội thoại mơ tả thơng tin, tính chất đối tượng

Hình cho ta hình ảnh hộp hội thoại tính chất hình lăng trụ Chúng ta trực tiếp thay đổi hai thơng số quan trọng hình chiều cao (height) độ dài cạnh đáy (base edge) Thực thay đổi cách gõ trực tiếp số vào ô nháy chuột vào vị trí để tăng, giảm giá trị theo đơn vị

Muốn đóng cửa số nháy chuột vào nút góc phải hộp hội thoại

4.5 Gấp giấy thành hình khối

Một chức hay phần mềm cho phép em quan sát cách tạo hình khối từ hình phẳng

(71)

- Cho trước hình phẳng, cần "gấp" lại để tạo thành hình khối khơng gian - Cho trước hình khối khơng gian, cần "mở" thành hình phẳng

1 Gấp hình phẳng để tạo hình khơng gian

Sử dụng cơng cụ đối tượng để tạo hình phẳng khung mơ hình cách kéo thả đối tượng Hiện phần mềm hỗ trợ cho hai hình: hình trụ

và hình lăng trụ

- Chọn đối tượng hộp công cụ Kéo thả đối tượng vào khung hình

- Nháy chuột chọn hình phẳng tương ứng Dùng chuột để thực thao tác "gấp" hình phẳng thành hình khối tương ứng

(72)

2 Mở hình khối thành hình phẳng

Ngược lại hình khối khơng gian (hình trụ, lăng trụ, chóp), hộp hội thoại tính chất thực lệnh Open biến đổi hình khơng gian 3D thành "hình

(73)

Đối với hình phẳng, lệnh sau thực hiện:

Flatten: Tự động làm phẳng hình khung mơ hình

Fold: Tự động gấp lại trạng thái đánh dấu trước lệnh Store angles.

Store angles: Cố định vị trí lệnh gấp lại Lệnh có tác dụng thực

hiện lệnh Fold

Convert to Shape: Chuyển trạng thái hình phẳng thành hình khối 3D Lệnh có

tác dụng thực xong việc gấp hồn tồn hình phẳng lệnh Fold 5 Một số chức thủ thuật nâng cao

5.1 Thay đổi chất liệu, mẫu thể hình

Các mặt hình khối khơng gian khơng thay đổi màu sắc, mà cịn thay đổi kiểu mẫu thể Ví dụ thay đổi mặt xung quan hình trụ mẫu hình viên gạch,

Thao tác thực sau:

- Nháy đúp chuột để làm xuất hộp hội thoại tính chất hình - Nháy chuột chọn chức thay đổi kiểu thể bề mặt

- Trong hộp hội thoại chọn Use material chọn mẫu thể danh sách material phía

(74)

5.2 Biến đổi xoay hình khối khơng gian

Trong hộp hội thoại tính chất hình khối em thực lệnh cho phép xoay hình khối theo hướng khác không gian

Em ý đến nút lệnh vị trí Rotation

Trong hình đây, hình trụ hình lăng trụ xoay quanh trục dọc để trở thành hình khối nằm ngang khung mơ hình

(75)

4 Củng cố:

- Giáo viên hệ thống lại toàn nội dung học 5 Hướng dẫn nhà:

- Học theo sách giáo khoa ghi

- Ôn lại kiến thức học, làm làm lại nhiều lần - Học kĩ lí thuyết, đọc để sau học

TIẾT 61:

TIẾT 63:

BÀI THỰC HÀNH 7: XỬ LÝ DÃY SỐ TRONG CHƯƠNG TRÌNH I - MỤC TIÊU

1 Kiến thức

- Làm quen với việc khai báo sử dụng biến mảng 2 Kỹ Năng

- Ôn luyện cách sử dụng câu lệnh lặp for…do.

- Củng cố kĩ đọc, hiểu chỉnh sửa chương trình 3 Thái độ: Nghiêm túc

II CHUẨN BỊ

1 Giáo viên: giáo án, máy chiếu 2 Học sinh: Kiến thức cũ, sách, vở. III - PHƯƠNG PHÁP

- Thuyết trình, giảng giải, vấn đáp IV - TIẾN TRÌNH LÊN LỚP

Ngày dạy:

(76)

1 - ỔN ĐỊNH

2 - KIỂM TRA BÀI CŨ

a Hãy cho số ví dụ lặp với số lần chưa biết trước 3 - BÀI MỚI

HOẠT ĐỘNG CỦA THẦY VÀ TRÒ

NỘI DUNG KIẾN THỨC GV: Đưa tập SGK

? Gọi học sinh nêu ý tưởng - GV hướng dẫn

HS: Làm tập

Bài 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á, trung bình (theo tiêu chuẩn từ 8.0 trở lên đạt loại giỏi, từ 6.5 đến 7.9 đạt loại khá, từ 5.0 đến 6.4 đạt trung bình 5.0 xếp loại kém)

a) Xem lại ví dụ ví dụ 3, cách sử dụng khai báo biến mảng Pascal

b) Liệt kê biến dự định sử dụng chương trình Tìm hiểu phần khai báo tìm hiểu tác dụng biến:

program Phanloai; uses crt;

Var

i, n, Gioi, Kha, Trungbinh, Kem: integer; A: array[1 100] of real;

b) Gõ phần khai báo vào máy tính lưu tệp với tên Phanloai Tìm hiểu câu lệnh trong phần thân chương trình đây:

Begin clrscr;

write(‘Nhap so cac ban lop, n = ‘); readln(n); writeln(‘Nhap diem:’);

For i:=1 to n Begin write(i,’ ‘); readln(a[i]); End;

Gioi:=0; Kha:=0; Trungbinh:=0; Kem:=0; for i:=1 to n do

begin

(77)

if (a[i]<8.0) and (a[i]>=6.5) then Kha:=Kha+1;

if (a[i]>=5) and (a[i]<6.5) then Trungbinh:=trungbinh+1

end;

writeln(‘Ket qua hoc tap:’); writeln(Gioi,’ ban hoc gioi’); writeln(Kha,’ ban hoc kha’);

writeln(Trungbinh,’ ban hoc trung binh’); writeln(Kem,’ ban hoc kem’);

readln End.

d) Gõ tiếp phần chương trình vào máy tính sau phần khai báo Dịch, chạy chương trình

4 - CỦNG CỐ

- Cách sử dụng biến mảng

- Cách kết hợp với lệnh lặp for…do 5 - HƯỚNG DẪN VỀ NHÀ

- Về nhà xem lại học tiết sau thực hành tiếp IV- Rút Kinh Nghiệm:

TIẾT 64:

BÀI THỰC HÀNH 7: XỬ LÝ DÃY SỐ TRONG CHƯƠNG TRÌNH (TT) I - MỤC TIÊU

1 Kiến thức

- Làm quen với việc khai báo sử dụng biến mảng 2 Kỹ Năng

- Ôn luyện cách sử dụng câu lệnh lặp for…do.

- Củng cố kĩ đọc, hiểu chỉnh sửa chương trình 3 Thái độ: Nghiêm túc

(78)

II CHUẨN BỊ

1 Giáo viên: giáo án, máy chiếu 2 Học sinh: Kiến thức cũ, sách, vở. III - TIẾN TRÌNH LÊN LỚP

1 - ỔN ĐỊNH

2 - KIỂM TRA BÀI CŨ

a Hãy cho số ví dụ lặp với số lần chưa biết trước 3 - BÀI MỚI

HOẠT ĐỘNG CỦA THẦY VÀ TRÒ

NỘI DUNG KIẾN THỨC GV: Đưa tập SGK

? Gọi học sinh nêu ý tưởng - GV hướng dẫn

HS: Làm tập

Bài Bổ sung chỉnh sửa chương trình để nhập hai loại điểm Toán Ngữ văn bạn, sau in hình điểm trung bình bạn lớp (theo cơng thức điểm trung bình = (điểm Tốn + điểm Ngữ văn)/2), điểm trung bình lớp theo mơn Tốn Ngữ văn a) Tìm hiểu ý nghĩa câu lệnh sau đây: Phần khai báo:

Var

i, n: integer;

TbToan, TbVan: real;

DiemToan, DiemVan: array[1 100] of real; Phần thân chương trình:

begin

writeln('Diem trung binh:'); for i:=1 to n do

writeln(i,' ',(DiemToan[i]+DiemVan[i])/2:3:1); TbToan:=0; TbVan:=0;

for i:=1 to n do

begin TbToan:=TbToan+DiemToan[i]; TbVan:=TbVan+DiemVan[i] end; TbToan:=TbToan/n; TbVan:=TbVan/n;

(79)

b) Bổ sung câu lệnh vào vị trí thích hợp chương trình Thêm lệnh cần thiết, dịch chạy chương trình với số liệu thử

4 - CỦNG CỐ :

- Cách sử dụng biến mảng

- Cách kết hợp với lệnh lặp for…do 5 - HƯỚNG DẪN VỀ NHÀ :

- Về nhà xem lại học tiết sau thực hành tiếp IV- Rút Kinh Nghiệm:

TIẾT 65, 66:

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

1 Kiến thức

- Viết chương trình Pascal sử dụng câu lệnh biến mảng 2 Kỹ Năng

(80)

3 Thái độ: Nghiêm túc II CHUẨN BỊ

1 Giáo viên: giáo án, máy chiếu 2 Học sinh: Kiến thức cũ, sách, vở. III - TIẾN TRÌNH LÊN LỚP

1 - ỔN ĐỊNH

2 - KIỂM TRA BÀI CŨ 3 - BÀI MỚI

HOẠT ĐỘNG CỦA THẦY VÀ TRÒ NỘI DUNG KIẾN THỨC

GV: Đưa tập SGK gọi học sinh lên bảng trả lời

1) Lợi ích việc sử dụng biến mảng rút gọn việc viết chương trình, sử dụng câu lệnh lặp để thay nhiều câu lệnh Ngoài cịn lưu trữ xử lí nhiều liệu có nội dung liên quan đến cách hiệu

2) Đáp án a) Sai Phải thay dấu phẩy bằng hai dấu chấm; b) c) Sai, giá trị nhỏ lớn số mảng phải số nguyên; d) Sai, giá trị đâu số mảng phải nhỏ số cuối; e) Đúng.

3) Đúng

4) Không Giá trị nhỏ lớn số mảng phải xác định phần khai báo chương trình

5) Học sinh thực hành máy

1) Hãy nêu lợi ích việc sử dụng biến mảng chương trình

2) Các khai báo biến mảng sau Pascal hay sai?

var X: Array[10,13] Of Integer; var X: Array[5 10.5] Of Real; var X: Array[3.4 4.8] Of Integer; var X: Array[10 1] Of Integer; var X: Array[4 10] Of Real;

3) "Có thể xem biến mảng biến tạo từ nhiều biến có kiểu, tên nhất" Phát biểu hay sai?

4) Câu lệnh khai báo biến mảng sau máy tính có thực khơng? var N: integer;

A: array[1 N] of real;

(81)

Chương trình sau: var N, i: integer;

A: array[1 100] of real; begin

write('Nhap so phan tu cua mang, n= ',n);

for i:=1 to n do

write('Nhap gia tri ',i,'cua mang, a[',i,']= ');

end.

4 - CỦNG CỐ

- Hiểu hoạt động lặp với số lần biết trước 5 - HƯỚNG DẪN VỀ NHÀ

- Về nhà xem lại học tiết sau học tiếp IV- Rút Kinh Nghiệm:

(82)

TIẾT 67:

KIỂM TRA THỰC HÀNH

PHẦN A: TỰ LUẬN

Câu1 : Hãy input output cá toán sau: a/ xác định số học sinh lớp mang họ trần

b/ Tính tổng phần tử lớn dãy n số cho trước c/ Tìm số có giá trị nhỏ n số cho

Câu Hãy mơ tả thuật tốn giải tốn tính tổng phần tử dãy số A = { a1,a2,…………,an} cho trước

Câu Sau câu lệnh sau đây a/ if (45 mod 3) = then x:= x+2; b/ if x> 10 then x:= x+1 ;

giá trị x bao nhiêu, trước giá trị x 10

Câu Hãy cho biết thành phần ngơn ngữ lập trình.

Câu Cho biết khác tên từ khoá Cho biết cách đặt tên chương trình

Câu Hãy cho biết thành phần cấu trúc chương trình.

Câu 7.Chuyển biểu thức viết pascal sau thành biểu thức toán: a/ (a+b)*(a+b)-x/y; b/ b/(a*a +c)

c/ a*a/((2*b+c)*(2*b+c)) d/ + 1/ +1 / (2*3) + / (3*4) + / (4*5) Câu Hãy mơ tả thuật tốn giá trị hai biến x ,y cho nhau.

Câu Hãy viết phép so sánh sau kí hiệu pascal: a/ (a + b > c ) ( b + c > a) (a + c > b )

(83)

b/ (x < a1 ) (x > a2 );

c/ (diem >= 6) (diem < 8);

d/ (a2 <10) ( a chia hết cho 3);

Câu 10 Hãy mô tả điều kiện cho đâytrong ngôn ngữ Pascal: a/ n số nguyên chia hết cho

/ m số nguyên không chia hết cho c/ y số dương không vượt 100

d/ Tổng hai số ba số a, b, c ln lớn số lại e/ Hai số a b khác có dấu

f/ a b hai số nguyên tỉ lệ thuận với theo tỉ lệ 3:4

g/ Số a> tổng hai số b c 10, số a< = tổng hai số b c – 20

h/ m nhận giá trị 1, 3, 5, 7,

PHẦN B: TRĂC NGHIỆM

Câu 1: Ta biết rằng, máy tính thực cơng việc theo mong muốn mình, người phải đưa dẫn (“lệnh”) thích hợp cho máy tính Những thiết bị thường sữ dụng để “ra lệnh” cho máy tính?

a/ Bàn phím; b/ Màn hình;

c/ Microphone; d/ Chuột máy tính

Hãy chọn câu thích hợp

Câu 2: Hãy chọn câu phát biểu đây:

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

b/ Mọi chương trình máy tính lập trình sẵn, gắn phần cứng máy tính bán máy tính

c/ Khi thực chương trình, máy tính thực lệnh có chương trình theo thứ tự ngẫu nhiên thứ tự thực lệnh không ảnh hưởng đến kết thực chương trình

d/ Với ngơn ngữ lập trình viết chương trình máy tính

(84)

a/ Ngôn ngữ tự nhiên b/ Ngơn ngữ lập trình

c/ Ngơn ngữ máy d/ tất ngơn ngữ nói

Câu 4: Điền cụm từ sau vào chỗ trống ( ) để câu hồn chỉnh: ngơn ngữ lập trình, ngơn ngữ máy, chương trình, dãy bit, chương trình dịch.

a/ Các lệnh ngôn ngữ máy viết dạng b/ sử dụng để viết chương trình

c/ Chương trình thường viết ngơn ngữ lập trình, sau chuyển đổi sang ngôn ngữ máy

d/ ngôn ngữ máy tính hiểu trực tiếp e/ Dãy lệnh để máy thực nhiệm vụ gọi

Câu 5: Những phát biểu đúng?

a/ Việc viết nhiều lệnh tập hợp lại thành chương trình giúp người điều khiển máy tính thực công việc phức tạp hiệu

b/ Chương trình thực chất dãy lệnh để hướng dẫn máy tính thực Khơng nên viết gộp lệnh thành chương trình phức tạp viết dài khó kiểm tra Vì tốt điều khiển máy tính theo lệnh

c/ Khi thực chương trình, máy tính thực lệnh có chương trình

d/ Khi dịch chương trình, chương trình dịch dịch lệnh viết quy tắc Các lệnh viết sai quy tắc bị bỏ qua

e/ “Chương trình” từ gọi chung cho: Chương trình máy tính thể ngơn ngữ mà máy hiểu được(ngơn ngữ máy) chương trình viết ngơn ngữ lập trình

Câu 6: Hãy ghép mục cột bên trái với mục cột phải để có phát biểu

a/ Người lập trình 1/ người ta sử dụng chương trình bảng tính b/ Để soạn tài liệu 2/ chương trình giải trí

c/ Basic, Pascal, C 3/ người viết chương trình cho máy tính

d/ Trị chơi điện tử 4/ tập hợp lệnh để máy tính thực nhiệm vụ định

e/ Chương trình 5/ ta dùng chương trình soạn thảo văn f/ Để trình bày thơng tin

dưới dạng bảng tính

(85)

tốn với số

g/ Hệ điều hành 7/ tên số ngơn ngữ lập trình

Câu 7: Các câu hay sai?

Đúng Sai

a/ Mỗi loại máy tính có ngơn ngữ máy riêng

b/ Cần chọn ngơn ngữ lập trình theo ngơn ngữ máy

c/ Chương trình viết ngơn ngữ máy chạy nhanh

d/ Chương trình cách biểu diễn thuật tốn với mục đích thực máy tính

e/ Chương trình viết ngơn ngữ lập trình dễ hiểu

f/ Chỉ cần chương trình dịch cho loại máy tính

g/ Khi viết chương trình ngơn ngữ lập trình phải quan tâm đến phần cứng máy tính thực chương trình

h/ Khơng biết ngơn ngữ máy lệnh cho máy tính

Câu 8: Phát biểu sau đúng?

a/ Khi viết chương trình, cần tuân thủ quy tắc ngơn ngữ lập trình quy định mà khơng cần quan tâm đến ý nghĩa câu lệnh

b/ Khi viết chương trình, khơng phải tn thủ quy tắc viết câu lệnh ngôn ngữ lập trình quy định

c/ Khi viết chương trình khơng cần sử dụng câu lệnh có ý nghĩa để nhận lời giải tốn , chương trình dịch tự nhận biết sửa câu lệnh viết sai quy tắc ngơn ngữ lập trình

Câu 9: Số biến báo tối đa chương trình ? a/ Chỉ biến cho kiểu liệu b/ 10 biến

c/ Chỉ hạn chế dung lượng nhớ d/ Không giới hạn

câu1 Những tên có ý nghiã xác định từ trước khơng phép sử dụng có mục đích khác đuợc gọi ?

(86)

c/ Từ khố d/ Biến;

câu 11 Các ngơn ngữ lập trình phân chia liệu thành kiểu liệu khác với mục gì?

a/ Sử dụng nhớ máy tính cách có hiệu

b/ thực phép toán tương ứng với kiểu liệu c/ Tự động hoá việc viết chương trình

d/ Kiểm sốt lỗi chương trình thực phép tốn khơng có nghĩa Hãy chọn phương án sai

Câu 12 Trong câu sau chọn câu có kết đúng. a/ 14 / = ; 14 div = ; 14 mod = 4; b/ 14 / = 2.8 ; 14 div = ; 14 mod = 4; c/ 14 / = 2.8 ; 14 div = ; 14 mod = 2; d/ 14 / = ; 14 div = ; 14 mod = 4; câu 13 xác định / sai cho phác biểu đây:

đúng Sai

a/ Trong ngơn ngữ pascal, xâu kí tự chao cac ban viết hai dấu nháy đơn kép Tức hai cách viết : ’ chao cac ban ’ “chao cac ban “

b/ Trong ngơn ngữ pascal, để in hình chu vi đường trịn có bán kính 0,5 ta viết hai lệnh sau đây:

writeln( ‘chu vi đưong tron la ‘ , *pi*0.5) writeln( ‘chu vi duong tron la 2*pi*0.5 ‘ )

c/ Phép chia (/) áp dụng cho liệu kiểu số thực, không áp dụng cho kiểu liệu kiểu số nguyên Do , với hai số nguyên a b cho trước , ta viết a/b sai d/ ngôn ngữ pascal, lệnh writeln, readln

được dùng để tạo tương tác người - máy

(87)

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

b/ xem biến “tên” vùng nhớ dành riêng để lưu liệu có kiểu định, giúp người viết chương trình truy cập xác đến liệu

c/ Biến lưu liệu người sử dụng nhập vào máy tính kết trung gian

d/ tất phép toán

câu 15 Hãy ghép thuật ngữ cột bên tráI với ý nghĩa tương ứng cho cột bên phải: a/ 1/ Tên người lập trình đặt tuân thủ quy tắc

của ngơn ngữ lập trình

b/ Từ khố 2/ Những đại lượng người lập trình đặt tên thay đổi giá trị thực chương trình

c/ Biến 3/ Những tên gọi có ý nghĩa xác định từ trước sử dụng cho mục đích khác d/ Tên 4/ đại lượng người lập trình đặt tên

và có giá trịkhơng thay đổi thực chương trình

Câu 16 Hãy chọn câu phát biểu câu dư ới đây:

a/ Để sử dụng biến chương trình, ta phảI khai báo chúng phần khai báo

b/ Ta cần khai báo tên biến mà không cần khai báo kiểu liệu, chương trình dịch tự động xác dịnh kiểu liệu mà biến lưu trữ

c/ Để khai báo biến , ta cần khai báo tên biến kiểu liệu mà biến lưu trữ

d/ giá trị biến thay đổi (được gán lại ) trình thực chương trình

Câu 17 Số biến khai báo tối đa chương trình bao nhiêu? a/ Chỉ biến cho kiểu liệu b/ 10 biến

c/ Chỉ hạn chế dung lượng nhớ d/ không giới hạn

câu 18 Hãy chọn câu câu đây:

(88)

b/ Vì biến lưu trữ liệu giá trị thay đổi được, tốt dùng biến thay cho

c/ Cả tên biến phải đặt tuân thủ quy định chung tên ngơn ngữ lập trình

d/ giống biến, khơng phép khai báo hai có tên với giá trị khác

Câu18.khi ta khai báo biến:

a/ Máy tính dành riêng phần nhớ để lưu trữ giá trị biến suốt trình hoạt động chương trình

b/ Máy tự động in tên biến

c/Biến phảI sử dụng chương trình d/ khơng sử dụng biến chương trình

Câu19 Biến khai báo với kiểu liệu số thực lưu giá trị giá trị đây:

a/Một số nguyên

b/ Mơt số thực (có thể số nguyên) pham vi cho phép c/ Một số thực

d/Một dãy chữ số

Câu 20 Điều sẻ thực tagán số thập phân 2.75 cho biến khai báo số nguyên ?

a/ Vì biến khai báo với liệu kiểu số nguyên 2.75 số thực nên chương trình dịch bỏ phần thập phân gán giá trị cho biến

b/ chương trình dịch sẻ làm trịn số 2.75 gán giá trị cho biến

c/ chương trình dịch thơng báo lỗi kiểu liệu khơng phù hợp với kiểu biến

d/ Chương trình dịch bỏ qua câu lệnh gán thực câu lệnh Câu 21 Hãy chọn phát biểu phát biểu đây:

a/ sau xác định tốn ,việc mơ tả thuật tốn đắn quan trọng để nhận lời giảI toán

(89)

c/ Việc thực ba bước giảI toán máy tính cần thiết, tốn phức tạp

d/ Máy tính hoạt dộng máy móc , cần mơ tả bước cách xác để máy tính hiểu thực

Câu 22 Hãy chọn phát biểu câu đây:

a/ Xác định toán việc xác định điều kiện ban đầu (thông tin vào – INPUT) kết cần thu đựoc ( thông tin – OUTPUT)

b/ Dãy hữu hạn thao tác cần thực theo trật tự định để giảI toán gọi thuật toán

c/Đối với tốn cụ thể có thuật tốn để giảI tốn máy tính

d/ Với tốn cụ thể , phảI lựa chọn ngơn nữ lập trình phù hợp xây dựng thuật toán giảI tốn

Câu 23 Trong tên sau , tên hợp lệ ngôn ngữ pascal?

a/ lop8a; b/ Tamgiac;

c/ 8a; d/Tam giac;

e/ beginprogram f/ end;

Câu 24 Hãy ghép mõi kiểu liệu với phạm vi giá trị nó:

Kiểu tên Phạm vi giá trị ghép

a/char 1/ số nguyên khoảng từ -32000 đến + 32000

b/ string 2/ Só thực khoảng – 10-38 đến 1038.

C/ Integer 3/ Một kí tự bảng chữ d/ Real 4/ Xâu kí tự, tối đa gồm 255kí tự

Câu 25 Khi khai báo biến ta cần khai báo:

a/ khai báo tên biến b/ khai báo kiểu liệu biến

c/ Tên biến kiểu liệu biến d/ Các tên biến kiểu liệu biến

(90)

a/ Var : a, b ; integer; b/ Var a, b := integer ;

c/ Var a , b :integer; d/ Var a , b : interger ;

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

Hợp lệ Khơng hợp lệ

a/ A:= 4; b/ X := 3242; c/ X := ‘ 3242 ’ ; d/ A:= ‘ Ha Noi ’ ;

Câu 28 Trong pascal , khai báo sau sai :

Cách khai báo Sai

a/ Var tb : real ; b/ Var 4hs : integer ; c/ Const X : real ; d/ Var R = 30 ;

Câu 29 câu lệnh pascal sau viết hay sai:

Câu lệnh Sai

a/ if x:=7 then a = b ; b/ if x > then m:=n ;

c/ if (b <>0) and (c <> 0) then x:= - c/b; d/ if x > then a:=b ; else m:=n

(91)

Câu lệnh Sai a/ if <đ k > then <câu lệnh >;

b/ if <đ k> then <câu lệnh 1> ; <câu lênh 2>; c/ if <đk> then <câu lệnh 1> ; else < câu lệnh 2> ; d/ if <đk > then <câu lênh 1> else <câu lệnh > ;

Câu 31 chương trình pascal sau đây:

Var x : integer ; Begin

X:= ;

If (45 mod 3) =0 then x:= x +2; If x > 10 then x := x +10 ; End

X có giá trị

a/ b/

c/ 15 d/10

Câu32 chương trình pascal sau đây:

program hcn; var a, b :integer;

s,cv :real ; begin

a:= 10; b:= 5; s:= a*b ;

cv:= (a +b ) * ;

writeln(‘dien tich hcn la:’ , s ); writeln( ‘chu vi hcn la : ‘ , cv ) ; readln;

end

(92)

a/ s = 10 ; cv = ; b/ s= 30 ; cv = 50 ;

c/ s = 50 ; cv = 40 ; d/ s = 50 ; cv = 30 ;

Câu 33: sau câu lệnh pascal sau x có giá trị , nế trước giá trị x 5: sau thực lệnh x có giá tri ( 0; -10 ; ; 12 )

Câu lệnh Giá trị x

a/ if x mod = then x:= x +1;

b/ if (x mod =0) or (x>=5) then x:= 2*x; c/ if (x mod =1 ) and (x>10 ) then x:=0 ; d/ if x mod = then begin x:=x*x ; x:=x -10; Câu34: cho chương trình sau:

Var a,b : integer ; Begin

A:=16 ; b:=8 ;

If a< b then a:= a + b else Begin a:= a- b; b:= b + a end; Writeln( ‘ a= ‘, a , ‘ b = ‘, b);

End

Biến a b có giá trị mấy:

a/ a=16 ;b = 8; b/ a= 24 ; b= 8; c/ a = ; b =16; d/ a =24 ; b =16; Câu 35: cho chương trình sau:

program gptbn; var b, c : integer; x :real;

begin

b:= ; c:= -10 ;

if (b=0 ) and (c=0) then writeln( ‘ x có vơ số nghiệm’ ); if (b =0 ) and (c <> 0) then writeln( ‘ x vô nghiệm ‘);

if (b<> 0) and ( c<> ) then writeln (‘ pt có nghiệm x= ‘ , - c/b); readln;

(93)

X có nghiệm

a/ x có vơ số nghiệm ; b/ x vơ nghiệm ;

c/x có nghiệm = - d/ x có nghiệm = 2; Câu 36: cho chương trình sau:

program doigiatri; var x,y: integer; begin

x:=10; y:=15 ; x:= x+ y ;

y:= x – y; x := x – y;

writeln ( ‘ x= ‘, x, ‘y=’ , y); readln;

end

X, y có giá trị mấy:

a/ x= 10 ;b= 15 b/ x=25 ; y= 15; c / x= 25 ; b=10 d/ x=15 ; y= 10;

Câu 37: Các thành phần ngôn ngữ lập trình ? a/ Các từ khố tên

b/ bảng chữ cái, từ khoá tên

c/ Bảng chử quy tắt để viết câu lệnh sau cho tạo thành chương trình hồn chỉnh chạy máy tính

d/ Chỉ bảng chữ từ khố

Câu 38: Máy tính hiểu trực tiếp ngôn ngữ ngô ngữ dưới ?

a/ Ngôn ngữ tự nhiên b/ Ngơ ngữ lập trình

c/ Ngơn ngữ máy d/ Tất ngơn ngữ nói Câu 39: Trong khái báo sau kai báo nhất:

a/ Var tb: real b/ Var 4hs: Interger

c/ Const x: = real d/ Var R=30

(94)

Tên kiểu Phạm vi giá trị Ghép a/ Char 1/ Số nguyên khoản từ -32000-32000

b/ String 2/ Số thực khoảng -10-38 đến 1037

c/ Interger 3/ Một ký tự dãy chử d/ Real 4/ Xâu ký tự, tối đa gồm 255 kí tự

TIẾT 68, 69:

ƠN TẬP HOC KÌ II

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

(95)

 Hiểu mạch kiến thức chương trình HKII như: khái niệm ngơn ngữ lập trình, từ khóa, câu lệnh, q trình giải tốn máy tính, cấu trúc rẽ nhánh, câu lệnh điều kiện ph ần m ềm học tập

2 Kỹ năng

 Bước đầu biết lập trình hóa tốn có nội dung thực tiễn

 Bước đầu viết chương trình đơn giản ngơn ngữ lập trình Pascal  Vận dụng được: đưa toán từ thực tiễn đến chương trình thơng qua mơ tả thuật

tốn; sử dụng từ khóa, câu lệnh ngơn ngữ lập trình Pascal để lập trình tốn thực tiễn thành chương trình máy tính

 Vận dụng thành thạo: Kiến thức, kỹ năng, tri thức, phương pháp học vào giải tập, viết chương trình

3 Thái độ

 Cẩn thận, xác

 Tập trung cao độ, nghiêm túc học

 Phát triển tư suy luận logic, trí tưởng tượng tạo hứng thú học

tập

II - PHƯƠNG PHÁP

 Gợi mở vấn đáp đan xen thảo luận nhóm

III CHUẨN BỊ

1 Giáo viên: Giáo trình, bảng phụ. 2 Học sinh: Kiến thức cũ, sách, vở. IV - TIẾN TRÌNH BÀI GIẢNG

1 - ỔN ĐỊNH 2 – ÔN TẬP

I Khoanh tròn vào chữ đứng trước phương án (4 điểm) Câu 1: Trong ngôn ngữ lập trình Pascal câu lệnh sau đúng:

A If <điều kiện> then <câu lệnh 1> else <câu lệnh 2> B If <điều kiện> then <câu lệnh 1>; else <câu lệnh 2>; C If <điều kiện> then <câu lệnh 1> else <câu lệnh 2>; D If <điều kiện> ; then <câu lệnh 1> else <câu lệnh 2>;

Câu 2: Trong ngơn ngữ lập trình Pascal, phát biểu sau với câu lệnh điều kiện If…then…?

A Nếu sau then muốn thực nhiều câu lệnh lệnh phải đặt hai dấu ngoặc đơn

(96)

C Nếu sau then muốn thực nhiều câu lệnh lệnh phải đặt Begin End;

D Nếu sau then muốn thực nhiều câu lệnh lệnh phải đặt Begin End.

Câu 3: Trong ngơn ngữ lập trình Pascal câu lệnh sau đúng:

A If a=5 then a:=d+1; else a:=d+2; B If a=5 then a:=d+1else a:=d+2; C If a=5 then a=d+1; else a=d+2; D If a=5 then a:=d+1else a:=d+2 Câu 4: Trong ngôn ngữ Pascal, mặt cú pháp câu lệnh sau với cấu trúc lặp For…to…do ?

A For i:=1 to 100 a:=a-1; B For i:=1 to 100 do; a:=a-1; C For i:=1 to 100 a:=a-1 D For i:=1; to 100 a:=a-1; Câu 5: Trong lệnh lặp For…to…do Pascal, sau vòng lặp biến đếm thay đổi nào?

A Tăng đơn vị; B Giảm đơn vị;

C Một giá trị bất kì; D Một giá trị khác 0;

Câu 6: Sau thực đoạn chương trình sau, giá trị biến a bao nhiêu? a:=2 ;

for i:= to a:= a+1;

A B

C D

Câu 7: Trong câu lệnh lặp for i:=1 to 10 begin…end; câu lệnh ghép thực lần (nói cách khác, vịng lặp thực hiện?)

A Khơng lần B lần

C 10 lần D lần

Câu 8: Trong ngôn ngữ Pascal, đoạn chương trình sau đưa hình kết gì? For i:=1 to 10 write (i,’ ‘);

A 10 B 10

C Đưa 10 dấu cách D Không đưa kết

II Đánh dấu x vào ô vuông sau câu lệnh em cho ? (1 điểm) a) if a>b then max:=a; else max:=b;

b) if a>b then max:=a else max:=b;

(97)

III Viết cấu trúc câu lệnh PASCAL: (2 điểm)

a) Câu lệnh lặp với số lần cho trước: …… ……… …

b) Câu lệnh lặp với số lần chưa biết trước : ……… …… …… ………

………

……… ………

IV Hãy viết chương trình để giải tốn sau : (3 điểm)

Nhập vào số nguyên a, b So sánh hai số thơng báo kết hình I Khoanh trịn vào chữ đứng trước phương án (4 điểm)

Câu 1: Trong ngôn ngữ lập trình Pascal câu lệnh sau đúng: A If <điều kiện> then <câu lệnh 1> else <câu lệnh 2>

B If <điều kiện> then <câu lệnh 1> else <câu lệnh 2>; C If <điều kiện> then <câu lệnh 1>; else <câu lệnh 2>; D If <điều kiện> ; then <câu lệnh 1> else <câu lệnh 2>;

Câu 2: Trong ngơn ngữ lập trình Pascal, phát biểu sau với câu lệnh điều kiện If…then…?

A Nếu sau then muốn thực nhiều câu lệnh lệnh phải đặt hai dấu ngoặc đơn

B Nếu sau then muốn thực nhiều câu lệnh lệnh phải đặt Begin End;

C Nếu sau then muốn thực nhiều câu lệnh lệnh phải đặt Begin End

(98)

Câu 3: Trong ngơn ngữ lập trình Pascal câu lệnh sau đúng:

A If a=5 then a:=d+1; else a:=d+2; B If a=5 then a:=d+1else a:=d+2 C If a=5 then a=d+1; else a=d+2; D If a=5 then a:=d+1else a:=d+2; Câu 4: Trong ngôn ngữ Pascal, mặt cú pháp câu lệnh sau với cấu trúc lặp For…to…do?

A For i:=1 to 100 a:=a-1; B For i:=1 to 100 do; a:=a-1; C For i:=1 to 100 a:=a-1 D For i:=1; to 100 a:=a-1; Câu 5: Trong lệnh lặp For…to…do Pascal, sau vòng lặp biến đếm thay đổi nào?

A Tăng đơn vị; B Giảm đơn vị;

C Một giá trị bất kì; D Một giá trị khác 0;

Câu 6: Sau thực đoạn chương trình sau, giá trị biến a bao nhiêu? a:=5 ;

for i:= to a:= a+1;

A B

C D

Câu 7: Trong câu lệnh lặp for i:=1 to 15 begin…end; câu lệnh ghép thực lần (nói cách khác, vịng lặp thực hiện?)

A Khơng lần B lần

C lần D 15 lần

Câu 8: Trong ngôn ngữ Pascal, đoạn chương trình sau đưa hình kết gì? For i:=1 to 10 write (i+1,’ ‘);

A 10 11 B 10

C Đưa 10 dấu cách D Không đưa kết

II Đánh dấu x vào ô vuông sau câu lệnh em cho ? (1 điểm) a) if a>b then max:=a; else max:=b;

b) if a>b then max:=a else max:=b;

c) for i:=1 to 10 for j:=1 to 10 x:=x+1; d) for i:=1 to 10 x:=x+1;

(99)

a) Câu lệnh lặp với số lần chưa biết trước: ……… …… …… ……… ………

………

……… ………

b) Câu lệnh lặp với số lần cho trước : …… ……… …

IV Hãy viết chương trình để giải toán sau : (3 điểm)

Tính thơng báo hình tổng: 12 + 22 + 32 + … + n2 Với n số tự nhiên

(100)

TIẾT 70

KIỂM TRA HỌC KÌ II

Ngày đăng: 18/04/2021, 15:02

Tài liệu cùng người dùng

  • Đang cập nhật ...

Tài liệu liên quan