BÀI 5: C U TRÚC R NHÁNH
1. L nh IF .. THEN ..
* Cú pháp:
IF <Đi u ki n>THEN<ng vi c>;
* Ý nghĩa:
- N u đi u ki n này đúng ty s th c hi n công vi c r i ti p t c th c hi nế ế
l nh ti p theo ế
- N u đi u ki n sai máy s b qua công vi c và th c hi n l nh ti p theo.ế ế
*L u đ di n t l nh:ư
2. L nh IF .. THEN .. ELSE..
* L u đ di n t l nh và ý nghĩa cách vi t: ư ế
* Cú pháp:
IF <Đi u ki n>THEN<Công vi c 1> ELSE<Công vi c 2>;
* Ý nghĩa:
- N u đi u ki n này đúng, y th c hi n ng vi c 1(không th c hi n côngế
vi c 2) r i đ n l nh ti p theo. ế ế
- N u đi u ki n sai máy th c hi n công vi c 2 (không th c hi n công vi c 1) r iế
đ n l nh ti p theo.ế ế
* L u đ di n t l nh:ư
1
Chú ý:
- Ði u ki n là m t bi u th c logic
- N u <Công vi c>sau THEN ho c ELSE nhi u h n m t l nh thì taế ơ
ph i gói l i trong BEGIN .. END;
- Tn b l nh IF .. THEN .. ELSE xem nh 1 l nh đ n. ư ơ
d : Vi t ch ng trình nh căn b c hai c a s a v i a nh p t bàn pm. ế ươ
PROGRAM Tinh_can_bac_hai ;
VAR a : Real ;
BEGIN
Write (’ Nhap so a = ‘ ) ;
Readln(a) ;
IF a < 0 THEN
Write ( a : 10 : 2 ,’ La so am nen khong lay can duoc ')
ELSE
Writeln (’ Can bac hai cua ’, a : 2 : 2 ,’ la’ , SQRT(a) :10 : 3 );
Readln; {dung man hinh de xem ket qua}
END.
Ghi chú
Trong ch ng trình trên, a ta th yd ng a :m :n v i ý nghĩa m là s đ nh kho ng ươ
ph n nguyên c a a s chi m ch nkho ng cho s tr ph n th p phân c a a ế
2