Hoạt động của giáo viên và học sinh | Nội dung |
Hoạt động 1 : các kiến thức cần nhớ (2’) | |
- GV: Gọi HS nhắc lại cấu trúc lênh lặp với số lần lặp chưa biết trước? - HS trả lời câu hỏi của GV - GV nhận xét và chốt ý - HS theo dõi, tiếp thu và ghi vở - GV: Em hãy mô tả hoạt động của câu lệnh lặp với số lần chưa biết trước? - HS dựa vào cấu trúc câu lệnh lặp và mô tả hoạt động của câu lệnh - GV gọi 1 HS khác nhận xét và bổ sung - 1 HS khác nhận xét - GV nhắc lại một lần nữa - HS lắng nghe và ghi bài vào vở |
While <Điều kiện> Do <câu lệnh> * Hoạt động: Bước 1 : Kiểm tra điều kiện. Bước 2 : Nếu điều kiện SAI, câu lệnh sẽ bị bỏ qua và việc thực hiện lệnh lặp kết thúc. Nếu điều kiện đúng, thực hiện câu lệnh và quay lại bước 1. |
Hoạt động 2 : bài tập 1 (20’) | |
GV: giành thời gian 15 phút để HS lập trình bài toán đã làm Bài 1 HS : đọc đề GV :? Nêu cách giải? HS : nêu phương án GV :?Cần nhân 1 số với các số từ 1 đền 10. Gọi số đó là số N ta sẽ sử dụng vòng lặp xác định từ giá trị đầu đến giá trị cuối là bao nhiêu? HS : từ 1 đến 10 GV :? yêu cầu mở rộng: in ra tất cả bảng cửu chương từ 1 đến 10? HS : nêu phương án GV :? giá trị N lúc này có phải nhập nữa không? HS : không GV :?Giá trị N chạy từ bao nhiêu đến bao nhiêu? HS : từ 1 đến 10 GV : =>Vậy ta cần một vòng lặp N từ 1 đến 10 GV: yêu cầu HS làm thành hai bài khác nhau HS : lập trình và chạy chương trình GV : ? Quan sát kết quả nhận được? Kết quả có dễ dàng quan sát không? HS : sửa theo hướng dẫn của GV. GV :? Thực hiện bài 2 GV :? Để kết quả trông dễ nhìn ta sử dụng Câu lệnh GotoXY(a, b) có tác dụng đưa con trỏ về cột a, hàng b. WhereX cho biết số thứ tự của cột và WhereY cho biết số thứ tự của hàng đang có con trỏ. Ví dụ GotoXY(5,WhereY) đưa con trỏ về vị trí cột 5 của hàng hiện tại. HS : Dịch và chạy chương trình GV: Giúp HS sửa một số lỗi. |
Bài 1( SGK) uses crt; var N,i:integer; begin clrscr; write('Nhap so N='); readln(N); writeln; writeln('Bang nhan ',N); writeln; for i:=1 to 10 do writeln(N,' x ',i:2,' = ',N*i:3); readln end. In toàn bộ bảng cửu chương uses crt; var N,i:integer; begin clrscr; writeln('Bang nhan ',N); writeln; for N:=1 to 10 do for i:=1 to 10 do writeln(N,' x ',i:2,' = ',N*i:3); readln end. Chỉnh sửa câu lệnh lặp của chương trình như sau: for i:=1 to 10 do begin GotoXY(5,WhereY); writeln(N,' x ',i:2,' = ',N*i:3); writeln end; |
Hoạt động 2 : bài tập 2 (17‘) | |
- Tương tự như bài 1, GV cho HS gõ bài làm của mình ở nhà vào máy. - HS thực hiện theo yêu cầu của GV. - GV quan sát trên máy HS và chữa lại chỗ sai. - HS quan sát và theo dõi - GV cho HS chữa bài vào vở - HS ghi bài vào vở |
Bài 2: Viết chương trình tìm xem có bao nhiêu số dương trong n số nhập vào từ bàn phím? Program tinh_so_cac_so_duong; Uses crt; Var i,A, dem, n: integer; Begin Clrscr; Dem:=0; Writeln(‘Nhap vao so n’); readln(n); For i:=1 to n do 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 3 : củng cố (2’) | |
- GV nhận xét, rút kinh nghiệm giờ thực hành. - Ôn lại tất cả các kiến thức đã học về các câu lệnh lặp. |
Ý kiến bạn đọc
Những tin cũ hơn