b. Lệnh continue
4.3. CÁC CẤU TRUẽC ĐIỀU KHIỂN CHƯƠNG TRÌNH 1 Cấu trúc tuần tự
Bthức L .F.
Các lệnh .T. Quy ước: Chương trình được thực hiện từ trên xuống dưới.
4.3.2. C u trúc r nhánh Còn g i l c u trúc ch n l a. C u trúc r nhánh có hai d ng: d ng khuy t v d ng y : a. Dạng khuyết: Cú pháp: IF <Bthức L> <các lệnh> ENDIF
Tác dụng: Khi gặp cấu trúc này, <Bthức L> sẽ được tính, nếu có giá trị .T. thì <các lệnh> sẽđược thực hiện, ngược lại thực hiện các lệnh tiếp theo sau.
Ví d : Vi t ch ng trình nh p v o hai s , cho bi t s l n nh t
set talk off clear
Input :Nhap so thu nhat' to so1 Input :Nhap so thu hai' to so2 max=so1
If max < so2 max=so2 Endif
? "So lon nhat la:', max set talk on return b. Dạng đầy đủ: Bthức L .F. .T. Các lệnh Các lệnh
Cú pháp: IF <Bthức L> <các lệnh 1> ELSE <các lệnh 2> ENDIF
Tác dụng: Khi gặp cấu trúc này, <Bthức L> sẽđược tính. Nếu có giá trị .T. thì <các lệnh 1> sẽđược thực hiện, ngược lại (có giá trị .F.) thì sẽ thực hiện <các lệnh 2>. Sau đó tiếp tục thực hiện các lênh tiếp theo trong chương trình.
Ví dụ: Dựa vào bảng nhanvien, hãy nhập vào một họ tên nhân viên, tìm xem có đúng là nhân viên của công ty hay không, nếu đúng thì thông báo năm sinh và năm làm việc, ngược lại thì thông báo là không phải nhân viên của công ty.
set talk off clear close all
use NHANVIEN
accept 'nhap ho ten nhan vien:' to bhoten locate for HOTEN =bhoten
if found()
? ' ngay sinh là:', ngaysinh' ?'nam lam viec:', namlv else
?'khong phai la nhan vien cua cong ty' endif
set talk on return
