- Đọc trớc bài 2
5.
Dặn dũ:
Tiết 52
Bài THỰC HÀNH số 6: Sử dụng lệnh lặp While...do I. MỤC ĐÍCH:
- Hiểu câu lệnh lặp while...do trong chơng trình TP có sẵn
- Biết lựa chọn câu lệnh lặp while...do hoặc for...do phù hợp với tình huống cụ thể. - Rèn luyện kĩ năng về khai báo, sử dụng biến
- Rèn luyện khả năng đọc chơng trình
- Biết vai trò của việc kết hợp các cấu trúc điều khiển.
II. CHUẨN BỊ:
- Sỏch, hỡnh ảnh giỏo ỏn. - Phũng mỏy vi tớnh.
III. TIẾN TRèNH DẠY – HỌC:1. ổn định lớp: 1. ổn định lớp:
2. Kiểm tra bài cũ:3. Nội dung bài mới: 3. Nội dung bài mới:
Hoạt động của GV – HS Nội dung
GV yêu cầu HS làm bài tập 2:
Tìm hiểu chơng trình nhận biết một số tự nhiên N đợc nhập vào từ bàn phím có phải là số nguyên tố hay không.
GV: Hớng dẫn:
ý tởng: Kiểm tra lần lợt N có chia hết cho các số tự nhiên 2 ≤i ≤N hay không. Kiểm tra tính chia hết bằng phép chia lấy phần d (mod).
a) Đọc và tìm hiểu ý nghĩa của từng câu lệnh trong chơng trình sau đây:
b) Gõ, dịch và chạy thử chơng trình với một vài độ chính xác khác nhau.
HS thực hiện trên máy tính:
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) do i:=i+1; if i=n then writeln(n,' la so nguyen
GV: Nêu các lỗi cần chú ý nếu có của HS trong lúc thực hành.
GV: NHắc lại nhunwngx điều cần chú ý: Câu lệnh lặp while do… có dạng
while <điều kiện> do <câu lệnh>;
Câu lệnh này đợc thực hiện nh sau: +) Kiểm tra điều kiện.
+) Nếu điều kiện SAI, câu lệnh sẽ bị bỏ qua và chuyển sang câu lệnh tiếp theo trong ch- ơng trình. Nếu điều kiện đúNG, thực hiện
câu lệnh và quay lại bớc 1.
else writeln(n,' khong phai la so nguyen to!');
end; readln
end.
4. Củng cố: