THCS Kim Ngoc
Phạm Văn Thắng
1
THCS Kim Ngoc
2Phm Vn Thng
I. Bài mới:
I. Bài mới:
1.
1.
Lý thuyết
Lý thuyết
:
:
Câu lệnh If .. Then
Câu lệnh If .. Then
Ngôn ngữ lập trình
Ngôn ngữ lập trình
Pascal dùng câu lệnh rẽ
Pascal dùng câu lệnh rẽ
nhánh If ..Then để mô tả việc rẽ nhánh tương
nhánh If ..Then để mô tả việc rẽ nhánh tương
ứng với 2 loại mệnh đề rẽ nhánh như sau.
ứng với 2 loại mệnh đề rẽ nhánh như sau.
THCS Kim Ngoc
3Phm Vn Thng
a- Cú pháp 1
a- Cú pháp 1
:
:
( Hay còn gọi là dạng thiếu)
( Hay còn gọi là dạng thiếu)
If < Điều kiện> Then <Câu lệnh>;
If < Điều kiện> Then <Câu lệnh>;
+ Trong đó
+ Trong đó
:
:
*
*
Điều kiện:
Điều kiện:
Là biểu thức quan hệ hoặc logic
Là biểu thức quan hệ hoặc logic
* Câu lệnh:
* Câu lệnh:
Là 1 câu lệnh của Pascal
Là 1 câu lệnh của Pascal
ý nghĩa của câu lệnh:
ý nghĩa của câu lệnh:
Chương trình kiểm tra giá trị của điều kiện. Nếu
Chương trình kiểm tra giá trị của điều kiện. Nếu
là True (đúng) thì câu lệnh được thực hiện, nếu điều
là True (đúng) thì câu lệnh được thực hiện, nếu điều
kiện sai thì không thực hiện gì.
kiện sai thì không thực hiện gì.
Ví dụ
Ví dụ
:
:
If ( X mod 2 =0) Then
If ( X mod 2 =0) Then
Write(x , la so chan );
Write(x , la so chan );
THCS Kim Ngoc
4Phm Vn Thng
b- Cú pháp 2
b- Cú pháp 2
:
:
(
(
Hay còn gọi là dạng đủ
Hay còn gọi là dạng đủ
)
)
If <điều kiện> Then
If <điều kiện> Then
< Câu lệnh1>
< Câu lệnh1>
ELSE
ELSE
< Câu lệnh2>;
< Câu lệnh2>;
* ý nghĩa của câu lệnh:
* ý nghĩa của câu lệnh:
Chương trình kiểm tra giá trị của điều kiện. Nếu là True (đúng)
Chương trình kiểm tra giá trị của điều kiện. Nếu là True (đúng)
thì lệnh1 được thực hiện, ngược lại nếu là False (sai) thì lệnh 2 đư
thì lệnh1 được thực hiện, ngược lại nếu là False (sai) thì lệnh 2 đư
ợc thực hiện
ợc thực hiện
.
.
+ Trong đó
+ Trong đó
:
:
*
*
Điều kiện:
Điều kiện:
Là biểu thức quan hệ hoặc logic
Là biểu thức quan hệ hoặc logic
* Câu lệnh 1, câu lệnh 2:
* Câu lệnh 1, câu lệnh 2:
Là 1 câu lệnh của Pascal
Là 1 câu lệnh của Pascal
THCS Kim Ngoc
5Phạm Văn Thắng
* Chó ý:
* Chó ý:
Tríc c©u lÖnh ELSE kh«ng cã dÊu ;
Tríc c©u lÖnh ELSE kh«ng cã dÊu ;
VÝ dô
VÝ dô
:
:
If Delta < 0 Then
If Delta < 0 Then
Write( PT vo nghiem ) Else‘ ’
Write( PT vo nghiem ) Else‘ ’
Write( PT Co nghiem );‘ ’
Write( PT Co nghiem );‘ ’
VÝ dô 1
VÝ dô 1
:
:
T×m gi¸ trÞ lín nhÊt Max cña hai sè nguyªn
T×m gi¸ trÞ lín nhÊt Max cña hai sè nguyªn
a vµ b.
a vµ b.
ThuËt to¸n:
ThuËt to¸n:
C¸ch 1:
C¸ch 1:
¸p dông có ph¸p 1 d¹ng thiÕu
¸p dông có ph¸p 1 d¹ng thiÕu
- G/sö Ta g¸n Max:=a;
- G/sö Ta g¸n Max:=a;
- If b>a Then max:=b;
- If b>a Then max:=b;
THCS Kim Ngoc
6Phạm Văn Thắng
Program Max_1
Program Max_1
;
;
Var a,b,Max: Integer;
Var a,b,Max: Integer;
Begin
Begin
Writeln(‘nhap vao a va b=‘);Readln(a,b);
Writeln(‘nhap vao a va b=‘);Readln(a,b);
Max:=a;
Max:=a;
If b>a Then Max:=b;
If b>a Then Max:=b;
Write(‘ Gia tri lon nhat Max la:’, Max:4:1);
Write(‘ Gia tri lon nhat Max la:’, Max:4:1);
Readln;
Readln;
End.
End.