//โปรแกรมอ่านข้อมูลพิมพ์แบบสรุปว่าแต่ละเดือน มีพนักงานรับเงินเดือนรวมเท่าใด
for n = 1 to 12
use empl
tsalary = 0
while !eof()
   tsalary = total + emplsal
   skip
   end
   ? n,tsalary
next