Vẽ cấu trúc và viết cú pháp của câu lệnh rẽ nhánh dạng thiếu trong ngôn ngữ lập trình Pascal?.. Cú pháp dạng thiếu: IFTHEN;..[r]
Trang 3Kiểm tra bài cũ
Cú pháp dạng thiếu:
IF <điều kiện> THEN <Câu lệnh>;
Câu 1 Vẽ cấu trúc và viết cú pháp của câu lệnh rẽ nhánh dạng thiếu
trong ngôn ngữ lập trình Pascal?
Trang 4Cú pháp dạng đầy đủ:
IF <điều kiện> THEN <Câu lệnh 1>
ELSE <Câu lệnh 2>;
Câu 2 Vẽ cấu trúc và viết cú pháp của câu lệnh rẽ nhánh dạng đầy đủ trong ngôn ngữ lập trình Pascal?
Kiểm tra bài cũ.
Câu 1 Vẽ cấu trúc và viết cú pháp của câu lệnh rẽ nhánh dạng thiếu
trong ngôn ngữ lập trình Pascal?
Trang 5CÂU LỆNH ĐIỀU KIỆN
Cú pháp dạng thiếu:
IF <điều kiện> THEN <Câu lệnh>;
Cú pháp dạng đầy đủ:
IF <điều kiện> THEN <Câu lệnh1>
ELSE <Câu lệnh 2>;
Nếu điều kiện đúng thì chương trình
thực hiện câu lệnh , Ngược lại bỏ
qua.
Nếu điều kiện đúng thì chương trình thực hiện câu lệnh 1 , Ngược lại thực hiện câu lệnh 2
Lưu ý: Trước ELSE không có dấu ; Cấu trúc rẽ nhánh dạng thiếu: Cấu trúc rẽ nhánh dạng đầy đủ:
Trang 6Bài toán: Viết chương trình nhập vào 2 số nguyên a, b Xuất số lớn
nhất ra màn hình.
Cú pháp dạng thiếu:
IF <điều kiện> THEN <Câulệnh>;
Cú pháp dạng đầy đủ:
IF <điều kiện> THEN <Câu lệnh 1>
ELSE <Câu lệnh 2>;
Bài Thực Hành 4: SỬ DỤNG CÂU LỆNH ĐIỀU KIỆN IF THEN
b Gõ chương trình sau đây: Program lonnhat;
Var a, b, max : integer;
Begin Write(‘ Nhap so nguyen a =‘);
Readln(a);
Write(‘ Nhap so nguyen b = ‘); Readln(b);
max:=a;
Write(‘So lon nhat la ‘,max);
Readln;
End.
a Mô tả thuật toán để giải bài toán.
Input: Nhập a, b;
Out put: Giá trị lớn nhất
Bước 1: Nhập 2 giá trị a và b;
max:=a;
Bước 2: Kiểm tra nếu max <b thì
gán max:=b;
Bước 3: In giá trị max ra màn hình
Bước 4: Kết thúc.
Trang 7c Tìm hiểu ý nghĩa của các câu lệnh trong chương trình Nhấn
Alt+F9 để dịch và sửa lỗi gõ (nếu có) Nhấn Ctrl+F9 để chạy chương
Trang 8Bài 1: Viết chương trình nhập hai số nguyên a và b khác nhau từ bàn
phím và in hai số đó ra màn hình theo thứ tự không giảm.
a Mô tả thuật toán để giải bài toán đã cho.
b Gõ chương trình sau đây:
Program Sap_xep;
Uses crt;
Var a, b: integer;
Begin
Clrscr;
Write(‘Nhap so a: ’); readln(a);
Write(‘Nhap so b: ’); readln(b);
If a < b then writeln(a,’ ‘,b)
else writeln(b,’ ‘,a) ;
Readln;
End.
c Tìm hiểu ý nghĩa của các câu lệnh trong chương trình Nhấn Alt+F9 để dịch và sửa lỗi gõ (nếu có) Nhấn Ctrl+F9 để chạy chương trình với các bộ
dữ liệu (12, 53), (65, 20) để thử chương trình Cuối cùng lưu chương trình với tên Sap_xep
Tiết 31. Bài thực hành 4: SỬ DỤNG LỆNH ĐIỀU KIỆN IF … THEN
Cú pháp dạng thiếu:
IF <điều kiện> THEN <Câu lệnh>;
Cú pháp dạng đầy đủ:
IF <điều kiện> THEN <Câu lệnh 1>
ELSE <Câu lệnh 2>;
Vậy qua bài toán này, ta đã sử dụng được dạng nào của
lệnh điều kiện
IF … THEN
Trang 9Luyện Gõ Phím nhanh với Finger Break Out Bài Thực Hành 4:
SỬ DỤNG CÂU LỆNH ĐIỀU KIỆN