Bµi 10 Gi¸o ¸n ®iÖn tö tin häc líp 11 Gv: Nguyễn Dư Tấn Trường THPT Chu Văn An - Quảng Trị http://violet.vn\gvnguyendutan 1. Bài toán: Dữ liệu ra (Output) : Tổng S v giỏ tr i ? Dữ liệu vào (Input) : khụng cú Cho đến khi S Va ln hn 100 Tính giá trị tổng S, v tỡm giỏ tr I II. Lặp với số lần lặp CHƯA biết trước- lệnh While _Do S= 1 + 2 + 3 +4 + + i S= 1 2 S =1 + S =3 3 + S =6 4 + S =10 5 + S =15 6 + S =21 7 + 8 + S =28 9 + S =36 10 + S =45 11 + S =55 12 + S =66 13 + S =78 14 + S =91S =105 15 16 17 … i S = 1 + 2 + 3 + 4 + 5 +………+ i , S vừa đủ lớn hơn 100 S= ?, i = ? Mô phong Sơ đồ S := 0 ; i := 1; S<=100 S := S + i ; i := i +1; S := 0 ; i := 1; S<=100 Đ Đ S := 0 +1 ; i := 1 +1; S =1 ĐĐ Đ I =2 In Tæng STæng S=105 s S S<=100 S := 1 +2 ; i := 2 +1; S =3 I =3 S<=100 S := 3 +3 ; i := 3 +1; S =6 I =4 S<=100 S := 6 + 4 ; i := 4 +1; S =10 I =5 S<=100 S := 10 +5 ; i := 5 +1; S =15 I =6 S<=100 S := 78 +13 ; i := 13 +1; S =91 I =13 S<=100 S := 91 +14 ; i := 13 +1; S =105 I =14 S=105=<100 I =14 KT S=1+2+3+4+5 +……… i , S vừa đủ lớn hơn 100 S= ?, i = ? i 1 2 3 4 5 6 7 8 9 10 11 12 13 14 s 1 3 6 10 15 21 28 36 45 55 66 78 91 105 KT Cấutrúc lệnh WhileWHILE <Điều kiện> DO <Câu lệnh> ; Điều kiện Đúng Câu lệnh While,Do L t khoỏ Điều kiện: Là biểu thức lôgic. Câu lệnh: Là một câu lệnh của Pascal. Sa i 3. Lặp với số lần lặp chưa biết trước Trong đó: Chừng nào điều kiện còn đúng thì câu lệnh còn được thực hiện. ?: + Công việc lặp lại là gì? + Điều kiện gì để lặp lại ? 4. Một số ví dụ a Bài toán1: Nhận xét: Chừng nào S<=100 thì còn thực hiện: + Cộng vào tổng S thêm giá i . + Tăng i thêm 1 đơn vị. iS +++= 3.21 Tính giá trị tổng S, và tìm giá tri i để Cho đến khi S vừa đủ lớn hơn 100 Mophong Bước 1: S:=0; i:=1; {Khởi tạo S và i} Bước 2: Nếu S >100 thỡ chuyn sang Bước 4 Bước 3: S:=S+i); i:=i+1; => quay lại bước 3 thuật toán S:=0 ; i:=1 Đưa ra S,i => Kết thúc S:= S+i; i:= i+1; Vòng lặp chỉ dừng khi S va ln hn 100 S Đ S < =100 Bước 4: a ra S v i => Kết thúc. Ch¬ng tr×nh Program Bai_toan; Uses Crt; Var S, i : Integer; BEGIN Clrscr; S:=0;i:=1; WHILE S=< 100 DO BEGIN S:=S+ i; i:=i+1; END; Writeln(‘Gia tri cua tong S = ‘,S,’ Den gia tri’,i); Readln; END. Chạy ba • Bài tập về nhà: 1) Hãy lập chương trình tính: S= 1+2+3+……. +100 ( Dùng câu lệnh While Do) 2) Hãy Lập chương trình tìm UCLN của hai số nguyên dương m ,n : . 28 36 45 55 66 78 91 105 KT Cấu trúc lệnh While WHILE <Điều kiện> DO <Câu lệnh> ; Điều kiện Đúng Câu lệnh While, Do L t khoỏ Điều kiện: Là biểu. ln hn 100 Tính giá trị tổng S, v tỡm giỏ tr I II. Lặp với số lần lặp CHƯA biết trước- lệnh While _Do S= 1 + 2 + 3 +4 + + i S= 1 2 S =1 + S =3 3 + S