Ngôn ngữ lập trình PASCAL Viết có định dạng
4.2 Các câu lệnh có cấu trúc
4.2.1 Cấu trúc tuần tự, lệnh gán, lệnh ghép
1. Câu lệnh gán
2. Cấu trúc tuần tự
- Là cấu trúc trong đó các lệnh đ ợc liệt kê và thực hiện tuần tự từ đầu đến cuối cấu trúc
Writeln; Writeln;
Writeln( Chao cac ban );‘ ’
Writeln( ---*****--- );‘ ’
Writeln( Day la cau truc tuan tu );‘ ’
Ví dụ:
Biểu_thức
Tên_biến := ;
Exit
Ngôn ngữ lập trình PASCAL
3. Lệnh hợp thành
- Là một hoặc một nhóm các lệnh nằm giữa cặp từ khoá Begin End;
Begin Writeln( Day la lệnh hợp thành );‘ ’ ……… Readln; End; Ví dụ: Begin Các lệnh; End; Exit
Ngôn ngữ lập trình PASCAL
a. Cú pháp câu lệnh
4.2.2 Cấu trúc rẽ nhánh IF THEN…
1. Cấu trúc rẽ nhánh đơn
IF Dieu_kien THEN Cong_viec;
- Trong đó:
+ IF, THEN: là từ khoá của Pascal + Dieu_kien: là một biểu thức logic
+ Cong_viec: là một câu lệnh đơn hoặc lệnh ghép
Exit
Ngôn ngữ lập trình PASCAL
c. Diễn tiến b. L u đồ
Dieu_kien Đúng Cong_viec Sai
B ớc 1: Khi gặp câu lệnh IF THEN máy sẽ kiểm tra biểu thức điều kiện…
B ớc 2: + Nếu kết qủa là True sẽ thực hiện Cong_viec
+ Nếu kết qủa là False sẽ kết thúc câu lệnh và thực hiện câu lệnh tiếp theo của ch ơng trình.
Exit
Ngôn ngữ lập trình PASCAL
a. Cú pháp câu lệnh
2. Cấu trúc rẽ nhánh kép
IF Dieu_kien THEN Cong_viec1 ELSE Cong_viec2
- Trong đó:
+ IF, THEN, ELSE : là từ khoá của Pascal + Dieu_kien: là một biểu thức logic
+ Cong_viec1, Cong_viec2: là một câu lệnh đơn hoặc lệnh ghép
Exit
Ngôn ngữ lập trình PASCAL
c. Diễn tiến b. L u đồ
Dieu_kien Cong_viec2
Đúng Sai
B ớc 1: Khi gặp câu lệnh IF THEN máy sẽ kiểm tra biểu thức điều kiện…
B ớc 2: + Nếu kết qủa là True sẽ thực hiện Cong_viec1 + Nếu kết qủa là False sẽ thực hiện Cong_viec2 Cong_viec1
Sau đó tiếp tục thực hiện lệnh sau cấu trúc
Exit
Ngôn ngữ lập trình PASCAL
3. Bài toán áp dụng
Bài 1: Viết ch ơng trình kiểm tra số nhập vào có phải là số d ơng hay không. Nếu là số d ơng thì thông báo ra màn hình.
* Phân tích
Khai báo:
Dùng một biến S kiểu Real Quá trình thực hiện:
+ Nhập một số vào cho S
+ Xét xem số S d ơng hay không? Nếu:
- S > 0 Thì báo ra màn hình Số d ơng
“ ”
- S ≤ 0 thì không làm gì + Dừng lại xem có thông báo hay không?
+ Kết thúc.
Exit
Ngôn ngữ lập trình PASCAL
* L u đồ giải thuật
Begin S S > 0 ‘Số d ơng’ End
Program kiem_tra; Uses Crt;
Var S: Real; Begin
Clrscr;
Write('Ban hay nhap vao so S ='); Readln(s); If S > 0 then Writeln('So duong'); Readln; End. * Ch ơng trình Đúng Sai Exit
Ngôn ngữ lập trình PASCAL
Bài 2: Kiểm tra số nhập vào là số d ơng, âm hay số không. * Phân tích
Khai báo:
Dùng một biến S kiểu Real Quá trình thực hiện:
+ Nhập một số vào cho S
+ Xét xem số S d ơng hay không? Nếu:
- S > 0 Thì báo ra màn hình Số d ơng“ ”
- S ≤ 0 thì tiếp tục kiểm tra:
+ Nếu S= 0 thì báo ra Số không“ ”
+ Còn nếu S < 0 thì báo ra Số âm“ ”
+ Dừng lại xem có thông báo hay không? + Kết thúc.
Exit
Ngôn ngữ lập trình PASCAL* L u đồ giải thuật