Bài giảng Tin học 8 - Bài 7: Câu lệnh lặp - Trường THCS Nguyễn Trường Tộ

17 trang thungat 31/10/2022 1740

Download

Bạn đang xem tài liệu "Bài giảng Tin học 8 - Bài 7: Câu lệnh lặp - Trường THCS Nguyễn Trường Tộ", để tải tài liệu gốc về máy hãy click vào nút Download ở trên.

File đính kèm:

bai_giang_tin_hoc_8_bai_7_cau_lenh_lap_truong_thcs_nguyen_tr.ppt

Nội dung text: Bài giảng Tin học 8 - Bài 7: Câu lệnh lặp - Trường THCS Nguyễn Trường Tộ

2.Câu lệnh lặp – Một lệnh thay cho nhiều lệnh VD1 : in ra MH 1 chữ HELLO VD2 : in ra MH 4 chữ HELLO Program BT4; Program BT1; Uses crt; Uses crt; Begin Begin Writeln(‘HELLO'); Writeln(‘HELLO'); Writeln('HELLO'); End. Writeln(‘HELLO'); Writeln(‘HELLO'); End. HELLO HELLO HELLO HELLO HELLO
3. Câu lệnh lặp với số lần lặp biết trước a. Cú pháp : FOR := TO DO ; b. Giải thích:  FOR, TO, DO : là các từ khóa của Pascal  Biến đếm : thường có kiểu số nguyên  Giá trị đầu, giá trị cuối : là giá trị số nguyên ( Giá trị cuối > Giá trị đầu)  Câu lệnh : có thể là câu lệnh đơn hoặc câu lệnh ghép
c2. In lên màn hình thứ tự lần lặp Program thutu; Program thutu; Uses crt; Uses crt; Begin Begin Writeln(‘day la lan lap thu:’, 1); Writeln(‘day la lan lap thu:’, 2); For i:=1 to 4 do Writeln(‘day la lan lap thu:’, 3); writeln(‘ day la lan lap thu :’, i); Writeln(‘day la lan lap thu:’, 4); Readln; Readln; End. End. day la lan lap thu : 1 Kết quả khi chạy chương trình day la lan lap thu : 2 day la lan lap thu : 3 day la lan lap thu : 4
Diễn tả thuật toán Chương trình Program tinhtong; B1: Bắt đầu Uses crt; Var S,i : Integer; Begin B2: S:=0; i:=1; B3: Nếu i > 100 thì kết thúc S:=0; For i:=1 to 100 do S:=S +i; B4 : S:= S + i i := i +1 quay lại B3. Writeln('Tong S=',S); Readln; End.
Ví dụ 3: Tính N ! (Tích N số tự nhiên đầu tiên) Hãy xác định: - Giá trị khởi tạo của GT 1! = 1 - Giá trị đầu, cuối của biến đếm i 2! = 1 . 2 -Câu lệnh sẽ được lặp 3! = 1 . 2 . 3  GT:=1; 4! = 1. 2 . 3 . 4  For i:=1 to N do GT = 1  GT:= GT*i; GT = GT . 2 GT = GT . 3 GT = GT . 4