cau lenh while- do

Néi dung: Néi dung: I. I. CÊu tróc lÖnh While do CÊu tróc lÖnh While do 1. Chøc n¨ng 1. Chøc n¨ng 2. Có ph¸p lÖnh 2. Có ph¸p lÖnh 3. VD ¸p dông 3. VD ¸p dông Tho¸t VD: In ra mµn h×nh 5 lÇn dßng ch÷ “Lop 8A”. VD: In ra mµn h×nh 5 lÇn dßng ch÷ “Lop 8A”. Gi¶i: Gi¶i: Program IN; Program IN; uses CRT; uses CRT; Begin Writeln(‘Lop 8A’); Begin Writeln(‘Lop 8A’); Writeln(‘Lop 8A’); Writeln(‘Lop 8A’); Writeln(‘Lop 8A’); Writeln(‘Lop 8A’); Writeln(‘Lop 8A’); Writeln(‘Lop 8A’); Writeln(‘Lop 8A’); Writeln(‘Lop 8A’); End. End. RÊt mÊt thêi gian, nÕu lµ 100 lÇn th× sao nhØ? Trêi ¬i! I. I. Cấu trúc lệnh Cấu trúc lệnh 1. 1. Chức năng Chức năng - Thực hiện một hay một nhóm các lệnh nào đó cho đến - Thực hiện một hay một nhóm các lệnh nào đó cho đến khi thoả mãn một điều kiện định trước. khi thoả mãn một điều kiện định trước. *) Chú ý: Chính vì việc không dự đoán được trước vòng *) Chú ý: Chính vì việc không dự đoán được trước vòng lặp sẽ chạy đến thứ bao nhiêu thì dừng người ta xếp lặp sẽ chạy đến thứ bao nhiêu thì dừng người ta xếp vòng lặp này thuộc loại lặp không xác định. vòng lặp này thuộc loại lặp không xác định. Ví dụ giải thích 2. 2. Cú pháp lệnh Cú pháp lệnh WHILE <BTLG> DO <lệnh> WHILE <BTLG> DO <lệnh> a) a) Giải thích câu lệnh Giải thích câu lệnh - WHILE, DO là từ khoá có nghĩa tương ứng là trong WHILE, DO là từ khoá có nghĩa tương ứng là trong khi, còn làm. khi, còn làm. - BTLG là biểu thức logíc nó có giá trị đúng hoặc sai. BTLG là biểu thức logíc nó có giá trị đúng hoặc sai. - Lệnh là các câu lệnh mà pascal chấp nhận nó có thể Lệnh là các câu lệnh mà pascal chấp nhận nó có thể là câu lệnh đơn hoặc câu lệnh ghép. là câu lệnh đơn hoặc câu lệnh ghép. *) Chú ý: Nếu là câu lệnh ghép thì đặt giữa *) Chú ý: Nếu là câu lệnh ghép thì đặt giữa BEGIN .END BEGIN .END VD) Ta có 1 đoạn chương trình: While i<= n do Begin tong:= tong + 1/i; i:= i + 1; End; Câu hỏi: Các em hãy xác định từ khoá, BTLG, lệnh trong đoạn chương trình này. b) b) L­u ®å có ph¸p L­u ®å có ph¸p BTLG LÖnh §óng Sai KÕt thóc lÖnh - Các bước thực hiện: - Các bước thực hiện: B1 : Kiểm tra <BTLG> biểu thức logíc B1 : Kiểm tra <BTLG> biểu thức logíc +) Nếu <BTLG> đúng chuyển sang bước 2. +) Nếu <BTLG> đúng chuyển sang bước 2. +) Nếu <BTLG> sai thì kết thúc lệnh. +) Nếu <BTLG> sai thì kết thúc lệnh. B2 : Thực hiện một hoặc một nhóm lệnh mà pascal cho B2 : Thực hiện một hoặc một nhóm lệnh mà pascal cho phép và quay trở lại B1. phép và quay trở lại B1. *) Chú ý: Nếu <BTLG> mà sai thì lệnh WHILE DO sẽ *) Chú ý: Nếu <BTLG> mà sai thì lệnh WHILE DO sẽ không thực hiện vòng lặp nào. không thực hiện vòng lặp nào. - - Hoạt động Hoạt động : : Câu lệnh WHILE DO điều khiển máy tính lặp đi lặp lại chu kì Câu lệnh WHILE DO điều khiển máy tính lặp đi lặp lại chu kì sau: chừng nào < BTLG> có giá trụ đúng thì máy còn thực sau: chừng nào < BTLG> có giá trụ đúng thì máy còn thực hiện một hay một khối lệnh được chỉ ra sau DO. hiện một hay một khối lệnh được chỉ ra sau DO. - VD: Lấy lại ví dụ đầu VD: Lấy lại ví dụ đầu Giải: Giải: Program IN; Program IN; uses CRT; uses CRT; var i: Byte; var i: Byte; BEGIN Clrscr; BEGIN Clrscr; i:=1; i:=1; While i<=10 do While i<=10 do Begin Writeln(Lop 8A); i:=i+1; End; Begin Writeln(Lop 8A); i:=i+1; End; Readln; Readln; END. END. Câu hỏi: Hãy giải thích chư ơng trình này trên lưu đồ 3. 3. VD áp dụng VD áp dụng Bài toán Bài toán : : Viết chương trình tìm ước chung lớn nhất của 2 số a,b(a,b là số Viết chương trình tìm ước chung lớn nhất của 2 số a,b(a,b là số nguyên dương). nguyên dương). Giải: Giải: Đầu vào: a,b (kiểu Word) Đầu vào: a,b (kiểu Word) Đầu ra: UCLN (kiểu Word) Đầu ra: UCLN (kiểu Word) Thuật giải: Thuật giải: - Nếu a = b thì UCLN(a,b) = a Nếu a = b thì UCLN(a,b) = a - Nếu a>b thì UCLN(a,b) = UCLN(a-b,a) Nếu a>b thì UCLN(a,b) = UCLN(a-b,a) - Nếu a<b thì UCLN(a,b) = UCLN(b-a,b) Nếu a<b thì UCLN(a,b) = UCLN(b-a,b) • Ch­¬ng tr×nh Ch­¬ng tr×nh : : Program UCLN; Program UCLN; uses CRT; uses CRT; var a,b, UCLN: Word; var a,b, UCLN: Word; BEGIN clrscr; BEGIN clrscr; Writeln(‘nhap vao so nguyen duong a:’); Readln(a); Writeln(‘nhap vao so nguyen duong a:’); Readln(a); Writeln(‘nhap vao so nguyen duong b:’); Readln(b); Writeln(‘nhap vao so nguyen duong b:’); Readln(b); While a<>b do While a<>b do Begin Begin IF a>b then a:= a-b IF a>b then a:= a-b else b:= b-a; else b:= b-a; UCLN:=a ; UCLN:=a ; End; End; writeln( ‘UCLN cua chung la:’,UCLN) writeln( ‘UCLN cua chung la:’,UCLN) Readln ; Readln ; END. END. Tho¸t [...]... lệnh - Việc tôi muốn mua bộ quần áo đẹp và rẻ là điều kiện định trước - Tôi vào mấy cửa hàng rồi mới mua được tôi không thể biết trước được Vậy việc tôi đi chợ cũng có chức năng giống như câu lệnh While do Bài tập về nhà Bài 1,2 (SGK 56) Bài tập: Viết chương trình tính tổng của dãy số nguyên được nhập vào từ bàn phím Gợi ý: - Đầu vào: 1 dãy số n (kiểu Interger) - Đầu ra: Tổng của dãy (T có kiểu Interger) . lệnh WHILE <BTLG> DO <lệnh> WHILE <BTLG> DO <lệnh> a) a) Giải thích câu lệnh Giải thích câu lệnh - WHILE, DO là từ khoá có nghĩa. Néi dung: Néi dung: I. I. CÊu tróc lÖnh While do CÊu tróc lÖnh While do 1. Chøc n¨ng 1. Chøc n¨ng 2. Có ph¸p lÖnh 2. Có ph¸p lÖnh 3.