If <ñieàu kieän> then <caâu leänh>; a) Daïng thieáu. Ñieàu kieän ñuùng Caâu leänh sai.[r]
(1)1 Rẽ nhánh
2 Câu lệnh If - then Câu lệnh ghép
(2)1 Rẽ nhánh
D ng thi uạ ế
(3)2 Câu lệnh If - then
Nếu trời đẹp chơi
If trời đẹp then chơi;
If <điều kiện> then <câu lệnh>; a) Dạng thiếu
(4)Xét đoạn chương trình : Tìm số lớn số a b Write(‘Nhap a: ‘); Readln(a);
Write(‘Nhap b: ‘); Readln(b);
If a > b then Write(‘So lon nhat la:’, a);
If a < b then Write(‘So lon nhat la:’, b);
If a = b then Write(‘Hai so bang nhau’); End
Begin
(5)2 Câu lệnh If - then
Nếu trời đẹp chơi ngược lại nhà
If trời đẹp then chơi else nhà;
If <điều kiện> then <câu lệnh1> else <câu lệnh 2>; b) Dạng đủ
Điều kiện Câu lệnh sai
(6)Cách khác : Tìm số lớn số a b Write(‘Nhap a: ‘); Readln(a);
Write(‘Nhap b: ‘); Readln(b);
If a > b then Write(‘So lon nhat la:’, a)
Else
If a < b then Write(‘So lon nhat la:’, b)
(7)Write(‘Nhap a, b, c : ‘); Readln(a,b,c);
If denta > then
x := -b / (2*a);
Write (‘Ph ng trình co nghiem x=‘, x:6:2); ươ
If denta < then Write(‘PT vo nghiem’); End
Begin
Denta:= sqr(b) - 4*a*c;
x1:=(-b + sqrt(denta)) / (2*a); x2:=(-b - sqrt(denta)) / (2*a);
Write(‘PT co nghiem x1= ’, x1:6:2, ’x2= ‘, x2:6:2);
If denta = then
Begin Begin
(8)3 Câu lệnh ghép
begin
<các câu lệnh>
end;
If denta > then
x1:=(-b + sqrt(denta)) / (2*a); Begin
(9)Ghi nhớ:
* Trước else khơng có dấu ;
* If <điều kiện> then begin
câu lệnh 1;
câu lệnh n;
end;
* If <Điều kiện> then <câu lệnh>;
(10)4 Một số ví dụ
* Xem trước ví dụ sgk trang 41
* Giải biện luận pt: ax+b = 0, v i a, b nh p t bàn phímớ ậ ừ
Nếu a<>0
x = -b/a