Hoạt động dạy học | Nội dung |
- GV gọi lần lượt HS giải đáp các bài tập trong SGK. - GV chiếu máy. - GV gợi ý cho HS. - HS hoạt động nhóm thảo luận nêu thuật toán của bài tập trên. - HS các nhóm đại diện trả lời. - Các nhóm khác nhận xét. - GV nhận xét và chiếu máy đưa ra các bước của thuật toán để giải quyết vấn đề trên. - GV gợi ý cho HS khai báo 1 biến để đưa vào làm biến đếm cho vòng lặp For và để in ra kết quả. - HS viết chương trình ở bảng nhóm. - GV gọi các nhóm giải thích các câu lệnh sử dụng trong chương trình. - GV nhận xét và chiếu máy đưa ra đáp án đúng và giải thích các câu lệnh cho HS. - GV chiếu máy. - HS sử dụng phiếu học tập tìm INPUT và OUTPUT của bài tập trên. - GV gọi HS trả lời. - GV nhận xét và đưa ra đáp án đúng. - HS hoạt động nhóm thảo luận nêu thuật toán của bài tập trên. - HS các nhóm đại diện trả lời. - Các nhóm khác nhận xét. - GV nhận xét. - GV gợi ý cho HS khai báo biến để đưa vào làm biến đếm cho vòng lặp For và để in ra kết quả và sử dụng câu lệnh If…then và phép chia lấy phần dư MOD để viết chương trình. - HS viết chương trình ở bảng nhóm. - GV gọi các nhóm giải thích các câu lệnh sử dụng trong chương trình. - Các nhóm lần lượt nhận xét. - GV nhận xét các nhóm và chiếu máy đưa ra đáp án đúng và giải thích các câu lệnh trong chương trình cho HS hiểu. |
bài tập 1: Viết chương trình in ra màn hình các số tự nhiên từ 1 đến 100. Chương trình: Program SoTN; Uses crt; Var i:integer; Begin CLRSCR; For i:= 1 to 100 do Write (i:4); Readln; End. bài tập 2: Viết chương trình in ra màn hình các số chia hết cho 6 từ 1 đến 100. Chương trình: Program Chiahetcho5; Uses crt; Var i:integer; Begin CLRSCR; For i:= 1 to 100 do If i mod 6 = 0 Then Write (i:4); Readln; End. bài tập 3: Viết chương trình in ra màn hình các số lẻ từ 1 đến 200. Chương trình: Program Sole; Uses crt; Var i:integer; Begin CLRSCR; For i:= 1 to 100 do Write (i*2-1:4); Readln; End. bài tập 4: Viết chương trình in ra màn hình các số chẵn từ 1 đến 200. Chương trình: Program Sole; Uses crt; Var i:integer; Begin CLRSCR; For i:= 1 to 100 do Write (i*2:4); Readln; End. |
Ý kiến bạn đọc
Những tin cũ hơn