Lặp với số lần biết trước và sử dụng câu lệnh for – do để giải bài toán... • Việc tăng giá trị cho tổng S được lặp đi lặp lại cho đến khi.[r]
(1)Bài cũ: Câu 1:Nêu cấu trúc câu lệnh for – dạng tiến và dạng lùi? Câu 2: Liệt kê các câu lệnh (trong phần thân chương trình) TP đã học? (2) Đáp án: Câu 1:Cấu trúc câu lệnh for – a.dạng tiến : For <bd>:= <gtd> to <gtc> <cl>; b.dạng lùi: For <bd>:= <gtc> downto <gt> <cl>; (3) Đáp án: Câu 2:Các câu lệnh phần thân chương trình TP đã học: Câu lệnh đọc DL vào từ bàn phím: read/readln(ds biến vào); Câu lệnh viết thông tin màn hình: write/writeln(ds kq ra); Câu lệnh gán: <tên biến>:= <biểu thức>; Câu lệnh rẽ nhánh:if – then ; +dạng khuyết: +dạng đủ: if <đk> then <cl>; if <đk> then <cl1> else <cl2>; Câu lệnh lặp với số lần biết trước for – : +Dạng tiến: for <bd>:= <gtd> to <gtc> <cl>; +Dạng lùi: For <bd>:= <gtc> downto <gt> <cl>; (4) Bài 10 Giáo án tin học 11 (5) Bài 10: Cấu trúc lặp (t3) (6) Bài 10: Cấu trúc lặp Xét bài toán tính tổng s, với a>2, nguyên Bài toán 1: 1 1 S a a 1 a a 100 Bài toán 2: 1 1 S a a 1 a aN Cho tới 0.0001 aN (7) Xây dựng thuật toán Xuất phát Lần Lần Lần N 1 S a a 1 a +… aN Mỗi lần thực trị tổng S thêm tăng thêm Sau lần thực giá giá trị tổng S tăng bao ( vớinhiêu? i =1; 2; ; ;N) a+i (8) TÌM SỰ KHÁC BIỆT Bài toán 1 1 S a a 1 a a 100 Bài toán 1 1 S a a 1 a aN Cho tới • Việc tăng giá trị cho tổng S lặp lặp lại 100 lần Lặp với số lần biết trước và sử dụng câu lệnh for – để giải bài toán 0.0001 aN • Việc tăng giá trị cho tổng S lặp lặp lại 0.0001 aN Lặp với số lần chưa biết trước (9) II Lặp với số lần chưa biết trước và câu lệnh While – 1.Lặp với số lần chưa biết trước Bài toán 2:Tính giá trị tổng S, với a là số nguyên và a>2 1 1 S a a 1 a aN Cho tới 0.0001 aN Dữ liệu vào (Input) : Nhập a Hãy xác định INPUT, OUTPUT và nêu Dữ liệu thuật (Output) : Tổng S toán giải bài toán trên? (10) Thuật toán Bước 1: Nhập a Bước 2: S:=1/a; N:=1; {Khởi tạo S và N} Nhập a S:=1/a ; N:=1; Bước3: Nếu 1/(a+N) < 0.0001 sang Bước Bước 4: S:=S+1/(a+N); N:=N+1; => quay lại bước S 1/(a+N) >= 0.0001 đ S:= S+1/(a+N); N:= N+1; Bước 5: In S => Kết thúc Vòng lặp dừng khi: 1/(a+N)<0.0001 Đưa s, kết thúc (11) 2.Câu lệnh While – Cấu trúc: WHILE <điều kiện> DO <Câu lệnh>; While Trong đó: Điều kiện :Là biểu thức quan hệ logic Câu lệnh: Là câu lệnh Pascal Sai Điều kiện đúng Cách thực hiện: Câu lệnh Nếu điều kiện đúng thì thực câu lệnh, sau đó quay lại kiểm tra điều kiện, đến điều kiện sai thì kết thúc vòng lặp Chừng nào điều kiện còn đúng thì câu lệnh còn thực Thoát (12) Một số ví dụ: a Vd1:Bài toán 2: Tính giá trị tổng s, với a>2 nguyên 1 1 S a a 1 a aN Cho tới 0.0001 Thì dừng lại aN Nhận xét: Chừng nào 1/(a+N)>=0.0001 thì thực hiện: + Tính giá trị tổng S thêm 1/(a+N) Em hãy viết câu lệnh While – để mô tả xét >= này? Whilenhận 1/(a+N) 0.0001 Do Begin + Tăng N lên đơn vị S:=S+1/(a+N); N:=N+1; End; (13) Một số ví dụ: a Vd1: Chương trình Program tong2; Uses crt; Var : integer ; ; Var a,N:Integer … : real; Em hãy hoàn thành S:Real; chương trình tính tổng S,BEGIN bài toán theoclrscr; dàn ý sau: Nhập vàogia a tri cua a= ‘);Readln(a); Write(‘Nhap S:=1.0/a;N:=1; S:= .; N:=….; {khởi tạo S,N} WHILE <điều kiện> DO WHILE 1/(a+N)>=0.0001 DO BEGIN S:=S+…… ; S:=S+1/(a+N); N:=N+…… ; END;N:=N+1; Writeln(‘Gia tri S cua tong S = ‘,S:8:3); Viết tổng Readln; END (14) b Vd2:Lập chương trình nhập vào hai số nguyên dương M,N Tìm ƯCLN hai số đó Thuật toán B1: Nhập M,N; B2 : Chừng nào MN M>N thì M:=M-N, ngược lại thì N:=N-M; B3: đến M=N thì => đưa ¦CLN(M,N)=M; Các bước viết chương trình B1: Nhập M,N B2 : While M<>N DO IF M>N then M:=M-N else N:=N-M; B3: In ¦CLN(M,N) => Kết thúc Về nhà hoàn thành chương trình (15) Hãy nhớ! Câu lệnh rẽ nhánh IF <đk> THEN <câu lệnh>; + Dạng khuyết IF <đk> THEN <câu lệnh 1> + Dạng đủ ESLE <câu lệnh 2>; FOR TO DO … FOR Downto DO While <đk> Do <câu lệnh>; Câu lệnh lặp + Lặp với số lần lặp biết trước + Lặp với số lần lặp chưa biết trước (16) BÀI TẬP VỀ NHÀ 1.Làm các bài tập: 3,5b,7,8 sgk trang 51 Chuẩn bị tiết sau làm bài tập (17) Thực tháng 10 năm 2011 (18)