vau truc re nhanh

THPT TRƯƠNG ĐỊNH THPT TRƯƠNG ĐỊNH GV : Huỳnh Tiên Hiếu GV : Huỳnh Tiên Hiếu Bài toán Kết thúc 7/9/13 Lưu đồ L u tqư đồ Cú pháp Ch ng trìnhươ Bài t p ADậ Dạng đặc biệt Bài t p VNậ Bài toán Giáo viên : Huỳnh Tiên Hiếu THPT TRƯƠNG ĐỊNH THPT TRƯƠNG ĐỊNH GV : Huỳnh Tiên Hiếu GV : Huỳnh Tiên Hiếu Bài toán Kết thúc 7/9/13 Lưu đồ L u tqư đồ Cú pháp Ch ng trìnhươ Bài t p ADậ Dạng đặc biệt Bài t p VNậ Bài toán I. Bài toán : Cho 2 số a,b. Hãy cho biết số lớn nhất. (khơng cần xét trường hợp a=b) Ý tưởng giải thuật : a b a lớn nhất b b lớn nhất Phát biểu : Nếu a lớn hơn b thì a lớn nhất ngược lại b lớn nhất a THPT TRƯƠNG ĐỊNH THPT TRƯƠNG ĐỊNH GV : Huỳnh Tiên Hiếu GV : Huỳnh Tiên Hiếu Bài toán Kết thúc 7/9/13 Lưu đồ L u tqư đồ Cú pháp Ch ng trìnhươ Bài t p ADậ Dạng đặc biệt Bài t p VNậ II. Lưu đồ: Begin Nhập a,b a > b Thơng báo a lớn nhất Thơng báo b lớn nhất Lưu đồ End THPT TRƯƠNG ĐỊNH THPT TRƯƠNG ĐỊNH GV : Huỳnh Tiên Hiếu GV : Huỳnh Tiên Hiếu Bài toán Kết thúc 7/9/13 Lưu đồ L u tqư đồ Cú pháp Ch ng trìnhươ Bài t p ADậ Dạng đặc biệt Bài t p VNậ III. Lưu đồ tổng quát: ĐK Cơng việc 1 Cơng việc 2 Phát biểu : Nếu ĐK đúng thì thực hiện Cơng Việc 1 Ngượclại thực hiện cơng việc 2 L u tqư đồ THPT TRƯƠNG ĐỊNH THPT TRƯƠNG ĐỊNH GV : Huỳnh Tiên Hiếu GV : Huỳnh Tiên Hiếu Bài toán Kết thúc 7/9/13 Lưu đồ L u tqư đồ Cú pháp Ch ng trìnhươ Bài t p ADậ Dạng đặc biệt Bài t p VNậ IV. Cú pháp : Nếu ĐK đúng thì thực hiện Cơng Việc 1 Ngượclại thực hiện cơng việc 2 IF ĐK THEN Cơng việc 1 ELSE Cơng việc 2 Cú pháp THPT TRƯƠNG ĐỊNH THPT TRƯƠNG ĐỊNH GV : Huỳnh Tiên Hiếu GV : Huỳnh Tiên Hiếu Bài toán Kết thúc 7/9/13 Lưu đồ L u tqư đồ Cú pháp Ch ng trìnhươ Bài t p ADậ Dạng đặc biệt Bài t p VNậ IV. Cú pháp : IF ĐK THEN Cơng việc 1 ELSE Cơng việc 2 TỪ KHĨA : IF , THEN , ELSE ĐK : là biểu thức kiểu Boolean (trả lại giá trị True hoặc False) CƠNG VIỆC : là một hoặc nhiều lệnh của Pascal - Nếu cơng việc từ 2 lệnh trở lên thì các lệnh phải được đặt trong Begin End Lưu ý quan trọng : trước ELSE khơng có dấu chấm phẩy (;) Cú pháp THPT TRƯƠNG ĐỊNH THPT TRƯƠNG ĐỊNH GV : Huỳnh Tiên Hiếu GV : Huỳnh Tiên Hiếu Bài toán Kết thúc 7/9/13 Lưu đồ L u tqư đồ Cú pháp Ch ng trìnhươ Bài t p ADậ Dạng đặc biệt Bài t p VNậ V. Chương trình : Cho 2 số a,b. Hãy cho biết số lớn nhất. PROGRAM SOLON; VAR a,b:integer; BEGIN Write(‘Nhap 2 so a , b : ‘); Readln(a,b); IF a>b THEN Writeln(‘a la so lon nhat’) ELSE Writeln(‘b la so lon nhat’); Readln; END. PROGRAM SOLON; VAR a,b:integer; BEGIN Write(‘Nhap 2 so a , b : ‘); Readln(a,b); IF a>b THEN Writeln(‘a la so lon nhat’) ELSE Writeln(‘b la so lon nhat’); Readln; END. Ch ng trìnhươ THPT TRƯƠNG ĐỊNH THPT TRƯƠNG ĐỊNH GV : Huỳnh Tiên Hiếu GV : Huỳnh Tiên Hiếu Bài toán Kết thúc 7/9/13 Lưu đồ L u tqư đồ Cú pháp Ch ng trìnhươ Bài t p ADậ Dạng đặc biệt Bài t p VNậ VI. Bài tập áp dụng : Viết chương trình nhập vào 2 số a,b. Tính thương số a/b Begin Nhập a,b b <>0 t:=a/b Thơng báo t Thơng báo Khơng chia được End PROGRAM THUONG; VAR a,b:integer; t:real; BEGIN Write(‘Nhap 2 so a , b : ‘); Readln(a,b); IF b<>0 THEN Begin t:=a/b; Writeln(‘Thuong la : ’,t:10:2); End ELSE Writeln(‘Khơng chia duoc’); Readln; END. Bài t p ADậ THPT TRƯƠNG ĐỊNH THPT TRƯƠNG ĐỊNH GV : Huỳnh Tiên Hiếu GV : Huỳnh Tiên Hiếu Bài toán Kết thúc 7/9/13 Lưu đồ L u tqư đồ Cú pháp Ch ng trìnhươ Bài t p ADậ Dạng đặc biệt Bài t p VNậ VII. Một số dạng đặc biệt: 1. Câu lệnh rẽ nhánh dạng khuyết Trường hợp Cơng việc 2 khơng có thì lệnh có dạng : IF ĐK THEN Cơng việc 2. Câu lệnh rẽ nhánh lồng nhau IF ĐK1 THEN Cơng việc 1 ELSE IF ĐK2 THEN Cơng việc 2 … D ng c bi tạ đặ ệ THPT TRƯƠNG ĐỊNH THPT TRƯƠNG ĐỊNH GV : Huỳnh Tiên Hiếu GV : Huỳnh Tiên Hiếu Bài toán Kết thúc 7/9/13 Lưu đồ L u tqư đồ Cú pháp Ch ng trìnhươ Bài t p ADậ Dạng đặc biệt Bài t p VNậ VII. Một số dạng đặc biệt: VD : Viết chương trình giải phương trình bậc I : ax + b =0 PROGRAM PTB1; VAR a,b:integer; x:real; BEGIN Write(‘Nhap 2 he so a , b : ‘); Readln(a,b); IF a = 0 THEN IF b = 0 THEN Writeln(‘Pt vo so nghiem’) ELSE Writeln(‘Pt vo nghiem’) ELSE Begin x::= -b/a; Writeln(‘Nghiệm x= ’,x:10:2); End; Readln; END. Dạng đặc biệt D ng c bi tạ đặ ệ . BEGIN Write(‘Nhap 2 so a , b : ‘); Readln(a,b); IF a>b THEN Writeln(‘a la so lon nhat’) ELSE Writeln(‘b la so lon nhat’); Readln; END. PROGRAM SOLON; VAR. BEGIN Write(‘Nhap 2 so a , b : ‘); Readln(a,b); IF a>b THEN Writeln(‘a la so lon nhat’) ELSE Writeln(‘b la so lon nhat’); Readln; END. Ch ng trìnhươ THPT