//โปรแกรมอ่านข้อมูลจากแฟ้มพนักงานมาพิมพ์ แล้วคำนวณหาภาษี
tax = 0
income = 0
use empl
while !eof()
   tax = emplsal * 0.07
   income = emplsal - tax
   ?empl,emplname,emplsal,tax,income
   skip
end
inkey(0)