//โปรแกรมรวมคะแนนสอบกลางภาค และปลายภาค แล้วแสดงเกรด
use score
grade = space(1)
while !eof()
   tscore = keep + mid + fin
   if tscore >= 80
    grade = "A"
   elseif tscore >= 70
    grade = "B"
   elseif tscore >= 60
    grade = "C"
   elseif tscore >= 50
    grade = "D"
   else
    grade = "F"
   endif
   ? stdid,keep,mid,finl,tscore,grade
   skip
end