Trường trung học cơ sở đại đức Trường trung học cơ sở đại đức Môn : Tin học Lớp 7 Môn : Tin học Lớp 7 Giáo viên giảng dạy: Giáo viên giảng dạy: ? Cho 1 ví dụ với số lần lặp biết trước? ? Cho 1 ví dụ với số lần lặp biết trước? ? Cho 1 ví dụ với số lần lặp không biết trước? ? Cho 1 ví dụ với số lần lặp không biết trước? 1. Các công việc thực hiện nhiều lần. 1. Các công việc thực hiện nhiều lần. 2. Câu lệnh lặp một lệnh thay cho 2. Câu lệnh lặp một lệnh thay cho nhiều lệnh. nhiều lệnh. 3. Ví dụ về câu lệnh lặp. 3. Ví dụ về câu lệnh lặp. - Cú pháp câu lệnh lặp trong Pascal: For tên biến := giá tri đầu To giá trị cuối Do câu lệnh trong vòng lăp ; - Trong đó: For, To, Do là các từ khoá. Biến là kiểu số nguyên. Sau từ khoá Do không có dấu chấm phẩy. Câu lệnh trong vòng lặp nếu có nhiều hơn 1 lệnh thì đặt trong cặp từ khoá Begin End. 4. Tính tổng và tích bằng câu lệnh lặp - Kiểu dữ liệu số nguyên: Longint có phạm vi lơn hơn so với kiểu Integer. Quan sát ví dụ sau: Quan sát ví dụ sau: For For i:=1 i:=1 To To 10 10 Do Do Writeln Writeln (lan lap thu,i) (lan lap thu,i) ; ; Ví dụ 3: Program lap; Var i: Integer; Begin For i:=1 to 10 do Writeln ( lan lap thu ,i); Readln; End. Ví dụ 4: Uses crt; Var i: Integer; Begin clrscr; For i:=1 to 20 do Begin Writeln ( O ); delay (100); end; Readln; End. Ví dụ 5: Program TinhTong; Var N, i: Integer; S: Longint; Begin Writeln (Nhap so N =); Readln (N); S:= 0; For i:=1 to N do S:= S + i; Write (Tong cua,N,So tu nhien dau tien S,S); Readln; End. Ví dụ 6: Program TinhGiaiThua; Var N, i: Integer; P: Longint; Begin Writeln (Nhap so N =); Readln (N); P:= 1; For i:=1 to N do P:= P*i; Write (N,!=,P); Readln; End. ViÕt ch­¬ng trình tÝnh tæng: S=1+2+3+4+5 ®¸p ¸n Program Tinh_tong; Var i: integer; S: longint; Begin S:=0; For i:= 1 to 5 do S:= S + 1; Writeln (‘Tong cua S = ’,s); Readln; end.  Học bài theo vở ghi và SGK. Học bài theo vở ghi và SGK.  Làm bài tâp 3, 4, 5, 60 trang 60, 61 SGK. Làm bài tâp 3, 4, 5, 60 trang 60, 61 SGK.  Chuẩn bị kiến thức cho bài thực hành Chuẩn bị kiến thức cho bài thực hành s s ố 5 ố 5 . . . Các công việc thực hiện nhiều lần. 2. Câu lệnh lặp một lệnh thay cho 2. Câu lệnh lặp một lệnh thay cho nhiều lệnh. nhiều lệnh. 3. Ví dụ về câu lệnh lặp.