Giáo án Tin Học lớp 11: TỔ CHỨC LẶP(tiết 3) ppsx

Chuẩn bị của giáo viên và học sinh: 1.. Chuẩn bị của giáo viên: Giáo án, đồ dùng dạy học.. Đọc tài liệu, nghe giảng, thảo luận, trả lời câu hỏi của giáo viên III.. Hoạt động thầy và trò

TỔ CHỨC LẶP(tiết 3)

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

1 Kiến thức: Giới thiệu tổ chức lặp, câu lệnh WHILE- DO

2 Kỹ năng: Rằng luyện kỹ sử dụng cấu trúc lặp trong mô tả thuật toán

3 Thái độ: Học tập nghiêm túc, tập trung tư duy

II Chuẩn bị của giáo viên và học sinh:

1 Chuẩn bị của giáo viên: Giáo án, đồ dùng dạy học

2 Chuẩn bị của học sinh:Xem bài trứơc ở nhà Đọc tài liệu, nghe giảng, thảo luận, trả lời câu hỏi của giáo viên

III Tiến trình tiết dạy:

1 Ổn định tổ chức

2 Kiểm tra bài cũ

Trình bày cú pháp và ý nghĩa lệnh FOR -DO

3.Nội dung:

Hoạt động thầy và trò Nội dung bài giảng

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

như thế nào?

HS: Trả lời

GV: Yêu cầu học sinh giải thích các

thành phần của lệnh

HS:Trả lời

GV: Yêu cầu học sinh giải thích nghĩa

Tiếng Anh của các từ khoá và cho biết ý

nghĩa câu lệnh

HS: Trả lời

2 Lặp với số lần chưa biết trước

và câu lệnh WHILE - DO:

Lặp với số lần biết trước sẽ chấm dứt khi một điều kiện cụ thể cho trước thỏa mãn

Cú pháp:

WHILE <Điều kiện> DO <Câu lệnh>; Trong đó:

- WHILE, DO: từ khóa

- Điều kiện: một biểu thức quan hệ hoặc logic

- Câu lệnh: câu lệnh của TP

Ý nghĩa:

B1:Kiểm tra biểu thức điều kiện

B2 :Nếu điều kiện nếu đúng thì thực hiện câu lệnh sau từ khoá DO , quay

lại buớc 1 B3: Nếu điều kiện sai thoát khỏi câu lệnh

Hoạt động thầy và trò Nội dung bài giảng

GV: Gọi một học sinh vẻ sơ đồ khối cảu

lệnh

GV: Xác định bài toán?

HS:Trả lời

GV: Yêu cầu học sinh trình bày thuật

toán bằng sơ đồ khối?

Sơ đồ khối

Ví dụ 1:

Tính và đưa kết quả ra màn hình tổng

ĐK

Câu lệnh

HS:

GV:Yêu cầu học sinh trình bày thuật

toán bằng sơ đồ khối

HS:

1

2

1 1

1 1

















n a a

a

khi a  n

1

<0.0001

Chương trình:

Program Tong;

Uses crt;

Var S:real; a,n:integer;

Begin Clrscr;

Write(‘nhap a=’);Readln(a);

S:=1/a;n:=0;

While not (1/(a+1)<0.00001) do

Begin N:=n+1;

S:=S+1/(a+n);

End;

Writeln(‘tong S la:’,S:8:2);

Readln;

End

Ví dụ 2:

n←n+1

S←S+

n

a 

1

Nhập a

S←1/a n←0

n a

1 <0.0001

Đưa S

Nh p M,N

M =

Sai

Chương trình tìm UCLN của 2 số nguyên dương M và N

Program UCLN;

USES Crt;

Var M, N: Integer;

Begin Clrscr;

Write('Nhap M, N: '); Readln(M, N); While M<>N Do

Begin

If M>N then M:= M- N Else N :=

N -M;

End;

Writeln('Uoc chung lon nhat :' , M); Readln;

End

4.Củng cố:

Câu lệnh While thực hiện nhiều nhất bao nhiêu lệnh? Ít nhất bao nhiêu lệnh?

Nêu ý nghĩa của lệnh While?

5.Dặn dò, bổ sung:

Chuẩn bị bài tiết sau là tiết bài tập thực hành