Bài giảng Tin học Lớp 8 - Bài 7: Câu tập lệnh - Hương Thủy

PHÒNG GIÁO DỤC ĐÀO TẠO HƯƠNG THỦYGIÁO ÁN ĐIỆN TỬLỚP 8HƯƠNG THỦY 2010- 2011TRƯỜNG THCS THỦY CHÂU*Kiểm tra bài cũ:? Để in ra màn hình 5 dòng chữ: “THCS Thuy Chau” ta làm như thế nào?Writeln(‘THCS Thuy Chau’);Writeln(‘THCS Thuy Chau’);Writeln(‘THCS Thuy Chau’);Writeln(‘THCS Thuy Chau’);Writeln(‘THCS Thuy Chau’);*1. Ví dụ về câu lệnh lặpa) Cú pháp :FOR biến đếm : = giá trị đầu TO giá trị cuối DO Câu lệnh trong vòng lặp ; Giá trị đầu < Giá trị cuối.BÀI 7: CÂU LỆNH LẶP (t2)Trong đó: Biến đếm phải thuộc kiểu dữ liệu đếm được ( không là số thực ).*Không được làm thay đổi giá trị biến đếmNếu có nhiều hơn một lệnh thì phải đặt trong cặp từ khoá Begin ... end;BÀI 7: CÂU LỆNH LẶP1. Ví dụ về câu lệnh lặpFOR biến đếm : = giá trị đầu TO giá trị cuối DO Câu lệnh trong vòng lặp ;a) Cú pháp :*Chú ý : Sau DO không có dấu chấm phẩy.- Có thể dùng các vòng lặp FOR lồng nhau.BÀI 7: CÂU LỆNH LẶP1. Ví dụ về câu lệnh lặpFOR biến đếm : = giá trị đầu TO giá trị cuối DO Câu lệnh trong vòng lặp ;a) Cú pháp :*b) Hoạt động của câu lệnh : Biến đếm : = Giá trị đầuCâu lệnh trong vòng lặp ;Biến đếm :=Biến đếm + 1;SaiĐúngGiá trị đầu <=Giá trị cuốiBÀI 7: CÂU LỆNH LẶP1. Ví dụ về câu lệnh lặp*c. Ví dụ :Viết câu lệnh để in ra màn hình 5 dòng chữ “ THCS Thuy Chau “.For i : = 1 to 5 do writeln( ‘THCS Thuy Chau’);- Hãy chỉ ra các thành phần trong câu lệnh trên ?i là biến đếm1 là giá trị đầu5 là giá trị cuốiwriteln( ‘THCS Thuy Chau’); là câu lệnhBÀI 7: CÂU LỆNH LẶP1. Ví dụ về câu lệnh lặp*- Hãy sử dụng câu lệnh trên để viết chương trình đầy đủ in ra màn hình 5 chữ “ THCS Thuy Chau “c. Ví dụ :Viết câu lệnh để in ra màn hình 5 dòng “ THCS Thuy Chau “For i : = 1 to 5 do writeln(‘THCS Thuy Chau’);BÀI 7: CÂU LỆNH LẶP1. Ví dụ về câu lệnh lặpLK*2. Tính tổng và tích bằng câu lệnh lặpBÀI 7: CÂU LỆNH LẶPVí dụ 1: Viết chương trình tính tổng của N số tự nhiên đầu tiên, với N là số tự nhiên được nhập vào từ bàn phím?*Program Tinh_tong;Var 	N,i: integer; 	S: longint;Begin Write(‘Nhap so N=‘); Readln(N) 	S:=0; 	For i:=1 to N do S:=S+i;Writeln(‘tong cua N so tu nhien dau tien=‘,S);Readln;End.BÀI 7: CÂU LỆNH LẶPLK*T  0; i0i  i + 1i ≤ nT  T + iKết thúcBước 1: T  0; i  0Bước 2: i  i + 1Bước 3: Nếu i ≤n thì T  T +i và quay lại bước 2Bước 4: Thông báo kết quả và kết thúc.ĐúngSaiMÔ TẢ CHƯƠNG TRÌNH TÍNH TỔNG 5 SỐ TỰ NHIÊN ĐẦU TIÊN*i01i<=nĐúngT01Với n = 5 T  0; i0i  i + 1i ≤ nT  T + iT  0; i0i  0 + 11 ≤ 5T  0 + 1ĐúngKết thúcMÔ TẢ CHƯƠNG TRÌNH TÍNH TỔNG 5 SỐ TỰ NHIÊN ĐẦU TIÊN*T  0; i0i  0 + 11 ≤ 5T  0 + 1i012i<=nĐúngĐúngT013T  0; i0i  1 + 12 ≤ 5T  1 + 2ĐúngVới n = 5 Kết thúcMÔ TẢ CHƯƠNG TRÌNH TÍNH TỔNG 5 SỐ TỰ NHIÊN ĐẦU TIÊN*T  0; i0i  1 + 12 ≤ 5T  1 + 2i0123i<=nĐúngĐúngĐúngT0136T  0; i0i  2 + 13 ≤ 5T  3 + 3ĐúngVới n = 5 Kết thúcMÔ TẢ CHƯƠNG TRÌNH TÍNH TỔNG 5 SỐ TỰ NHIÊN ĐẦU TIÊN*T  0; i0i  3 + 14 ≤ 5T  3 + 3i01234i<=nĐúngĐúngĐúngĐúngT013610T  0; i0i  3 + 14 ≤ 5T  6 + 4ĐúngVới n = 5 Kết thúcMÔ TẢ CHƯƠNG TRÌNH TÍNH TỔNG 5 SỐ TỰ NHIÊN ĐẦU TIÊN*T  0; i0i  3 + 14 ≤ 5T  6 + 4i012345i<=nĐúngĐúngĐúngĐúngĐúngT01361015T  0; i0i  4 + 15 ≤ 5T  10 + 5ĐúngVới n = 5 Kết thúcMÔ TẢ CHƯƠNG TRÌNH TÍNH TỔNG 5 SỐ TỰ NHIÊN ĐẦU TIÊN*SaiKết thúcT  0; i0i  4 + 15 ≤ 5T  10 + 5i0123456i<=nĐúngĐúngĐúngĐúngĐúngSaiT01361015K.thúcT  0; i0i  5 + 16 ≤ 5T  10 + 5Kết thúcVới n = 5 MÔ TẢ CHƯƠNG TRÌNH TÍNH TỔNG 5 SỐ TỰ NHIÊN ĐẦU TIÊN*2. Tính tổng và tích bằng câu lệnh lặpBÀI 7: CÂU LỆNH LẶPVí dụ 2: Ta kí hiệu N! là tích N số tự nhiên đầu tiên: N!=1.2.3...N.-Viết chương trình tính N! Với n là số tự nhiên được nhập từ bàn phím.*BÀI 7: CÂU LỆNH LẶPProgram tinhgiaithua;Var i,n :integer;BeginWrite(‘nhap n=‘); redaln(n);P:=1;For i:=1 to n do p:=p*i;Writeln(n,’!=‘,p);Readln; End.LK*Bài tậpEm hãy viết chương trình tính tổng các số nguyên liên tiếp từ n đến m với n, m là các số nguyên dương được nhập vào từ bàn phím?Gợi ý-Tìm input, output?- Khai báo các biến nào? Kiểu dữ liệu gì? Nhập từ bàn phím giá trị cho biến nào?Tìm thuật toán của chương trình Sử dụng các câu lệnh gì để viết chương trình?*